Global: ^IBE(352.2

FileMan FileNo	FileMan Filename	Package
352.2	NON-BILLABLE DISPOSITIONS	Integrated Billing

FileMan FileNo

FileMan Filename

Package

352.2

NON-BILLABLE DISPOSITIONS

Integrated Billing

Description

This file shall be used to flag dispositions in the DISPOSITION (#37) file as either billable or non-billable for Means Test Billing. The flagging of dispositions is date-sensitive, so the ability to not bill can be turned on or off. The default billing action is TO BILL ALL dispositions; thus, it is only necessary to add entries to this file if billing of a particular disposition is not desired. The routine IBEFUNC contains the function call to determine if a disposition should not be billed on a specific date. Per VHA Directive 10-93-142, this file definition should not be modified.

Package	Total	Routines
Integrated Billing	2	^IBE(352.2 IBEFUNC

Package

Total

Routines

Integrated Billing

^IBE(352.2 IBEFUNC

Package	Total	FileMan Files
Registration	1	DISPOSITION(#37)[.01]

Package

Total

FileMan Files

Registration

DISPOSITION(#37)[.01]

Fields, Total: 3

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	DISPOSITION	0;1	POINTER TO DISPOSITION FILE (#37)	**********************REQUIRED FIELD********************** DISPOSITION(#37) LAST EDITED: `JUL 20, 1993` HELP-PROMPT: `Please enter a disposition.` DESCRIPTION: This field is a pointer to the DISPOSITION (#37) file, and identifies the disposition which is being established as either billable or non-billable for Means Test billing. CROSS-REFERENCE: `352.2^B` 1)= S ^IBE(352.2,"B",$E(X,1,30),DA)="" 2)= K ^IBE(352.2,"B",$E(X,1,30),DA) CROSS-REFERENCE: `352.2^AIVDT^MUMPS` 1)= I $D(^IBE(352.2,DA,0)),$P(^(0),"^",2) S ^IBE(352.2,"AIVDT",X,-$P(^(0),"^",2),DA)="" 2)= I $D(^IBE(352.2,DA,0)),$P(^(0),"^",2) K ^IBE(352.2,"AIVDT",X,-$P(^(0),"^",2),DA) This cross-reference on the DISPOSITION (#.01) field and the EFFECTIVE DATE (#.02) field is used to locate the appropriate record for a disposition on a specific effective date.
.02	EFFECTIVE DATE	0;2	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JUL 20, 1993` HELP-PROMPT: `Please enter an effective date.` DESCRIPTION: This is the date on which Means Test billing for this disposition should be activated or ignored. CROSS-REFERENCE: `352.2^AIVDT1^MUMPS` 1)= I $D(^IBE(352.2,DA,0)),+^(0) S ^IBE(352.2,"AIVDT",+^(0),-X,DA)="" 2)= I $D(^IBE(352.2,DA,0)),+^(0) K ^IBE(352.2,"AIVDT",+^(0),-X,DA) This cross-reference on the DISPOSITION (#.01) field and the EFFECTIVE DATE (#.02) field is used to locate the appropriate record for a disposition on a specific effective date.
.03	IGNORE MEANS TEST BILLING?	0;3	SET	**********************REQUIRED FIELD********************** '1' FOR YES; '0' FOR NO; LAST EDITED: `AUG 05, 1993` HELP-PROMPT: `Please enter 'YES' or 'NO.'` DESCRIPTION: `This field is used to determine whether Means Test billing should be activated or ignored, as of the EFFECTIVE DATE (field #.02).` Please note that you only need an entry in this file for a disposition for which you would like Means Test billing to be IGNORED.

.01

DISPOSITION

0;1

POINTER TO DISPOSITION FILE (#37)

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

DISPOSITION(#37)

LAST EDITED: JUL 20, 1993
HELP-PROMPT: Please enter a disposition.

DESCRIPTION:

This field is a pointer to the DISPOSITION (#37) file, and identifies the disposition which is being established as either billable or non-billable for Means Test billing.

CROSS-REFERENCE: 352.2^B

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

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

CROSS-REFERENCE: 352.2^AIVDT^MUMPS

1)= I $D(^IBE(352.2,DA,0)),$P(^(0),"^",2) S ^IBE(352.2,"AIVDT",X,-$P(^(0),"^",2),DA)=""

2)= I $D(^IBE(352.2,DA,0)),$P(^(0),"^",2) K ^IBE(352.2,"AIVDT",X,-$P(^(0),"^",2),DA)

This cross-reference on the DISPOSITION (#.01) field and the EFFECTIVE DATE (#.02) field is used to locate the appropriate record for a disposition on a specific effective date.

.02

EFFECTIVE DATE

0;2

DATE

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

INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: JUL 20, 1993
HELP-PROMPT: Please enter an effective date.

DESCRIPTION:

This is the date on which Means Test billing for this disposition should be activated or ignored.

CROSS-REFERENCE: 352.2^AIVDT1^MUMPS

1)= I $D(^IBE(352.2,DA,0)),+^(0) S ^IBE(352.2,"AIVDT",+^(0),-X,DA)=""

2)= I $D(^IBE(352.2,DA,0)),+^(0) K ^IBE(352.2,"AIVDT",+^(0),-X,DA)

This cross-reference on the DISPOSITION (#.01) field and the EFFECTIVE DATE (#.02) field is used to locate the appropriate record for a disposition on a specific effective date.

.03

IGNORE MEANS TEST BILLING?

0;3

SET

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

'1' FOR YES;
'0' FOR NO;

LAST EDITED: AUG 05, 1993
HELP-PROMPT: Please enter 'YES' or 'NO.'
DESCRIPTION: This field is used to determine whether Means Test billing should be activated or ignored, as of the EFFECTIVE DATE (field #.02).
```
Please note that you only need an entry in this file for a disposition for which you would like Means Test billing to be IGNORED.
```

Name	Field # of Occurrence
^%DT	.02+1

Name

Field # of Occurrence

^%DT

.02+1

Name	Line Occurrences (* Changed, ! Killed)
^IBE(352.2 - [#352.2]	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .02(XREF 1S), .02(XREF 1K)

Name

Line Occurrences (* Changed, ! Killed)

^IBE(352.2 - [#352.2]

.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .02(XREF 1S), .02(XREF 1K)

Name	Field # of Occurrence
^(0	.01(XREF 2S), .01(XREF 2K), .02(XREF 1S), .02(XREF 1K)

Name

Field # of Occurrence

^(0

.01(XREF 2S), .01(XREF 2K), .02(XREF 1S), .02(XREF 1K)

Local Variables

Legend:

>>	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)
X	.01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .02+1*!, .02(XREF 1S), .02(XREF 1K)
>> Y	.02+1

Customize PDF page

Package: Integrated Billing

Global: ^IBE(352.2

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: