Routine: PRCAPCL

Information

PRCAPCL ;WASH-ISC@ALTOONA,PA/NYB - Print Bill Status Report ;8/19/94 10:21 AM

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
VA FileMan	4	NOW^%DTC ^DIC $$GET1^DIQ ^DIR
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD
Accounts Receivable	2	$$DATE^RCEVUTL1 $$REFST^RCRCUTL
Registration	1	(DEM,KVAR)^VADPT

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 3

Package	Total	Caller Graph
Accounts Receivable	2	PRCA BILL STATUS LISTING PRCAL STATUS LIST
Kernel	1	^DIC(19

Entry Points

Name	Comments	DBIA/ICR reference
V	;;4.5;Accounts Receivable;72,63,143,154,315,342,368,391,389;Mar 20, 1995;Build 36
TOP	;
Q2
PRNTL	;
PQ
HDR	;
DT
STAT(SER)
ST
SUST	;Look for suspended type for a suspended bill PRCA4.5315/DRF
STHDR	;Display Suspended Type PRCA4.5315/DRF
TSK	;
Q1
STYPSEL()	; get suspension type(s) selection PRCA4.5391
STYPSEL1	; Prompt for suspension type selection
ANOTHER()	; "Select Another" prompt PRCA4.5391 ; returns 1, if response was "YES", returns 0 otherwise

External References

Name	Field # of Occurrence
NOW^%DTC	V+9
^%ZIS	TSK+3
^%ZISC	Q1
^%ZTLOAD	TSK+9
^DIC	ST+7, STYPSEL1+2
$$GET1^DIQ	STHDR+2
^DIR	TOP+1, STYPSEL+12, ANOTHER+5
$$DATE^RCEVUTL1	STAT+3
$$REFST^RCRCUTL	V+27
DEM^VADPT	PRNTL+11
KVAR^VADPT	PRNTL+11

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $G(DP2),?15,$S(RCDOJ&$G(BN):$G(BN)_"r",1:$G(BN)),?30,$P(NDE,U,2),?45,$P(NDE,U,3) Line Location: V+28
Function Call: WRITE	Prompt: ?65,$J($P(NDE,U,4),9,2),! Line Location: V+29
Function Call: WRITE	Prompt: !!!,"SUBTOTAL: ",$J(PRCATOT2,10,2),!,"SUBCOUNT: ",$J(PRCAT2,10),?30 Line Location: V+34
Function Call: WRITE	Prompt: !! Line Location: V+38
Function Call: WRITE	Prompt: @IOF Line Location: HDR+1
Function Call: WRITE	Prompt: !,"BILL STATUS LISTING REPORT" Line Location: HDR+3
Function Call: WRITE	Prompt: ?40,$G(TDT),?72,$G(PAGE) Line Location: HDR+4
Function Call: WRITE	Prompt: !,"Sort Criteria for Date Last Updated Range: "_SC1_" to "_SC2 Line Location: HDR+5
Function Call: WRITE	Prompt: !,"Date Last",!," Updated",?15,"Bill no.",?30,"Category" Line Location: HDR+6
Function Call: WRITE	Prompt: ?50,"Debtor",?68,"Balance",! Line Location: HDR+7
Function Call: WRITE	Prompt: X,! Line Location: HDR+8
Function Call: WRITE	Prompt: !,?5,"Status: ",$P($S($D(^PRCA(430.3,STAT,0)):^(0),1:""),U) Line Location: HDR+9
Function Call: WRITE	Prompt: !! Line Location: HDR+11
Function Call: WRITE	Prompt: ! Line Location: STAT+0
Function Call: READ	Variable: X Timeout: DTIME Line Location: ST+4
Function Call: WRITE	Prompt: !!,"Enter 'ALL' for all status types.",! Line Location: ST+8
Function Call: WRITE	Prompt: ! Line Location: STHDR+1
Function Call: WRITE	Prompt: ?30,"Suspend Type: ",$$GET1^DIQ(433.001,ST_",",.02),!! Line Location: STHDR+2
Function Call: WRITE	Prompt: *7,!,"Report should be QUEUED it could take some time to run!" Line Location: TSK+2
Function Call: WRITE	Prompt: ! Line Location: STYPSEL+7
Function Call: WRITE	Prompt: ! Line Location: STYPSEL1+1
Function Call: WRITE	Prompt: ! Line Location: ANOTHER+3
Routine Call	DIC Line Location: ST+7 STYPSEL1+2
Routine Call	DIR Line Location: TOP+1 STYPSEL+12 ANOTHER+5
Routine Call	%ZIS Line Location: TSK+3

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^PRCA(430.3 - [#430.3]	Classic Fileman Calls
^PRCA(433.001 - [#433.001]	Classic Fileman Calls, GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	V+9, V+26, DT, STAT+7, STAT+8
^PRCA(430 - [#430]	V+17, V+27, PRNTL+2, PRNTL+13, PRNTL+14, PRNTL+17
^PRCA(430.2 - [#430.2]	PRNTL+9
^PRCA(430.3 - [#430.3]	V+10, V+12, PRNTL+14, HDR+9
^PRCA(433 - [#433]	SUST+3, SUST+4, SUST+5, SUST+6
^RCD(340 - [#340]	PRNTL+10
^TMP($J	V+21, V+23, V+24, V+25, V+33!, PRNTL+16*, STAT+2!
^VA(200 - [#200]	PRNTL+19

Label References

Name	Line Occurrences
$$ANOTHER	STYPSEL1+5
$$STYPSEL	ST+9
HDR	V+16, V+18, V+19, V+32
PQ	PRNTL+2, PRNTL+3
PRCAPCL	TSK+4
PRNTL	V+17
Q1	STAT+11, TSK+3, TSK+4
ST	STAT+9, ST+8, ST+9, ST+10
STHDR	V+22, V+32
STYPSEL1	STYPSEL1+5
SUST	PRNTL+5
TOP	V+18, V+19, V+32, V+38, PRNTL+22
TSK	STAT+11

Naked Globals

Name	Field # of Occurrence
^(0	PRNTL+2, PRNTL+9, PRNTL+10, PRNTL+12, HDR+9
^(7	PRNTL+13

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	V+9
>> %ZIS	TSK+3*
BAL	V+6~, PRNTL+1~, PRNTL+15*, PRNTL+16
BEG	PRNTL+4, PRNTL+6, STAT+1~, STAT+6, STAT+7
BN	V+6~, V+24, V+25, V+27, V+28, V+33, PRNTL+3, PRNTL+16
CAT	V+6~, PRNTL+9*, PRNTL+16
CH	STAT+1~
DAT	V+20, PRNTL+4, STAT+1~, STAT+3*, STAT+4, STAT+6
DEAD	V+6~, PRNTL+1~, PRNTL+11*, PRNTL+16
DEBT	V+6~, PRNTL+1~, PRNTL+12*, PRNTL+16
DFN	PRNTL+1~, PRNTL+11*
DIC	ST~, ST+1, STYPSEL+4~, STYPSEL+16
DIC("A"	STYPSEL+15*
DIC("S"	ST+2*
DIC(0	ST+1, STYPSEL+14
DIR	V+6~, STYPSEL+4~, ANOTHER+2~
DIR("?"	STYPSEL+10*
DIR("A"	STYPSEL+8, STYPSEL+9, ANOTHER+4*
DIR("B"	STYPSEL+11, ANOTHER+4
DIR(0	TOP+1, STYPSEL+11, ANOTHER+4*
DIROUT	V+6~, V+14, V+17, V+19, V+21, V+23, V+24, V+32, V+34, V+36 , TOP+1, STYPSEL+4~, ANOTHER+2~
DIRUT	STYPSEL+4~, STYPSEL+12, ANOTHER+2~, ANOTHER+5
DP	V+6~, V+23, V+24, V+25, V+26, V+33, PRNTL+3, PRNTL+6, PRNTL+7, PRNTL+16
DP2	V+6~, V+20, V+26, V+28, DT*
DTIME	ST+4
DTOUT	STYPSEL+4~, STYPSEL1+3, ANOTHER+2~
DUOUT	V+6~, V+14, V+17, V+19, V+21, V+23, V+24, V+32, V+34, V+36 , TOP+1, STYPSEL+4~, STYPSEL1+3, ANOTHER+2~
END	PRNTL+4, PRNTL+7, STAT+1~, STAT+6, STAT+8
HDR	V+6~, V+8, HDR+10, STHDR+1, STHDR+3*
I	STAT+1~
IO	TSK+4
IO("Q"	TSK+4
IO(0	TSK+4
IOF	V+40, HDR+1
IOM	HDR+8
IOP	V+6~
IOSL	V+18, V+19, V+32, PRNTL+22
IOST	V+40, TOP+1, PRNTL+22, HDR+1
N430	V+6~
NDE	V+15~, V+25*, V+28, V+29, V+30, V+31
PAGE	V+7~, V+8, HDR+1, HDR+2, HDR+4
POP	V+7~, TSK+1~, TSK+3*
PRCAE	V+7~, V+17*, PRNTL+2, PRNTL+13, PRNTL+14, PRNTL+17, SUST+3
PRCAT	V+7~, V+8, V+31, V+39
PRCAT2	V+7~, V+8, V+30, V+34, V+35*, PRNTL+16
PRCATOT	V+7~, V+8, V+31, V+39
PRCATOT2	V+7~, V+8, V+30, V+34, V+35*, PRNTL+16
PRCATX	SUST+2~, SUST+3, SUST+4, SUST+5, SUST+6
PRCY	V+7~, PRNTL+3, PRNTL+9, PRNTL+10, PRNTL+11, PRNTL+12, PRNTL+13, PRNTL+14, PRNTL+15
PRSELST	PRNTL+8, STAT+1~, STAT+5, ST+9
RCDOJ	V+7~, V+27*, V+28
RES	STYPSEL+5~, STYPSEL+6, STYPSEL+12, STYPSEL+13, STYPSEL1+3, STYPSEL1+4, STYPSEL1+6
SC1	HDR+5, STAT+1~, STAT+7*
SC2	HDR+5, STAT+1~, STAT+8*
SER	V+17, PRNTL+17, STAT~, ST+7*
ST	V+7~, V+21, V+23, V+24, V+25, V+33, PRNTL+1~, PRNTL+5, PRNTL+8, PRNTL+16 , SUST+2, SUST+3, SUST+6, STHDR+2
STAT	V+10, V+14, V+17, V+22, V+32, V+37, V+38, PRNTL+5, PRNTL+8, PRNTL+14 , PRNTL+17, HDR+9, STAT+1~, STAT+10, ST+4, ST+5, ST+7, ST+9, ST+10
STAT(	V+12, V+14, V+37, V+38, ST+9
STAT(""	ST+3, ST+5
STT	V+7~, V+10*, V+11, V+12, STAT+1~
TDT	V+7~, V+9*, HDR+4
U	V+28, V+29, V+30, V+31, PRNTL+3, PRNTL+4, PRNTL+9, PRNTL+10, PRNTL+15, PRNTL+16 , PRNTL+18, PRNTL+19, PRNTL+20, HDR+9, STAT+6, SUST+5, SUST+6, STYPSEL1+4
VA	PRNTL+11!
VADM	PRNTL+11!
VADM(6	PRNTL+11
X	V+17, V+34, V+39, TOP+1, PRNTL+2, PRNTL+3, PRNTL+10, HDR+8, ST~, ST+4* , ST+5*, ST+6, ST+8, STYPSEL+4~, ANOTHER+2~
XX	STAT+1~
Y	V+9, V+26!, PRNTL+17, PRNTL+18, PRNTL+19, PRNTL+20, DT, STAT+7, STAT+8, ST~ , ST+3, ST+7, STYPSEL+4~, STYPSEL+13, STYPSEL1+3, STYPSEL1+4, ANOTHER+2~, ANOTHER+6
>> ZTDESC	TSK+9*
>> ZTRTN	TSK+5*
>> ZTSAVE("BEG"	TSK+6*
>> ZTSAVE("DAT"	TSK+6*
>> ZTSAVE("END"	TSK+6*
>> ZTSAVE("PRSELST"	TSK+8*
>> ZTSAVE("SC1"	TSK+7*
>> ZTSAVE("SC2"	TSK+7*
>> ZTSAVE("SER"	TSK+6*
>> ZTSAVE("STAT"	TSK+7*
>> ZTSAVE("STAT("	TSK+7*
ZTSK	TSK+1~

Customize PDF page

Package: Accounts Receivable