STANDARD DATA DICTIONARY #396.2 -- AMIE REPORT FILE 3/24/25 PAGE 1 STORED IN ^DVB(396.2, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 2.7) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- File to hold various parameters for specialized reporting in the A.M.I.E. package. Information is deleted as soon as possible. (This file is used specifically when generating and printing Notices of Discharge.) APPLICATION GROUP(S): DVBA CROSS REFERENCED BY: NAME(B), 7132 STATUS(C), 7132 ADMISSION DATE(D) 396.2,.01 NAME 0;1 POINTER TO PATIENT FILE (#2) (Required) HELP-PROMPT: Pointer to patient file for DFN DESCRIPTION: Name of the Patient. TECHNICAL DESCR: Pointer to the Patient File. CROSS-REFERENCE: 396.2^B 1)= S ^DVB(396.2,"B",$E(X,1,30),DA)="" 2)= K ^DVB(396.2,"B",$E(X,1,30),DA) 396.2,1 7132 ADMISSION DATE 0;2 DATE INPUT TRANSFORM: S %DT="ESTX" D ^%DT S X=Y K:Y<1 X LAST EDITED: JUN 18, 1992 HELP-PROMPT: This field is generated by the Notice of Discharge program. DESCRIPTION: This field holds the date of admission for a veteran. It is used when printing Notices of Discharge. TECHNICAL DESCR: Entered by the routine DVBADSCK. CROSS-REFERENCE: 396.2^D^MUMPS 1)= S DVBADFN=$P(^DVB(396.2,DA,0),U,1) S ^DVB(396.2,"D",$E(X,1,30),DVBADFN,DA)="" K DVBADFN 2)= S DVBADFN=$P(^DVB(396.2,DA,0),U,1) K ^DVB(396.2,"D",$E(X,1,30),DVBADFN,DA),DVBADFN This cross reference orders 7132 Admission Dates by date then patient. 396.2,2 7132 ADMISSION POINTER 0;3 NUMBER INPUT TRANSFORM: K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X LAST EDITED: JUN 22, 1991 HELP-PROMPT: Type a Number between 1 and 999999999, 0 Decimal Digits DESCRIPTION: Pointer to the Patient Movement file. 396.2,3 7132 STATUS 0;4 SET 'P' FOR PRINTED; 'R' FOR READY TO PRINT; HELP-PROMPT: Status of the notice of discharge. DESCRIPTION: The print status of the Notice of Discharge Record. TECHNICAL DESCR: Set by the Notice of Discharge checking routine and the Notice of Discharge print routine. CROSS-REFERENCE: 396.2^C^MUMPS 1)= S DVBADFN=$P(^DVB(396.2,DA,0),U,1),XLOC=$P(^(0),U,7) Q:XLOC="" S ^DVB(396.2,"C",XLOC,$E(X,1,30 ),DA)="" K DVBADFN,XLOC 2)= S DVBADFN=$P(^DVB(396.2,DA,0),U,1),XLOC=$P(^(0),U,7) Q:XLOC="" K ^DVB(396.2,"C",XLOC,$E(X,1,30 ),DA),XLOC,DVBADFN This cross reference orders 7132s by routing location and status. 396.2,3.5 7132 ROUTING LOCATION 0;7 FREE TEXT INPUT TRANSFORM: K:$L(X)>7!($L(X)<3)!'(X?3N.AN) X LAST EDITED: MAY 03, 2011 HELP-PROMPT: This field contains the patient's claim folder location (i.e. station number). DESCRIPTION: Holds the Patient File Claim Folder Location from which a Notice of Discharge was generated for the patient. TECHNICAL DESCR: This field value must match the user's Station Number from the Institution file for the user to be able to print the Notice of Discharge. 396.2,4 DATE 7132 PRINTED 0;5 DATE INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X HELP-PROMPT: Date printed by the RO. DESCRIPTION: This field contains the date the Notice of Discharge was originally printed. TECHNICAL DESCR: Set by the routine DVBADSNT. 396.2,5 7132 PRINTED BY 0;6 POINTER TO NEW PERSON FILE (#200) LAST EDITED: JAN 28, 1993 HELP-PROMPT: Name of person who printed the notice of discharge. DESCRIPTION: Indicates the name of the person who originally printed the Notice of Discharge. TECHNICAL DESCR: Contains the DUZ of the person who printed the Notice of Discharge with the routine DVBADSNT. FILES POINTED TO FIELDS NEW PERSON (#200) 7132 PRINTED BY (#5) PATIENT (#2) NAME (#.01) INPUT TEMPLATE(S): PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):