Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: RCRJRDEP

Package: Accounts Receivable

Routine: RCRJRDEP


Information

RCRJRDEP ;WISC/RFJ-Deposit Reconciliation Report ;9/7/10 8:19am

Source Information

Source file <RCRJRDEP.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Accounts Receivable 5 ($$ADDPTEDT,$$PTACCT)^PRCAACC  $$SITE^RCMSITE  PAUSE^RCRJRTR1  $$SUMMARY^RCRJRTRA  $$GETDESC^RCXFMSPR  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA FileMan 2 DD^%DT  NOW^%DTC  
Generic Code Sheet 1 DATA^GECSSGET  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Accounts Receivable 1 PRCA DEPOSIT RECON REPORT  

Entry Points

Name Comments DBIA/ICR reference
DQ ; report (queue) starts here
Q
H ; report heading
H1 ; print line heading
CHAMPVA(RECEIPDA) ; return dollars for champva
FEE(RECEIPDA) ; return dollars for Fee Basis PRCA*4.5*310/DRF 12/9/2015
CHKIEN(RCCAT) ; return true if AR CATEGORIES are Non-VA Care (PRCA*4.5*338)

External References

Name Field # of Occurrence
DD^%DT DQ+40, DQ+49, DQ+51
NOW^%DTC DQ+40
^%ZIS RCRJRDEP+33
^%ZISC Q
^%ZTLOAD RCRJRDEP+34
DATA^GECSSGET DQ+46
$$ADDPTEDT^PRCAACC DQ+93, DQ+94, DQ+96
$$PTACCT^PRCAACC DQ+68
$$SITE^RCMSITE DQ+5
PAUSE^RCRJRTR1 DQ+48, DQ+59, DQ+71, DQ+85, DQ+90, DQ+96
$$SUMMARY^RCRJRTRA RCRJRDEP+30
$$GETDESC^RCXFMSPR DQ+97

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This option will print the Deposit Reconciliation Report. The report will"
  • Line Location: RCRJRDEP+4
Function Call: WRITE
  • Prompt: !,"display the data on the code sheets sent to FMS on the CR document. Only"
  • Line Location: RCRJRDEP+5
Function Call: WRITE
  • Prompt: !,"deposits processed after patch PRCA*4.5*90 was installed can be displayed."
  • Line Location: RCRJRDEP+6
Function Call: WRITE
  • Prompt: !,"Select the starting and ending FMS Document Number without the station"
  • Line Location: RCRJRDEP+7
Function Call: WRITE
  • Prompt: !,"number, example: K8A0346."
  • Line Location: RCRJRDEP+8
Function Call: WRITE
  • Prompt: !?5,"The CR DOCUMENT should be 7 characters in length (example: K8A0804)."
  • Line Location: RCRJRDEP+16
Function Call: WRITE
  • Prompt: !," END WITH CR DOCUMENT: ",DEFAULT,"// "
  • Line Location: RCRJRDEP+20
Function Call: WRITE
  • Prompt: !?5,"The CR DOCUMENT should be 7 characters in length (example: K8A0804)."
  • Line Location: RCRJRDEP+24
Function Call: WRITE
  • Prompt: !?5,"The END CR DOCUMENT should be after (in sequence) the start document."
  • Line Location: RCRJRDEP+26
Function Call: WRITE
  • Prompt: !
  • Line Location: RCRJRDEP+33
Function Call: WRITE
  • Prompt: !!,"<*> please wait <*>"
  • Line Location: RCRJRDEP+37
Function Call: WRITE
  • Prompt: !,"FMS DOCUMENT: ",FMSDOCID,?34,"DEPOSIT TICKET: ",$P(RCDATA,"^"),?62,"DATE: ",Y
  • Line Location: DQ+50
Function Call: WRITE
  • Prompt: !?41,"RECEIPT: ",$P(RCDATA,"^",4)
  • Line Location: DQ+51
Function Call: WRITE
  • Prompt: ?62,"DATE: ",Y
  • Line Location: DQ+51
