Sub-Field: 361.18

Parent File	Name	Number	Package
EXPLANATION OF BENEFITS(#361.1)	AR AMOUNTS DISTRIBUTION	361.18	Integrated Billing

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	BILL #	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>15!($L(X)<1) X` LAST EDITED: `MAR 18, 2003` HELP-PROMPT: `Answer must be 1-15 characters in length.` DESCRIPTION: `This is the free text bill # that AR has determined this ERA has referenced.` CROSS-REFERENCE: `361.18^B` `1)= S ^IBM(361.1,DA(1),8,"B",$E(X,1,30),DA)=""` `2)= K ^IBM(361.1,DA(1),8,"B",$E(X,1,30),DA)` CROSS-REFERENCE: `361.1^C` `1)= S ^IBM(361.1,"C",$E(X,1,30),DA(1),DA)=""` `2)= K ^IBM(361.1,"C",$E(X,1,30),DA(1),DA)` `3)= Do not delete`
.02	AMOUNT	0;2	NUMBER	INPUT TRANSFORM: `S:X["$" X=$P(X,"$",2) K:X'?."-".N.1".".2N!(X>9999999999999)!(X<-9999999999999) X` LAST EDITED: `MAR 13, 2003` HELP-PROMPT: `Type a Dollar Amount between -9999999999999 and 9999999999999, 2 Decimal Digits` DESCRIPTION: `This is the amount of money from this ERA that AR has determined applies to the corresponding bill.`
.03	BILL REFERENCE	0;3	POINTER TO BILL/CLAIMS FILE (#399)	BILL/CLAIMS(#399) LAST EDITED: `MAR 18, 2003` HELP-PROMPT: `Enter the IB bill reference for this distribution amount` DESCRIPTION: `This is the actual pointer to file 399 for the bill referenced in this distribution record. If this data is missing, the amount was posted to suspense.` CROSS-REFERENCE: `361.1^C` `1)= S ^IBM(361.1,"C",$E(X,1,30),DA(1),DA)=""` `2)= K ^IBM(361.1,"C",$E(X,1,30),DA(1),DA)` `3)= Do not delete` CROSS-REFERENCE: `361.18^AC` `1)= S ^IBM(361.1,DA(1),8,"AC",$E(X,1,30),DA)=""` `2)= K ^IBM(361.1,DA(1),8,"AC",$E(X,1,30),DA)` `3)= Do not delete`

.01

BILL #

0;1

FREE TEXT

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

INPUT TRANSFORM: K:$L(X)>15!($L(X)<1) X
LAST EDITED: MAR 18, 2003
HELP-PROMPT: Answer must be 1-15 characters in length.
DESCRIPTION:
This is the free text bill # that AR has determined this ERA has referenced.
CROSS-REFERENCE: 361.18^B
1)= S ^IBM(361.1,DA(1),8,"B",$E(X,1,30),DA)=""
2)= K ^IBM(361.1,DA(1),8,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 361.1^C
1)= S ^IBM(361.1,"C",$E(X,1,30),DA(1),DA)=""
2)= K ^IBM(361.1,"C",$E(X,1,30),DA(1),DA)
3)= Do not delete

.02

AMOUNT

0;2

NUMBER

INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?."-".N.1".".2N!(X>9999999999999)!(X<-9999999999999) X
LAST EDITED: MAR 13, 2003
HELP-PROMPT: Type a Dollar Amount between -9999999999999 and 9999999999999, 2 Decimal Digits
DESCRIPTION:
This is the amount of money from this ERA that AR has determined applies to the corresponding bill.

.03

BILL REFERENCE

0;3

POINTER TO BILL/CLAIMS FILE (#399)

BILL/CLAIMS(#399)

LAST EDITED: MAR 18, 2003
HELP-PROMPT: Enter the IB bill reference for this distribution amount
DESCRIPTION:
This is the actual pointer to file 399 for the bill referenced in this distribution record. If this data is missing, the amount was posted to suspense.
CROSS-REFERENCE: 361.1^C
1)= S ^IBM(361.1,"C",$E(X,1,30),DA(1),DA)=""
2)= K ^IBM(361.1,"C",$E(X,1,30),DA(1),DA)
3)= Do not delete
CROSS-REFERENCE: 361.18^AC
1)= S ^IBM(361.1,DA(1),8,"AC",$E(X,1,30),DA)=""
2)= K ^IBM(361.1,DA(1),8,"AC",$E(X,1,30),DA)
3)= Do not delete

Customize PDF page

Package: Integrated Billing

EXPLANATION OF BENEFITS(#361.1)-->361.18

Sub-Field: 361.18

Information

Details