Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointer To FileMan Files | Fields | All

Print Page as PDF

Global: ^WII(987.5

Package: Wounded Injured and Ill Warriors

Global: ^WII(987.5

Information

FileMan FileNo	FileMan Filename	Package
987.5	WII ADMISSIONS DISCHARGES	Wounded Injured and Ill Warriors

Description

The purpose of this file is to track admissions and discharges of Active duty Veterans and to facilitate the notification of these movements to the DOD. This file is populated by the weekly back ground job [WII BUILD ADT EVENTS]. In order for a patient to be in this file, the veteran must have one of three eligibilities entered in the Patient File (#2). TRICARE , SHARING AGREEMENT or OTHER FEDERAL AGENCY. Entries that have a status of approved to transmit will be sent to the VISN for review and then roll up to the DOD. In the case of admission and discharge occurring in the same collection period there will only be one entry. In the case that a discharge occurs in a subsequent collection period there will be a second entry. Entries are dinum to the Patient Movement file (#405) Entries into this file should NOT be done manually. The option WII REVIEW ADT EVENTS WILL utilizes List Manager to allow a point of contact at the local facility to approve entries for transmission or just the opposite block transmission.

Directly Accessed By Routines, Total: 6

Package	Total	Routines
Wounded Injured and Ill Warriors	6	WIIACT4 WIIGATD WIILM WIILM01 WIILM03 WIILM04

Accessed By FileMan Db Calls, Total: 3

Package	Total	Routines
Wounded Injured and Ill Warriors	3	WIIACT4 WIIGATD WIILM01

Pointer To FileMan Files, Total: 3

Package	Total	FileMan Files
Registration	2	PATIENT MOVEMENT(#405)[.01] PATIENT(#2)[18]
Kernel	1	NEW PERSON(#200)[10]

Fields, Total: 19

Field #	Name	Loc	Type	Details
.01	MOVEMENT TIME	0;1	POINTER TO PATIENT MOVEMENT FILE (#405)	**********************REQUIRED FIELD********************** PATIENT MOVEMENT(#405) INPUT TRANSFORM: `S DINUM=+X` LAST EDITED: `DEC 24, 2008` HELP-PROMPT: `The movement must exist in the movement file (405).` DESCRIPTION: `This field contains the internal movement number from file 405.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `987.5^B` `1)= S ^WII(987.5,"B",$E(X,1,30),DA)=""` `2)= K ^WII(987.5,"B",$E(X,1,30),DA)`
1	PATIENT	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>35!($L(X)<1) X` LAST EDITED: `DEC 23, 2008` HELP-PROMPT: `Answer must be 1-35 characters in length` DESCRIPTION: `This field contains the external representation of the patients name. The source of this field is from the patient file (#2) field .01.`
2	SSN	0;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>12!($L(X)<1) X` LAST EDITED: `DEC 23, 2008` HELP-PROMPT: `Enter the Social Security Number (SSN) of the Patient.` DESCRIPTION: `This field contains the external representation of the SSN. The source of this field is from the patient file (#2) field .09.`
3	MOVEMENT DATE	0;4	DATE	INPUT TRANSFORM: `S %DT="ESTX" D ^%DT S X=Y K:X<1 X` LAST EDITED: `DEC 23, 2008` HELP-PROMPT: `(No range limit on date)` DESCRIPTION: `This field contains the internal value of the Movement Date located in the patient movement file (#405) field .01.`
4	FACILITY	0;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>35!($L(X)<1) X` LAST EDITED: `DEC 23, 2008` HELP-PROMPT: `Enter the Facility Identification (suffix).` DESCRIPTION: `This field contains the external representation of Facility Identification and suffix (if one is present) where the movement occurred. The source of this field is from the MEDICAL CENTER DIVISION file (#40.8) field 1.`
5	ADMISSION DATE	0;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>35!($L(X)<1) X` LAST EDITED: `DEC 23, 2008` HELP-PROMPT: `Enter the Admission date of the movement. 1-35 characters in length.` DESCRIPTION: `This field contains the external representation of the Admission date and time. The format only goes down to the minute. The source of this field from the patient movement file (#405) field .01. The format for this field` `is MM/DD/YYYY@HOUR:MINUTES. An example of a valid date is 10/03/2008@13:21.`
6	DISCHARGE DATE	0;7	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>35!($L(X)<3) X` LAST EDITED: `DEC 23, 2008` HELP-PROMPT: `Enter the Discharge date of the movement. 1-35 characters in length.` DESCRIPTION: `This field contains the external representation of the discharge date and time. The format only goes down to the minute. The source of this field from the patient movement file (#405) field .01. The format for this` `field is MM/DD/YYYY@HOUR:MINUTES. An example of a valid date is 10/03/2008@13:21.`
7	ICN	0;8	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `DEC 23, 2008` HELP-PROMPT: `Enter the Integration control number of the patient.` DESCRIPTION: `This field contains the external representation of the Integration control number. The source of this field is from the patient file (#2) field 991.01.`
8	STATUS	0;9	SET	'1' FOR Pending facility approval; '2' FOR Transmission Approved; '3' FOR Transmission Not Approved; '4' FOR Transmitted Complete; LAST EDITED: `DEC 23, 2008` HELP-PROMPT: `Enter a status from the list.` DESCRIPTION: `This field contains the internal value of status. This field comes from a set of code. The values are as follows: 1:Pending facility approval 2:Transmission Approved 3:Transmission Not Approved 4:Transmitted Complete` CROSS-REFERENCE: `987.5^C` `1)= S ^WII(987.5,"C",$E(X,1,30),DA)=""` `2)= K ^WII(987.5,"C",$E(X,1,30),DA)`
9	DATE COLLECTED	0;10	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:X<1 X` LAST EDITED: `DEC 23, 2008` HELP-PROMPT: `Enter the Date that the movement was Collected.` DESCRIPTION: `This field contains the internal value of the date the record was added to the WII ADMISSIONS DISCHARGES FILE (#987.5) in fileman date format without time.`
10	STATUS CHANGED BY	0;11	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `DEC 23, 2008` HELP-PROMPT: `Enter the ID of the Person who changed the Patient's Status.` DESCRIPTION: `This field contains the internal value of the user who changed the status of the record collected. The source of this field is from the NEW PERSON file (#200).`
11	DATE STATUS CHANGED	0;12	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:X<1 X` LAST EDITED: `DEC 23, 2008` HELP-PROMPT: `Enter the Date that the record Status was Changed.` DESCRIPTION: `This field contains the internal value of the date the record status was changed in a fileman date format without time.`
12	DATE TRANSMITTED	0;13	DATE	INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:X<1 X` LAST EDITED: `DEC 23, 2008` HELP-PROMPT: `Enter the Date the record was transmitted to DFAS.` DESCRIPTION: `This field contains the internal value of the date the record was transmitted to the central collection site in a fileman date format without time.`
13	PATIENTS ZIP CODE	1;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `DEC 23, 2008` HELP-PROMPT: `Enter the patient's zip code. Answer must be 1-15 characters in length.` DESCRIPTION: `This field contains the external representation of the patient's zip code. The source of this data is from the patient file (#2) field .116.`
14	DATE OF BIRTH	1;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>25!($L(X)<1) X` LAST EDITED: `DEC 24, 2008` HELP-PROMPT: `Enter patients birth date. Answer must be 1-25 characters in length.` DESCRIPTION: `This field contains the external representation of the patients date of birth. The source of this field is from the patient file (#2) field .03. The format for this field is MM DD,YYYY. An example of a valid date is OCT` `1,1975.`
15	GENDER	1;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` LAST EDITED: `DEC 23, 2008` HELP-PROMPT: `Enter patient's gender. Answer must be 1-10 characters in length.` DESCRIPTION: `This field contains the external representation of the patient's gender. The source of this field is from the patient file (#2) field .02.`
16	QUALIFYING ELIGIBILITY	1;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>35!($L(X)<1) X` LAST EDITED: `DEC 23, 2008` HELP-PROMPT: `Enter the qualifying eligibility. Answer must be 1-35 characters in length` DESCRIPTION: `This field contains the external representation of the patients Eligibility. The source of this data can come from either the primary eligibility field .361 or the Patient Eligibilities field 361. Both of these sources` `are in the patient file (#2).`
17	DATE SENT TO REPOSITORY	1;5	DATE	INPUT TRANSFORM: `S %DT="EST" D ^%DT S X=Y K:X<1 X` LAST EDITED: `DEC 23, 2008` HELP-PROMPT: `Enter the date that the data was sent to the repository.` DESCRIPTION: `This field contains the internal value of the date the record was transmitted to the central collection site in a fileman date format without time.`
18	PATIENTS INTERNAL ENTRY NUMBER	1;6	POINTER TO PATIENT FILE (#2)	PATIENT(#2) LAST EDITED: `DEC 24, 2008` HELP-PROMPT: `Select the patient` DESCRIPTION: `This field contains the internal value of the patient's entry number. The source of this field is from the patient file (#2).`

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointer To FileMan Files | Fields | All