Function Call: WRITE
  • Prompt: !?1,$P(LINEDATA,"^",3),?6,$P(LINEDATA,"^",4),?11,$P(LINEDATA,"^",6),?19,$P(LINEDATA,"^",10)
  • Line Location: DQ+60
Function Call: WRITE
  • Prompt: ?30,$J($P(LINEDATA,"^",18),8),?40,$E($P(LINEDATA,"^",25),4,10),?50,$J($P(LINEDATA,"^",20),10,2),?64,$J($P(LINEDATA,"^",23),9)
  • Line Location: DQ+61
Function Call: WRITE
  • Prompt: !?23,"LINE TOTAL/DOCUMENT TOTAL: ",$J(DOCTOTAL,10,2)
  • Line Location: DQ+72
Function Call: WRITE
  • Prompt: !?35,"CHAMPVA TOTAL: ",$J(CHAMPVA,10,2)
  • Line Location: DQ+77
Function Call: WRITE
  • Prompt: !?25,"NON-VA PORTION OF TOTAL: ",$J(FEE,10,2)
  • Line Location: DQ+78
Function Call: WRITE
  • Prompt: !?35,"DEPOSIT TOTAL: ",$J(TOTAL,10,2)
  • Line Location: DQ+79
Function Call: WRITE
  • Prompt: !," WARNING: TOTALS DO NOT MATCH, CHECK THE DEPOSIT: **********"
  • Line Location: DQ+80
Function Call: WRITE
  • Prompt: !," WARNING: TOTALS DO NOT MATCH, CHECK THE DEPOSIT: **********"
  • Line Location: DQ+81
Function Call: WRITE
  • Prompt: !
  • Line Location: DQ+82
Function Call: WRITE
  • Prompt: !!,"TOTAL DEPOSITS BY FUND:"
  • Line Location: DQ+88
Function Call: WRITE
  • Prompt: !!,"TOTAL DEPOSITS BY FUND:"
  • Line Location: DQ+90
Function Call: WRITE
  • Prompt: !?5,"FUND: ",FUND,?20,$J(FUNDTOTL(FUND),10,2)
  • Line Location: DQ+91
Function Call: WRITE
  • Prompt: !!,"TOTAL DEPOSITS BY REVENUE SOURCE CODE FOR THE SERIES OF FUNDS 5287.1,5287.3,5287.4:"
  • Line Location: DQ+93
Function Call: WRITE
  • Prompt: !!,"TOTAL DEPOSITS BY REVENUE SOURCE CODE FOR THE SERIES OF FUNDS 528701,528703,528704,528711,528713,528714:"
  • Line Location: DQ+94
Function Call: WRITE
  • Prompt: !!,"TOTAL DEPOSITS BY REVENUE SOURCE CODE FOR THE SERIES OF ACCRUED 5287 FUNDS "_$S(DT<$$ADDPTEDT^PRCAACC():"(.1,.3,.4,.9):",1:"(01,03,04,09,11):")
  • Line Location: DQ+96
Function Call: WRITE
  • Prompt: !?5,"RSC: ",RSC,?17,$$GETDESC^RCXFMSPR(RSC),?70,$J(RSCTOTL(RSC),10,2)
  • Line Location: DQ+97
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: H+1
Function Call: WRITE
  • Prompt: $C(13),"DEPOSIT RECONCILIATION REPORT",?(80-$L(%)),%
  • Line Location: H+3
Function Call: WRITE
  • Prompt: !," START WITH DEPOSIT: ",$S(RCRJSTRT="":"**FIRST**",1:RCRJSTRT)," END WITH DEPOSIT: ",$S(RCRJEND="zzzzzzz":"**LAST**",1:RCRJEND),?65,$J("TYPE: "_$S(RCRJSUMM=1:"SUMMARY",1:"DETAILED"),15)
  • Line Location: H+4
Function Call: WRITE
  • Prompt: !,RCRJLINE
  • Line Location: H+5
