Routine: ABMPSTRD

Package	Total	Call Graph
Kernel	3	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD
Third Party Billing	3	BENT^ABMDBDIC $$SDT^ABMDUTL COVRG^ABMPTSMT
VA Fileman	2	^DIC ^DIR

Entry Points

Name	Comments	DBIA/ICR reference
STMTS	; Reprint Statements
ZIS	;
DTRANGE	; by date range
OUT	;
APOFF	; by approving official
START	;
QUE2	;
ENT	;
XIT	;
SEL	; by individual bill
TSK	; Taskman Entry Point

External References

Name	Field # of Occurrence
^%ZIS	ZIS+7
HOME^%ZIS	ZIS+11
^%ZISC	OUT+1
^%ZTLOAD	QUE2+5
BENT^ABMDBDIC	SEL+9
$$SDT^ABMDUTL	DTRANGE+3
COVRG^ABMPTSMT	SEL+14, ENT+17
^DIC	APOFF+5
^DIR	START+8, DTRANGE+5, DTRANGE+10, SEL+21, SEL+34, SEL+39

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Re-Print Statements for:" Line Location: START+4
Function Call: WRITE	Prompt: !!,"NO APPROVING OFFICIAL SELECTED!" Line Location: APOFF+7
Function Call: WRITE	Prompt: ! Line Location: DTRANGE+1
Function Call: WRITE	Prompt: ! Line Location: DTRANGE+8
Function Call: WRITE	Prompt: !!,*7,"INPUT ERROR: Start Date is Greater than than the End Date, TRY AGAIN!",!! Line Location: DTRANGE+14
Function Call: WRITE	Prompt: !! Line Location: SEL+1
Function Call: WRITE	Prompt: !! Line Location: SEL+24
Function Call: WRITE	Prompt: !!?15,"(NOTE: " Line Location: ZIS+1
Function Call: WRITE	Prompt: "Plain Paper needs" Line Location: ZIS+2
Function Call: WRITE	Prompt: " to be loaded in the printer.)" Line Location: ZIS+3
Function Call: WRITE	Prompt: !! Line Location: ZIS+4
Function Call: WRITE	Prompt: !,"Cannot Queue to Screen or Slave Printer!",! Line Location: QUE2+1
Function Call: WRITE	Prompt: !,"(Job Queued, Task Number: ",ZTSK,")" Line Location: QUE2+6
Routine Call	%ZIS Line Location: ZIS+11
Routine Call	DIC Line Location: APOFF+5
Routine Call	DIR Line Location: START+8 DTRANGE+5 DTRANGE+10 SEL+21 SEL+34 SEL+39
Routine Call	%ZIS Line Location: ZIS+7

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VA(200 - [#200]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDBILL(	SEL+13, ENT+7, ENT+9, ENT+11, ENT+13, ENT+14, ENT+15
^ABMDCLM - [#9002274.3]	ENT+14

Label References

Name	Line Occurrences
@(	STMTS+2
DTRANGE	START+10, DTRANGE+12, DTRANGE+14
ENT	ZIS+15
OUT	QUE2+7, ENT+1, ENT+22
QUE2	ZIS+10
SEL	START+10, SEL+12, SEL+43
START	APOFF+7, DTRANGE+6
STMTS	ENT+5, ENT+21
XIT	START+10, SEL+10, SEL+11, ZIS+8
ZIS	DTRANGE+15, SEL+11, QUE2+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %ZIS	ZIS+6*
>> %ZIS("A"	ZIS+5*
>> ABM	QUE2+4*
>> ABM("E"	SEL+6*, SEL+7
>> ABMABEN	SEL+26
ABMBEN	ENT+16!, ENT+18
>> ABMBILLD	ENT+19
ABMISNB	SEL+15, ENT+16!
>> ABML(0	SEL+26, ENT+20
>> ABMMSG	SEL+26, SEL+29, SEL+37, SEL+40, SEL+42
ABMP	START+1!, XIT+1!
ABMP("BDFN"	SEL+11, SEL+12, SEL+13, SEL+42, ENT+4, ENT+8, ENT+9*, ENT+11, ENT+13, ENT+14 , ENT+15, ENT+20
ABMP("PAYED"	STMTS+1!
ABMP("PDFN"	SEL+13, ENT+15
ABMP("Q"	TSK+1*
ABMP("XMIT"	START+2*
ABMY	START+1!, SEL+5, SEL+6, SEL+7, SEL+11, SEL+12, ENT+2, ENT+3, ENT+4, XIT+1!
ABMY(	SEL+42, ENT+3, ENT+20
ABMY("AOFF"	APOFF+6*, APOFF+7, ENT+13
ABMY("DT"	DTRANGE+7, DTRANGE+13, DTRANGE+14, ENT+1, ENT+6, ENT+7
ABMY("TOT"	START+3*
>> ABMYDT	ENT+6, ENT+7, ENT+9
DIC	APOFF+1!, APOFF+2, SEL+2!, SEL+3
DIC("A"	APOFF+4, SEL+7
DIC("S"	SEL+8*
DIC(0	APOFF+3, SEL+4
DIQ	XIT+1!
DIR	START+5!, START+9!, DTRANGE+11!, SEL+16!, SEL+25!, SEL+34!, SEL+39!
DIR("A"	START+7, DTRANGE+2, DTRANGE+9, SEL+17, SEL+18, SEL+27, SEL+28, SEL+29, SEL+30, SEL+31 , SEL+37*
DIR("B"	DTRANGE+3, SEL+19, SEL+32*
DIR(0	START+6, DTRANGE+4, SEL+20, SEL+33, SEL+38*
>> DIROUT	START+10, DTRANGE+6, SEL+40
>> DIRUT	START+10, DTRANGE+6, DTRANGE+12, SEL+40
DT	DTRANGE+3
>> DTOUT	SEL+10, SEL+40
>> DUOUT	SEL+10, SEL+40
DUZ(2	SEL+13, ENT+7, ENT+9, ENT+11, ENT+13, ENT+14, ENT+15
IO	ZIS+9, ZIS+14, QUE2+1
IO("S"	ZIS+13
IO(0	ZIS+9, ZIS+12, QUE2+1
>> IOT	ZIS+9
>> POP	ZIS+8
U	SEL+13, ENT+11, ENT+13, ENT+14, ENT+15
X	APOFF+1!, SEL+25!, SEL+36!, SEL+40
Y	START+10, APOFF+1!, APOFF+6, DTRANGE+7, DTRANGE+13, SEL+22, SEL+25!, SEL+35, SEL+36!
>> ZTDESC	QUE2+3*
>> ZTRTN	QUE2+2*
>> ZTSAVE(	QUE2+4*
>> ZTSK	QUE2+6

Customize PDF page

Package: Third Party Billing

Routine: ABMPSTRD

Information

Source Information

Call Graph

Call Graph Total: 8

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: