Global: ^DGAM(334

FileMan FileNo	FileMan Filename	Package
42.6	AMIS 334-341	Registration

FileMan FileNo

FileMan Filename

Package

42.6

AMIS 334-341

Package	Total	Routines
Registration	6	DGAINP DGAINP1 DGAINP2 DGAINP3 DGAINP4 DGGECS
Pharmacy Benefits Management	1	PSUUD6

Package	Total	Routines
Registration	2	DGAINP DGAINP3

Package	Total	FileMan Files
Kernel	1	NEW PERSON(#200)[#42.61(52)]
Registration	1	MEDICAL CENTER DIVISION(#40.8)[#42.61(.01)]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	AMIS MONTH/YEAR	0;1	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:Y<1 X I $D(X) X $S($E(X,6,7)'="00":"K X W !,""Do not specify day of month""",X>DT:"K X W !,""Must be a past date""",1:"") I $D(X) S DINUM=X` LAST EDITED: `OCT 16, 1990` HELP-PROMPT: `Month and year of report` DESCRIPTION: `AMIS Month/Year indicates the month and year that the AMIS report is being generated for. Inpatient AMIS reports cannot be generated prior to the End Of Month, and therefore will always have a set Month/Year indicator.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `42.6^B` 1)= S ^DGAM(334,"B",$E(X,1,30),DA)="" 2)= K ^DGAM(334,"B",$E(X,1,30),DA) CROSS-REFERENCE: `42.6^ALST^MUMPS` 1)= K ^DGAM(334,"ALST") X "S DG1=X F %=X:0 S %=$N(^DGAM(334,%)) Q:%'>0 S DG1=%" S ^DGAM(334,"ALST",DG1)="" K DG1 2)= K ^DGAM(334,"ALST") X "S DG1=0 F %=0:0 S %=$N(^DGAM(334,%)) Q:%'>0 S:%'=DA DG1=%" S:DG1 ^DGAM(334,"ALST",DG1)="" K DG1
10	SEGMENT	SE;0	SET Multiple #42.6001	42.6001 DESCRIPTION: `The 'Segment' is the AMIS Segment number assigned to a particular report based on VA Manual MP6, Part VI, Supp. 1.2. In the case of this file, the AMIS Segment numbers are 334 through 341 series, and are for inpatient` data collection activities.

AMIS MONTH/YEAR

0;1

DATE

************************REQUIRED FIELD************************

INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X I $D(X) X $S($E(X,6,7)'="00":"K X W !,""Do not specify day of month""",X>DT:"K X W !,""Must be a past date""",1:"") I $D(X) S DINUM=X
LAST EDITED: OCT 16, 1990
HELP-PROMPT: Month and year of report
DESCRIPTION: AMIS Month/Year indicates the month and year that the AMIS report is being generated for. Inpatient AMIS reports cannot be generated prior to the End Of Month, and therefore will always have a set Month/Year indicator.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

CROSS-REFERENCE: 42.6^B

1)= S ^DGAM(334,"B",$E(X,1,30),DA)=""

2)= K ^DGAM(334,"B",$E(X,1,30),DA)

CROSS-REFERENCE: 42.6^ALST^MUMPS

1)= K ^DGAM(334,"ALST") X "S DG1=X F %=X:0 S %=$N(^DGAM(334,%)) Q:%'>0  S DG1=%" S ^DGAM(334,"ALST",DG1)="" K DG1

2)= K ^DGAM(334,"ALST") X "S DG1=0 F %=0:0 S %=$N(^DGAM(334,%)) Q:%'>0  S:%'=DA DG1=%" S:DG1 ^DGAM(334,"ALST",DG1)="" K DG1

SEGMENT

SE;0

SET Multiple #42.6001

DESCRIPTION: The 'Segment' is the AMIS Segment number assigned to a particular report based on VA Manual MP6, Part VI, Supp. 1.2. In the case of this file, the AMIS Segment numbers are 334 through 341 series, and are for inpatient
```
data collection activities.
```

Information