Function Call: WRITE
  • Prompt: !,"LINE",?5,"BFY",?11,"FUND",?20,"RSC",?30,"PROVIDER",?43,"BILL",?54,"AMOUNT",?64,"TRAN TYPE"
  • Line Location: H1+1
Routine Call
  • %ZIS
  • Line Location:
    • RCRJRDEP+33

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRCA(430 - [#430] CHAMPVA+7, FEE+6
^PRCA(433 - [#433] CHAMPVA+6, CHAMPVA+7, CHAMPVA+9, FEE+5, FEE+6, FEE+8
^RCY(344 - [#344] DQ+16, DQ+17, DQ+25, DQ+26, DQ+30, DQ+33, DQ+35, CHAMPVA+2, FEE+2
^RCY(344.1 - [#344.1] DQ+12, DQ+13, DQ+21, DQ+35
^TMP($J DQ+2!, DQ+21*, DQ+35*, DQ+43, DQ+44, Q+1!

Label References

Name Line Occurrences
$$CHAMPVA DQ+18, DQ+31
$$CHKIEN FEE+7
$$FEE DQ+19, DQ+32
H DQ+41, DQ+48, DQ+59, DQ+71, DQ+86, DQ+90, DQ+96
H1 DQ+52, DQ+59
Q DQ+84, DQ+85, DQ+92, DQ+98

Naked Globals

Name Field # of Occurrence
^( DQ+17, DQ+30

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% RCRJRDEP+11~, DQ+1~, DQ+40, H+2*, H+3, CHAMPVA+1~, CHAMPVA+10*, FEE+1~, FEE+9*
%H RCRJRDEP+11~, DQ+1~
%I RCRJRDEP+11~, DQ+1~
>> %ZIS RCRJRDEP+33*
CATEGORY RCRJRDEP+11~, CHAMPVA+1~, CHAMPVA+7*, CHAMPVA+8, FEE+1~, FEE+6*, FEE+7
CHAMPVA RCRJRDEP+11~, DQ+1~, DQ+15*, DQ+18*, DQ+21, DQ+31*, DQ+35, DQ+75*, DQ+77, DQ+81
DA RCRJRDEP+11~, DQ+1~, DQ+17*, DQ+30*
DEFAULT RCRJRDEP+10~, RCRJRDEP+19*, RCRJRDEP+20, RCRJRDEP+25
DEPOSDA RCRJRDEP+11~, DQ+1~, DQ+13*, DQ+16, DQ+21, DQ+33*, DQ+35
DIQ2 DQ+1~
DOCTOTAL RCRJRDEP+11~, DQ+1~, DQ+53*, DQ+56*, DQ+72, DQ+81
DT DQ+93, DQ+94, DQ+96
DTIME RCRJRDEP+14, RCRJRDEP+20, DQ+99
FEE RCRJRDEP+11~, DQ+1~, DQ+15*, DQ+19*, DQ+21, DQ+32*, DQ+35, DQ+76*, DQ+78
FMSDOCID RCRJRDEP+11~, DQ+1~, DQ+11*, DQ+12*, DQ+13, DQ+21, DQ+24*, DQ+25*, DQ+26, DQ+35
, DQ+43*, DQ+44, DQ+46, DQ+50
FUND RCRJRDEP+11~, DQ+1~, DQ+63*, DQ+64*, DQ+65, DQ+68, DQ+89*, DQ+91
FUNDTOTL RCRJRDEP+11~, DQ+1~
FUNDTOTL( DQ+65*, DQ+89, DQ+91
GECSDATA RCRJRDEP+11~, DQ+1~, DQ+45!, DQ+54, DQ+55
GECSDATA( DQ+54, DQ+55
IO RCRJRDEP+11~, DQ+38, DQ+41
IO("Q" RCRJRDEP+34!
IO(0 DQ+38
IOF RCRJRDEP+11~, H+1
IOSL DQ+48, DQ+59, DQ+71, DQ+90, DQ+96
IOST DQ+38
LINEDA DQ+1~, DQ+54*, DQ+55
LINEDATA DQ+1~, DQ+55*, DQ+56, DQ+57, DQ+60, DQ+61, DQ+63, DQ+65, DQ+67, DQ+68
NOW DQ+1~, DQ+40*, H+2
PAGE DQ+1~, DQ+40*, H+1, H+2*
>> POP RCRJRDEP+33
RCCAT CHKIEN~, CHKIEN+1, CHKIEN+3, CHKIEN+4
RCDATA DQ+1~, DQ+44*, DQ+49, DQ+50, DQ+51, DQ+74, DQ+75, DQ+76
RCRJEND RCRJRDEP+10~, RCRJRDEP+22*, RCRJRDEP+23*, RCRJRDEP+25*, RCRJRDEP+26, DQ+6, H+4
RCRJFLAG DQ+1~, DQ+43, DQ+47, DQ+48, DQ+54, DQ+59, DQ+70, DQ+71, DQ+84, DQ+85
, DQ+89, DQ+90, DQ+92, DQ+95, DQ+96, DQ+98
RCRJFXIT RCRJRDEP+10~, RCRJRDEP+13, RCRJRDEP+15*, RCRJRDEP+21*, RCRJRDEP+27*, RCRJRDEP+28
RCRJLAST DQ+1~, DQ+6*, DQ+12, DQ+25
RCRJLINE DQ+1~, DQ+39*, H+5
RCRJSTRT RCRJRDEP+10~, RCRJRDEP+17*, RCRJRDEP+19, RCRJRDEP+26, DQ+11, DQ+24, H+4
RCRJSUMM RCRJRDEP+10~, RCRJRDEP+30*, DQ+41, DQ+47, DQ+58, DQ+69, DQ+85, H+4
RECEIPDA DQ+1~, DQ+16*, DQ+17, DQ+18, DQ+19, DQ+26*, DQ+30, DQ+31, DQ+32, DQ+33
, DQ+35, CHAMPVA~, CHAMPVA+2, FEE~, FEE+2
RECEIPT CHAMPVA+1~, CHAMPVA+2*, CHAMPVA+3, CHAMPVA+6, FEE+1~, FEE+2*, FEE+3, FEE+5
RSC DQ+1~, DQ+67*, DQ+68, DQ+95*, DQ+97
RSCTOTL DQ+1~
RSCTOTL( DQ+68*, DQ+95, DQ+97
SCREEN DQ+1~, DQ+38*, DQ+48, DQ+59, DQ+71, DQ+85, DQ+90, DQ+96, DQ+99, H+1
SITE DQ+1~, DQ+5*, DQ+6, DQ+11, DQ+24
TOTAL DQ+1~, DQ+15*, DQ+17*, DQ+21, DQ+28*, DQ+30*, DQ+35, DQ+74*, DQ+79, DQ+81
, CHAMPVA+1~, CHAMPVA+5*, CHAMPVA+10*, CHAMPVA+11, FEE+1~, FEE+4*, FEE+9*, FEE+10
TRAN3 CHAMPVA+1~, CHAMPVA+9*, CHAMPVA+10, FEE+1~, FEE+8*, FEE+9
TRANDA CHAMPVA+1~, CHAMPVA+6*, CHAMPVA+7, CHAMPVA+9, FEE+1~, FEE+5*, FEE+6, FEE+8
X RCRJRDEP+10~, RCRJRDEP+14*, RCRJRDEP+15, RCRJRDEP+16, RCRJRDEP+17, RCRJRDEP+20*, RCRJRDEP+21, RCRJRDEP+22, RCRJRDEP+23*, RCRJRDEP+24
, RCRJRDEP+25, DQ+1~, DQ+99*
Y DQ+1~, DQ+40*, DQ+49*, DQ+50, DQ+51*
>> ZTDESC RCRJRDEP+35*
>> ZTQUEUED DQ+38
>> ZTRTN RCRJRDEP+35*
>> ZTSAVE("RCRJ*" RCRJRDEP+36*
>> ZTSAVE("ZTREQ" RCRJRDEP+36*
ZTSK RCRJRDEP+34!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All