Routine: ABMDLBL

Package	Total	Call Graph
Third Party Billing	4	^ABMDDIE BADDR^ABMDLBL1 ^ABMDLBLA $$EN^ABMVDF
Kernel	3	^%ZIS ^%ZISC (,KILL)^%ZTLOAD
VA Fileman	2	^DIC ^DIR

Entry Points

Name	Comments	DBIA/ICR reference
MARG	;
ZIS	;
GET	;Loop through ABM("INS") array
PRNT	;
BATCH	;LOOP THROUGH EXPORT BATCH
SELB	;
SELO
SELBO	;
QUE2	;
ENT	;EP - Entry Point for Taskman
XIT	;
SEL	;
LBL	;
SELBE	;
SELI	;

External References

Name	Field # of Occurrence
^%ZIS	ZIS+5
^%ZISC	GET+5
^%ZTLOAD	QUE2+6
KILL^%ZTLOAD	GET+7
^ABMDDIE	SELB+16
BADDR^ABMDLBL1	GET+3
^ABMDLBLA	ZIS+7
$$EN^ABMVDF	MARG+2, GET+4
^DIC	SELO+3, SELBO+3
^DIR	SEL+8, SEL+20, SEL+30, SELB+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"PRINT MAILING LABELS FOR:" Line Location: SEL+4
Function Call: WRITE	Prompt: ! Line Location: SEL+15
Function Call: WRITE	Prompt: ! Line Location: SEL+25
Function Call: WRITE	Prompt: !!?15,"(NOTE: Mailing Labels need to be loaded in the printer.)" Line Location: SEL+35
Function Call: WRITE	Prompt: !! Line Location: ZIS+1
Function Call: WRITE	Prompt: !,"Cannot Queue to Screen or Slave Printer!",! Line Location: QUE2+2
Function Call: WRITE	Prompt: $$EN^ABMVDF("IOF") Line Location: MARG+2
Function Call: WRITE	Prompt: ! Line Location: MARG+3
Function Call: WRITE	Prompt: $$EN^ABMVDF("IOF") Line Location: GET+4
Function Call: WRITE	Prompt: !?ABM("LM"),$P(ABM("ADD"),U,ABM("L")) Line Location: PRNT+3
Function Call: WRITE	Prompt: ! Line Location: SELI+5
Function Call: WRITE	Prompt: ! Line Location: SELI+7
Function Call: WRITE	Prompt: ! Line Location: SELB+1
Function Call: WRITE	Prompt: !! Line Location: SELBE+1
Routine Call	DIC Line Location: SELO+3 SELBO+3
Routine Call	DIR Line Location: SEL+8 SEL+20 SEL+30 SELB+7
Routine Call	%ZIS Line Location: ZIS+5

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ABMDTXST - [#9002274.6]	Classic Fileman Calls
^AUTNINS - [#9999999.18]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDBILL(	BATCH+3, BATCH+4, BATCH+6
^ABMDPARM(	MARG+1
^ABMDTXST - [#9002274.6]	SELB+12
^AUTNINS - [#9999999.18]	SELO+6, BATCH+5, BATCH+6
^AUTNINS("B"	BATCH+1

Label References

Name	Line Occurrences
@(	SEL+12
BATCH	SELB+16, SELBO+8
LBL	ZIS+7
PRNT	GET+3
SEL	QUE2+7, GET+6
SELBE	SELB+10
SELBO	SELBO+5, SELBO+9
SELO	SELO+5
XIT	SEL+10, SEL+13, SEL+22, SEL+32, ZIS+6
ZIS	QUE2+2

Naked Globals

Name	Field # of Occurrence
^(0	MARG+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %ZIS	ZIS+3*
>> %ZIS("A"	ZIS+2*
>> %ZIS("B"	ZIS+4*
ABM	SEL+1!, QUE2+5, MARG+3, XIT+1!, SELI+6, SELO, SELO+1, BATCH+2, BATCH+3*, BATCH+4 , BATCH+6
ABM("ADD"	PRNT+3
ABM("BAT"	SELB+13, SELBO+7, BATCH+3
ABM("C"	PRNT+3, SELI+2, SELBE+3*
ABM("COPIES"	SEL+23*, PRNT+3
ABM("DO"	SEL+11*, SEL+12
ABM("E"	SELO, SELO+1, SELBO+1, SELBO+2
ABM("I"	GET+1, GET+2, GET+3, PRNT+1, PRNT+2, BATCH+4*, BATCH+5, BATCH+6
ABM("INS"	SEL+13, GET+2, GET+3, SELO+6, BATCH+6
ABM("IP"	PRNT+1, PRNT+2*
ABM("J"	GET+1, GET+3
ABM("K"	GET+3*, PRNT+2
ABM("L"	PRNT+3*
ABM("LINES"	SEL+33*, PRNT+3
ABM("LM"	SEL+2, MARG+1, PRNT+3
ABM("M"	SELB+11, SELB+12, SELB+13, SELBE+6, SELBO+1, SELBO+2, SELBO+6
ABM("NBP"	BATCH+1*, BATCH+6
ABM("OPEN"	LBL+2
ABM("Q"	ENT+1*, GET+6
ABM("TM"	SEL+2, MARG+1, MARG+3
>> DA	SELB+13*
DIC	SELI+1!, SELI+3, SELO+7!, SELBE+2!, SELBE+4
DIC("A"	SELO+1, SELBO+2
DIC(0	SELI+4, SELO+2, SELBE+5*
>> DIE	SELB+14*
DIR	SEL+5!, SEL+9!, SEL+16!, SEL+21!, SEL+26!, SEL+31!, SELB+2!, SELB+8!
DIR("?"	SELB+6*
DIR("A"	SEL+7, SEL+18, SEL+28, SELB+4
DIR("B"	SEL+19, SEL+29, SELB+5*
DIR(0	SEL+6, SEL+17, SEL+27, SELB+3
>> DIROUT	SEL+10, SEL+22, SEL+32
>> DIRUT	SEL+10, SELB+9
>> DR	SELB+15*
>> DTOUT	SEL+22, SEL+32, SELI+6, SELO+4, SELBO+4
>> DUOUT	SEL+22, SEL+32, SELI+6, SELO+4, SELBO+4
DUZ(2	MARG+1, SELB+12, BATCH+3, BATCH+4, BATCH+6
IO	QUE2+2, LBL+1, GET+4
IO("Q"	ZIS+7, QUE2+1!
IO("S"	LBL+1, GET+4
IO(0	QUE2+2, GET+4
>> POP	ZIS+6
U	PRNT+3, SELO+6, BATCH+4, BATCH+6
>> X	SELI+6, SELO+4, SELBO+4
>> Y	SEL+11, SEL+23, SEL+33, SELO+5, SELO+6, SELB+10, SELBO+5, SELBO+7
>> ZTDESC	QUE2+4*
>> ZTQUEUED	GET+7
>> ZTRTN	QUE2+3*
>> ZTSAVE(	QUE2+5*

Customize PDF page

Package: Third Party Billing

Routine: ABMDLBL

Information

Source Information

Call Graph

Call Graph Total: 9

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: