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 | Pointer To FileMan Files | Fields | ICR | Found Entries | External References | Global Variables Directly Accessed | Naked Globals | Local Variables | All

Print Page as PDF

Global: ^IBE(352.1

Package: Integrated Billing

Global: ^IBE(352.1

Information

FileMan FileNo	FileMan Filename	Package
352.1	BILLABLE APPOINTMENT TYPE	Integrated Billing

Description

Records for each appointment type with indicators for IGNORE MEANS TEST, PRINT ON INSURANCE REPORT, and DISPLAY ON INPUT SCREEN. Also contains effective date of determination. Accessed by extrinsic function ^IBEFUNC. Per VHA Directive 10-93-142, this file definition should not be modified.

Directly Accessed By Routines, Total: 2

Pointer To FileMan Files, Total: 1

Fields, Total: 6

Field #	Name	Loc	Type	Details
.01	NUMBER	0;1	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `OCT 21, 1991` HELP-PROMPT: `Type a Number between 1 and 99, 0 Decimal Digits` DESCRIPTION: This is a unique number for each entry. CROSS-REFERENCE: `352.1^B` 1)= S ^IBE(352.1,"B",$E(X,1,30),DA)="" 2)= K ^IBE(352.1,"B",$E(X,1,30),DA)
.02	APPOINTMENT TYPE	0;2	POINTER TO APPOINTMENT TYPE FILE (#409.1)	**********************REQUIRED FIELD********************** APPOINTMENT TYPE(#409.1) LAST EDITED: `OCT 22, 1991` DESCRIPTION: This is the MAS Appointment type. CROSS-REFERENCE: `352.1^AIVDT1^MUMPS` 1)= I $P(^IBE(352.1,DA,0),U,3) S ^IBE(352.1,"AIVDT",X,-$P(^(0),U,3),DA)="" 2)= I $P(^IBE(352.1,DA,0),U,3) K ^IBE(352.1,"AIVDT",X,-$P(^(0),U,3),DA) Used to find most recent entry for appointment type. CROSS-REFERENCE: `352.1^C` 1)= S ^IBE(352.1,"C",$E(X,1,30),DA)="" 2)= K ^IBE(352.1,"C",$E(X,1,30),DA)
.03	EFFECTIVE DATE	0;3	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `OCT 22, 1991` DESCRIPTION: `Every Appointment type has certain billing characteristics that may change over time. For example, an appointment type may not be billable for Category C Means Test billing one year but may the next depending on` legislation. It is only necessary to add a new effective date for an appointment type if the characteristics need to be time sensitive. UNEDITABLE CROSS-REFERENCE: `352.1^AIVDT2^MUMPS` 1)= I $P(^IBE(352.1,DA,0),U,2) S ^IBE(352.1,"AIVDT",$P(^(0),U,2),-X,DA)="" 2)= I $P(^IBE(352.1,DA,0),U,2) K ^IBE(352.1,"AIVDT",$P(^(0),U,2),-X,DA) Used to find most recent entry for an appointment type. CROSS-REFERENCE: `352.1^D` 1)= S ^IBE(352.1,"D",$E(X,1,30),DA)="" 2)= K ^IBE(352.1,"D",$E(X,1,30),DA)
.04	IGNORE MEANS TEST	0;4	SET	**********************REQUIRED FIELD********************** '1' FOR YES; '0' FOR NO; LAST EDITED: `OCT 21, 1991` DESCRIPTION: Set this field to 'YES' if this appointment type should NOT be billed for Category C means test billing.
.05	PRINT ON INSURANCE REPORT	0;5	SET	**********************REQUIRED FIELD********************** '1' FOR YES; '0' FOR NO; LAST EDITED: `OCT 21, 1991` DESCRIPTION: Set this field to 'YES' if you would like this appointment type to show up on the list of Veterans with insurance and outpatient visits.
.06	DISPLAY ON INPUT SCREEN	0;6	SET	**********************REQUIRED FIELD********************** '1' FOR YES; '0' FOR NO; LAST EDITED: `OCT 21, 1991` DESCRIPTION: Set this field to 'YES' if you would like this appointment type to be displayed as a potential billable visit on the outpatient visit screen when creating a third party bill.

Found Entries, Total: 10

ICR, Total: 1

External References

Global Variables Directly Accessed

Naked Globals

Local Variables

Info | Desc | Directly Accessed By Routines | Pointer To FileMan Files | Fields | ICR | Found Entries | External References | Global Variables Directly Accessed | Naked Globals | Local Variables | All