Routine: IBEMTF1

Information

IBEMTF1 ;ALB/CPM - FLAG STOP CODES, DISPOSITIONS, AND CLINICS (CON'T.) ; 23-JUL-93

Source file <IBEMTF1.m>

Package	Total	Call Graph
VA Fileman	4	^DIC FILE^DICN ^DIE ^DIR

Package	Total	Caller Graph
Integrated Billing	1	IBEMTF

Name	Comments	DBIA/ICR reference
HREV	; Help for the Request to Review prompt.
HSEL	; Help for the Billing characteristic prompt.
HACT	; Help for the Billing action prompt.
REV	; Review selected entries and de-select if necessary.
LIST	; List all selected entries.
FILE	; File all selected entries.
REVQ

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: REV+6
Function Call: WRITE	Prompt: !,"Please note that ",Y(0,0)," is not currently selected." Line Location: REV+17
Function Call: WRITE	Prompt: !,"Unable to file ",IBIN,"..",! Line Location: FILE+10
Function Call: WRITE	Prompt: "." Line Location: FILE+12
Function Call: WRITE	Prompt: ! Condition for execution: $X>40 Line Location: LIST+1
Function Call: WRITE	Prompt: ?40 Condition for execution: $X>2 Line Location: LIST+1
Function Call: WRITE	Prompt: ^(I) Line Location: LIST+1
Routine Call	DIE Line Location: FILE+12
Routine Call	DIC Line Location: REV+16
Routine Call	DIR Line Location: REV+3 REV+9

Name	Line Occurrences (* Changed, ! Killed)
^TMP("IBEMTF"	REV+17, REV+18!, FILE+2, LIST+1

Name	Line Occurrences
LIST	REV+6
REVQ	REV+3, REV+9

Name	Field # of Occurrence
^(	FILE+2, LIST+1

Name	Field # of Occurrence
DA	FILE+11*, FILE+12!
DD	FILE+3!
DIC	REV+13, REV+16!, FILE+3!, FILE+4, FILE+7
DIC("A"	REV+14*
DIC("S"	REV+15*
DIC(0	REV+13, FILE+4
DIE	FILE+11*, FILE+12!
DIR	REV+3!, REV+9!
DIR("?"	REV+2, REV+8
DIR("A"	REV+2, REV+7
DIR(0	REV+2, REV+7
>> DIRUT	REV+3, REV+9, REVQ
>> DLAYGO	FILE+4*
DO	FILE+3!
DR	FILE+3!, FILE+11*, FILE+12!
>> DUOUT	REV+3, REV+9, REVQ
>> I	LIST+1*
IBALR	FILE+1~, FILE+7*, FILE+10, FILE+11
>> IBDAT	FILE+7, FILE+11
>> IBFILE	FILE+11
>> IBHIT	REV+12, REV+14, REV+16
IBI	FILE+1~, FILE+2*, FILE+4, FILE+7
IBIN	FILE+1~, FILE+2*, FILE+10
>> IBINFO	REV+1, REV+13, REV+14, REV+15, REV+19, FILE+4, FILE+11, HACT+2, HACT+3
>> IBNUM	REV+1, REV+18*, REV+19, HACT+2, HACT+3
>> IBQ	REVQ*
>> X	FILE+4*
>> Y	REV+3, REV+9, REV+12, REV+16, REV+17, REV+18, FILE+10, FILE+11
>> Y(0	REV+17