Routine: ABMDEERL

Package	Total	Call Graph
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD
Third Party Billing	3	ERRIN^ABMDECK ^ABMDEVAR $$EN^ABMVDF
VA Fileman	2	^DIC ^DIR

Package

Total

Call Graph

ERRIN^ABMDECK ^ABMDEVAR $$EN^ABMVDF

^DIC ^DIR

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: CLM2+0
Function Call: WRITE	Prompt: !! Line Location: ZIS+0
Function Call: WRITE	Prompt: !!,"As specified in the 3P Site Parameters File FORCED QUEUEING is in effect!",! Line Location: ZIS+2
Function Call: WRITE	Prompt: !,"Cannot Queue to Screen or Slave Printer!",! Line Location: QUE+0
Function Call: WRITE	Prompt: $$EN^ABMVDF("IOF") Line Location: BEGIN+6
Routine Call	DIC Line Location: CLMD
Routine Call	DIR Line Location: CLM2
Routine Call	%ZIS Line Location: ABMDEERL+3 ZIS ENT+1

FileNo	Call Tags
^ABMDCLM - [#9002274.3]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^ABMDCLM - [#9002274.3]	DFN
^ABMDPARM(	ZIS+2

Name	Field # of Occurrence
^(0	DFN

Name	Field # of Occurrence
%P	CLM2!
>> %ZIS	ZIS*
>> %ZIS("A"	ZIS*
>> %ZIS("B"	ZIS*
ABM	CLM2!, QUE+1, QUE+2, XIT!
ABMD	EXT!, XIT!
ABMD("CTR"	BEGIN*
ABMD("QUEON"	ENT+2*
ABMP	CLM2!, XIT!
ABMP("BLK"	DFN+1*
ABMP("CDFN"	CLMD+1, CLMD+2, DFN, BEGIN+4
ABMP("ERROR L	IST" , BEGIN+3*
ABMP("GL"	BEGIN+4*
ABMP("HEAD2"	EXT+1*
ABMP("HI"	DFN+1*
ABMP("IOP"	ZIS+1*, ENT+1
ABMP("MULT"	CLM2+2!
ABMP("NI"	DFN+1*
ABMP("PDFN"	DFN*
ABMP("PG"	EXT+1*
ABMP("QUEON"	ENT+2*, BEGIN+8
ABMP("REVOF"	DFN+1*
ABMP("REVON"	DFN+1*
ABMP("VTYP"	DFN*
DIC	CLM2!, CLMD*!
DIC(0	CLMD*
DIQ	XIT!
DIR	CLM2!, XIT!
DIR("?"	CLM2*
DIR("A"	CLM2*
DIR(0	CLM2*
DIRUT	CLM2+1, XIT!
DTOUT	XIT!
DUZ(2	DFN, ZIS+2
IO	ABMDEERL+3, ZIS+2, QUE, ENT+1, BEGIN+1, BEGIN+6
IO("Q"	ZIS+1, QUE!, XIT!
IO("S"	ZIS+2
IO(0	ZIS+2, QUE, BEGIN+6
IOF	ABMDEERL+3
ION	ZIS+1
>> IOP	ABMDEERL+3, ENT+1
IOST	ABMDEERL+3, ZIS+2, BEGIN+6
POP	ZIS, XIT!
U	DFN, EXT+1*, ZIS+2
>> Y	CLMD+1, CLMD+2
>> ZTDESC	QUE+1*
>> ZTRTN	QUE+1*
>> ZTSAVE(	QUE+1, QUE+2
ZTSK	XIT!

Information