Global: ^IBE(356.5

FileMan FileNo	FileMan Filename	Package
356.5	CLAIMS TRACKING ALOS	Integrated Billing

Directly Accessed By Routines, Total: 2

Package	Total	Routines
Integrated Billing	2	^IBE(356.5 IBTRV2

Pointer To FileMan Files, Total: 1

Package	Total	FileMan Files
DRG Grouper	1	DRG(#80.2)[.01]

Fields, Total: 3

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	DRG	0;1	POINTER TO DRG FILE (#80.2)	**********************REQUIRED FIELD********************** DRG(#80.2) LAST EDITED: `NOV 29, 1993` DESCRIPTION: `This is the DRG for which you wish to enter an average length of stay that will be reflected on the review screen. This ALOS is an alos that is used in practice by the insurance industry which is different than the ALOS` generally found in DHCP files which are specific to VA care. CROSS-REFERENCE: `356.5^B` 1)= S ^IBE(356.5,"B",$E(X,1,30),DA)="" 2)= K ^IBE(356.5,"B",$E(X,1,30),DA) CROSS-REFERENCE: `356.5^ADR^MUMPS` 1)= S:$P(^IBE(356.5,DA,0),U,2) ^IBE(356.5,"ADR",X,$P(^(0),U,2),DA)="" 2)= K ^IBE(356.5,"ADR",X,+$P(^IBE(356.5,DA,0),U,2),DA) Cross-reference of drgs by year.
.02	YEAR	0;2	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:Y<1 X S:$D(X) X=$E(X,1,3)_"0000"` LAST EDITED: `JUL 23, 1993` HELP-PROMPT: `Enter the year for this ALOS for this DRG. If any date other than a year is entered, only the year will be stored.` DESCRIPTION: This is the year for which you want to enter an average lenght of stay for this DRG. If any date in a year is entered only the year will be stored. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `356.5^ADR1^MUMPS` 1)= S:$P(^IBE(356.5,DA,0),U) ^IBE(356.5,"ADR",$P(^(0),U),X,DA)="" 2)= K ^IBE(356.5,"ADR",+$P(^IBE(356.5,DA,0),U),X,DA) Cross reference of all drgs by year so that the alos for that drg for the correct year can be found.
.03	ALOS FOR INS. PURPOSES	0;3	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<0)!(X?.E1"."3N.N) X` LAST EDITED: `JUL 23, 1993` HELP-PROMPT: `Enter the ALOS for this DRG for this year. Type a Number between 0 and 9999, 2 Decimal Digits` DESCRIPTION: `Enter the average length of stay (ALOS) that you wish to be used as a base for insurance purposes. This ALOS will be displayed on the expanded review screen for associated DRG's. Generally this information will be from` HCFA or the insurance industry.

.01

DRG

0;1

POINTER TO DRG FILE (#80.2)

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

DRG(#80.2)

LAST EDITED: NOV 29, 1993
DESCRIPTION: This is the DRG for which you wish to enter an average length of stay that will be reflected on the review screen. This ALOS is an alos that is used in practice by the insurance industry which is different than the ALOS
```
generally found in DHCP files which are specific to VA care.
```

CROSS-REFERENCE: 356.5^B

1)= S ^IBE(356.5,"B",$E(X,1,30),DA)=""

2)= K ^IBE(356.5,"B",$E(X,1,30),DA)

CROSS-REFERENCE: 356.5^ADR^MUMPS

1)= S:$P(^IBE(356.5,DA,0),U,2) ^IBE(356.5,"ADR",X,$P(^(0),U,2),DA)=""

2)= K ^IBE(356.5,"ADR",X,+$P(^IBE(356.5,DA,0),U,2),DA)

Cross-reference of drgs by year.

.02

YEAR

0;2

DATE

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

INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X S:$D(X) X=$E(X,1,3)_"0000"
LAST EDITED: JUL 23, 1993
HELP-PROMPT: Enter the year for this ALOS for this DRG. If any date other than a year is entered, only the year will be stored.

DESCRIPTION:

This is the year for which you want to enter an average lenght of stay for this DRG.  If any date in a year is entered only the year will be stored.

NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

CROSS-REFERENCE: 356.5^ADR1^MUMPS

1)= S:$P(^IBE(356.5,DA,0),U) ^IBE(356.5,"ADR",$P(^(0),U),X,DA)=""

2)= K ^IBE(356.5,"ADR",+$P(^IBE(356.5,DA,0),U),X,DA)

Cross reference of all drgs by year so that the alos for that drg for the correct year can be found.

.03

ALOS FOR INS. PURPOSES

0;3

NUMBER

INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<0)!(X?.E1"."3N.N) X
LAST EDITED: JUL 23, 1993
HELP-PROMPT: Enter the ALOS for this DRG for this year. Type a Number between 0 and 9999, 2 Decimal Digits
DESCRIPTION: Enter the average length of stay (ALOS) that you wish to be used as a base for insurance purposes. This ALOS will be displayed on the expanded review screen for associated DRG's. Generally this information will be from
```
HCFA or the insurance industry.
```

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	.02+1*
>> DA	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .02(XREF 1S), .02(XREF 1K)
U	.01(XREF 2S), .01(XREF 2K), .02(XREF 1S), .02(XREF 1K)
X	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .02+1*!, .02(XREF 1S), .02(XREF 1K), .03+1!
>> Y	.02+1

Customize PDF page

Package: Integrated Billing

Global: ^IBE(356.5

Information

Description

Directly Accessed By Routines, Total: 2

Pointer To FileMan Files, Total: 1

Fields, Total: 3

External References

Global Variables Directly Accessed

Naked Globals

Local Variables

Legend: