Routine: RCDPLPS2

Package	Total	Call Graph
VA FileMan	5	DD^%DT NOW^%DTC ^DIC $$GET1^DIQ ^DIR
Accounts Receivable	4	$$ENDORPRT^RCDPEARL $$USERINIT^RCDPLPS1 ($$DISPTY,INFO)^RCDPRU PAUSE^RCRJRTR1
Kernel	4	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD ($$DT,$$FMTE,$$FMTH,$$HTFM)^XLFDT

Package	Total	Caller Graph
Accounts Receivable	1	RCDPE SUSPENSE AUDIT REPORT

Name	Comments	DBIA/ICR reference
EN	;
DTRNG()	;
DATES(RCBDATE,RCEDATE)	;
USER()	;
ARCLERK()	;
RCPT()	; Prompt user for single receipt number for which to display entries
REPORT(RCBEGDT,RCENDDT,RCUSER,RCPT,RCEXCEL,RCENDFLG)	; report to show link payment audit log in FMS
DQ	;
EXTRACT(RCENTRY,RCCT)	; Extract and store data for a single suspense audit file entry ; Input: RCENTRY = IEN of SUSPENSE AUDIT FILE entry (#344.71) ; Output: ^TMP("RCDPLPS2",$J) containing report data
H	; header

Name	Field # of Occurrence
DD^%DT	DQ+24, DQ+25, DQ+26
NOW^%DTC	DQ+26
^%ZIS	REPORT+4
HOME^%ZIS	REPORT+15
^%ZISC	DQ+69
^%ZTLOAD	REPORT+12
^DIC	RCPT+7
$$GET1^DIQ	EXTRACT+24, EXTRACT+25, EXTRACT+26, EXTRACT+43, EXTRACT+44, EXTRACT+45, H+9
^DIR	DATES+11, DATES+18, USER+8, ARCLERK+5
$$ENDORPRT^RCDPEARL	DQ+71
$$USERINIT^RCDPLPS1	EXTRACT+37
$$DISPTY^RCDPRU	EN+25
INFO^RCDPRU	EN+26
PAUSE^RCRJRTR1	DQ+55, DQ+58, DQ+64
$$DT^XLFDT	DATES+4
$$FMTE^XLFDT	DATES+17, EXTRACT+37
$$FMTH^XLFDT	DATES+6
$$HTFM^XLFDT	DATES+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Task number "_ZTSK_" has been queued." Line Location: REPORT+13
Function Call: WRITE	Prompt: !!,"Unable to queue this job." Line Location: REPORT+14
Function Call: WRITE	Prompt: $P(RCDATA,U,3)_U_$P(RCDATA,U,4)_U_$P(RCDATA,U)_U_$P(RCDATA,"^",5)_U_$P(RCDATA,U,6)_U Line Location: DQ+40
Function Call: WRITE	Prompt: $P(RCDATA,U,2)_U_$P(RCDATA,U,7)_U_$P(RCDATA,U,8),! Line Location: DQ+41
Function Call: WRITE	Prompt: "^^^^^^^^"_$P(RCDATA,U)_U_$P(RCDATA,U,2)_U_$P(RCDATA,U,3),! Line Location: DQ+47
Function Call: WRITE	Prompt: $P(RCDATA,U,3),?15,$P(RCDATA,U,4),?22,$P(RCDATA,U),?32,$J($P(RCDATA,"^",5),10,2) Line Location: DQ+51
Function Call: WRITE	Prompt: $P(RCDATA,U,3),?22,$P(RCDATA,U),?32,$J(RCMFST,10,2) Line Location: DQ+52
Function Call: WRITE	Prompt: ?43,$P(RCDATA,U,6),?51,$P(RCDATA,U,2),?56,$E($P(RCDATA,U,7),1,11) Line Location: DQ+54
Function Call: WRITE	Prompt: ! Line Location: DQ+57
Function Call: WRITE	Prompt: ?18,$P(RCDATA,U),?26,$J("$"_$J($P(RCDATA,U,2),0,2),10),?38,$E($P(RCDATA,U,3),1,40),! Line Location: DQ+63
Function Call: WRITE	Prompt: !!,$$ENDORPRT^RCDPEARL Line Location: DQ+71
Function Call: WRITE	Prompt: !,"RECEIPT#^TRANSACTION^DATE^AMOUNT^CLAIM^USER^DISPOSITION^REASON^CLAIMS^AMOUNT^COMMENT",! Line Location: H+3
Function Call: WRITE	Prompt: @IOF Line Location: H+5
Function Call: WRITE	Prompt: $C(13),"LINK PAYMENT TRACKING REPORT",?50,% Line Location: H+6
Function Call: WRITE	Prompt: !," FOR THE DATE RANGE: ",$S(RCPT="":RCDTDIS1_" TO "_RCDTDIS2,1:"") Line Location: H+7
Function Call: WRITE	Prompt: ?55,"FOR USER(S): ",$E($S(RCUSER="A":"ALL",1:$$GET1^DIQ(200,RCUSER_",",.01,"E")),1,10) Line Location: H+9
Function Call: WRITE	Prompt: ?55,"RECEIPT#: "_RCPT Line Location: H+11
Function Call: WRITE	Prompt: !,"RECEIPT#",?15,"TRANS#",?22,"DATE",?36,"AMOUNT",?43,"CLAIM",?51,"USER",?56,"DISPOSITION" Line Location: H+12
Function Call: WRITE	Prompt: !,?5,"REASON",?18,"CLAIMS" Line Location: H+13
Function Call: WRITE	Prompt: !,RCRJLINE,! Line Location: H+14
Routine Call	DIC Line Location: RCPT+7
Routine Call	DIR Line Location: DATES+11 DATES+18 USER+8 ARCLERK+5
Routine Call	%ZIS Line Location: REPORT+4
Routine Call	%ZIS Line Location: REPORT+15

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^VA(200 - [#200]	GET1^DIQ
^RCY(344 - [#344]	Classic Fileman Calls
^RCY(344.71 - [#344.71]	GET1^DIQ
344.711	GET1^DIQ
^PRCA(430 - [#430]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^RCY(344.71 - [#344.71]	DQ+9, DQ+17, DQ+19, EXTRACT+6, EXTRACT+41
^TMP("RCDPLPS2"	DQ+3!, DQ+31, DQ+33, DQ+34, DQ+37, DQ+45, DQ+46, DQ+61, DQ+62, DQ+68! , EXTRACT+29, EXTRACT+31, EXTRACT+35, EXTRACT+36!, EXTRACT+37, EXTRACT+40, EXTRACT+46, EXTRACT+47

Name	Line Occurrences
$$ARCLERK	USER+13
$$DTRNG	EN+14
$$RCPT	EN+9
$$USER	EN+21
DATES	DTRNG+3
DQ	REPORT+17
EXTRACT	DQ+10, DQ+20
H	DQ+29, DQ+55, DQ+58, DQ+64
REPORT	EN+29

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EN+3~, EN+31, DQ+1~, DQ+26, H+1~, H+5, H+6
%ZIS	REPORT+1~, REPORT+4*
D	RCPT+1~
DIC	RCPT+1~, RCPT+3*
DIC("A"	RCPT+5*
DIC("S"	RCPT+6*
DIC(0	RCPT+4*
DIR	DATES+2~, DATES+11!, DATES+18!, USER+2~, USER+8!, ARCLERK+2~, ARCLERK+5!
DIR("?"	DATES+9, DATES+16, USER+4, ARCLERK+4
DIR("A"	DATES+10, DATES+18, USER+7, ARCLERK+5
DIR("B"	DATES+17, USER+5
DIR(0	DATES+10, DATES+18, USER+6, ARCLERK+5
DIROUT	DATES+2~, USER+2~, ARCLERK+2~
DIRUT	DATES+2~, USER+2~, ARCLERK+2~
DTIME	EN+31
DTOUT	DATES+2~, DATES+12, DATES+19, USER+2~, USER+9, ARCLERK+2~, ARCLERK+6, RCPT+1~, RCPT+8
DUOUT	DATES+2~, DATES+12, DATES+19, USER+2~, USER+9, ARCLERK+2~, ARCLERK+6, RCPT+1~, RCPT+8
IENS	EXTRACT+39~, EXTRACT+42*, EXTRACT+43, EXTRACT+44, EXTRACT+45
IO	DQ+28, DQ+29
IO("Q"	REPORT+7, REPORT+15!
IO(0	DQ+28
IOF	H+5
IOSL	DQ+55, DQ+58, DQ+64
IOST	DQ+28
PAGE	DQ+1~, DQ+27, H+5
POP	REPORT+1~, REPORT+4
RCAMT	EXTRACT+4~, EXTRACT+22*, EXTRACT+37
RCBDATE	DATES~, DATES+6, DATES+12, DATES+13*, DATES+18
RCBEGDT	EN+3~, EN+6, EN+18, EN+29, REPORT~, DQ+16, DQ+24
RCCAMT	EXTRACT+39~, EXTRACT+44*, EXTRACT+46, EXTRACT+47
RCCLAIM	EXTRACT+39~, EXTRACT+43*, EXTRACT+46
RCCOM	EXTRACT+39~, EXTRACT+45*, EXTRACT+46
RCCT	DQ+4, DQ+10, DQ+20, DQ+32, DQ+33, DQ+34, DQ+37, DQ+45, DQ+46, DQ+61 , DQ+62, EXTRACT~, EXTRACT+16, EXTRACT+31, EXTRACT+37, EXTRACT+40, EXTRACT+46, EXTRACT+47
RCDATA	DQ+34, DQ+36, DQ+40, DQ+41, DQ+46, DQ+47, DQ+51, DQ+52, DQ+54, DQ+56 , DQ+62, DQ+63, EXTRACT+4~, EXTRACT+6, EXTRACT+9, EXTRACT+12, EXTRACT+19, EXTRACT+20, EXTRACT+21, EXTRACT+22 , EXTRACT+24, EXTRACT+25, EXTRACT+27
RCDATE	DQ+1~, DQ+16, DQ+17, DQ+19, DQ+30, DQ+31, DQ+33, DQ+34, DQ+37, DQ+45 , DQ+46, DQ+61, DQ+62, EXTRACT+4~, EXTRACT+19*, EXTRACT+31, EXTRACT+37, EXTRACT+40, EXTRACT+46, EXTRACT+47
RCDISP	REPORT+1~
RCDTDIS1	DQ+1~, DQ+24*, H+7
RCDTDIS2	DQ+1~, DQ+25*, H+7
RCEDATE	DATES~, DATES+6, DATES+19, DATES+20*
RCEND	DTRNG+3, DTRNG+7, USER+2~, ARCLERK+2~
RCENDDT	EN+3~, EN+6, EN+18, EN+29, REPORT~, DQ+16*, DQ+17, DQ+25
RCENDFLG	EN+3~, EN+6, EN+12, EN+15, EN+22, EN+29, EN+31, REPORT~, DQ+70, DQ+71
RCENTRY	DQ+1~, DQ+8, DQ+9, DQ+10, DQ+18, DQ+19, DQ+20, EXTRACT~, EXTRACT+6, EXTRACT+26 , EXTRACT+41, EXTRACT+42
RCEOB	EXTRACT+4~, EXTRACT+23, EXTRACT+24, EXTRACT+25*, EXTRACT+37
RCEXCEL	EN+3~, EN+25*, EN+26, EN+29, REPORT~, DQ+39, DQ+71, H+2
RCFLG	EXTRACT+4~, EXTRACT+29*, EXTRACT+31, EXTRACT+32, EXTRACT+33
RCLUSER	EXTRACT+4~, EXTRACT+12*, EXTRACT+13, EXTRACT+37
RCMFST	DQ+1~, DQ+37*, DQ+38, DQ+52
RCMULT	DQ+1~, DQ+36*, DQ+38, DQ+43, DQ+51, DQ+59
RCNOW	DQ+1~, DQ+26*, H+5
RCPT	EN+3~, EN+6, EN+9, EN+10, EN+12, EN+29, REPORT~, DQ+7, DQ+9, H+7 , H+8, H+11
RCRANGE	EN+3~, EN+14*, EN+15, EN+18
RCREASON	EXTRACT+4~, EXTRACT+27*, EXTRACT+34, EXTRACT+37
RCRECTDA	EXTRACT+4~, EXTRACT+20*, EXTRACT+29, EXTRACT+31, EXTRACT+35, EXTRACT+37
RCRJFLAG	DQ+1~, DQ+31, DQ+33, DQ+45, DQ+55, DQ+58, DQ+61, DQ+64, DQ+70
RCRJLINE	DQ+1~, DQ+27*, H+14
RCSPL	DQ+44, DQ+45, DQ+46, DQ+60, DQ+61, DQ+62, EXTRACT+39~, EXTRACT+40, EXTRACT+41, EXTRACT+42 , EXTRACT+46
RCSTART	DTRNG+3, DTRNG+6, DTRNG+7, DTRNG+8, USER+2~, ARCLERK+2~
RCSTATUS	EXTRACT+4~, EXTRACT+26*, EXTRACT+37
RCTODAY	DATES+2~, DATES+4*, DATES+6, DATES+17, DATES+18
RCTRANDA	EXTRACT+4~, EXTRACT+21*, EXTRACT+29, EXTRACT+31, EXTRACT+35, EXTRACT+37
RCUSER	EN+3~, EN+6, EN+21, EN+22, EN+29, REPORT~, EXTRACT+13, H+9
RCX	EXTRACT+4~, EXTRACT+33*, EXTRACT+36
RCX2	EXTRACT+4~, EXTRACT+33*, EXTRACT+36
RCY	EXTRACT+4~, EXTRACT+33*, EXTRACT+34
RETURN	RCPT+1~, RCPT+2, RCPT+9, RCPT+10
RNGFLG	DATES+2~, USER+2~, ARCLERK+2~
SCREEN	DQ+1~, DQ+28*, DQ+55, DQ+58, DQ+64, H+5
U	EN+18, RCPT+9, DQ+36, DQ+40, DQ+41, DQ+47, DQ+51, DQ+52, DQ+54, DQ+56 , DQ+63, EXTRACT+12, EXTRACT+19, EXTRACT+20, EXTRACT+21, EXTRACT+22, EXTRACT+24, EXTRACT+25, EXTRACT+27, EXTRACT+33 , EXTRACT+35, EXTRACT+37, EXTRACT+46
X	DATES+2~, USER+2~, ARCLERK+2~, RCPT+1~
Y	DATES+2~, DATES+12, DATES+13, DATES+19, DATES+20, USER+2~, USER+9, USER+10, ARCLERK+2~, ARCLERK+6 , ARCLERK+7, RCPT+1~, RCPT+9, DQ+1~, DQ+24, DQ+25, DQ+26*, EXTRACT+4~
ZTDESC	REPORT+8~, REPORT+10*
ZTQUEUED	REPORT+8~, DQ+28
ZTRTN	REPORT+8~, REPORT+9*
ZTSAVE	REPORT+8~
ZTSAVE("RC*"	REPORT+11*
ZTSAVE("VAUTD"	REPORT+11*
ZTSK	REPORT+8~, REPORT+13, REPORT+15!

Customize PDF page

Package: Accounts Receivable

Routine: RCDPLPS2

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: