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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: RCDPE215

Package: Accounts Receivable

Routine: RCDPE215


Information

RCDPE215 ;ALB/TMK- SF215 EDI Lockbox Summary Report ;1 Jun 99

Source Information

Source file <RCDPE215.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Accounts Receivable 5 $$ADDPTEDT^PRCAACC  GET^RCDPECH  $$EDILB^RCDPEU  ($$DEBTOR,$$GETTYPE,PAUSE)^RCDPR215  FMSLINES^RCXFMSC1  
VA FileMan 4 DD^%DT  NOW^%DTC  ^DIC  ^DIR  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
List Manager 1 FULL^VALM1  

Entry Points

Name Comments DBIA/ICR reference
SUMM215 ; summary 215
DQ ; queued report entrypoint
; RCDEPTDA = ien of the deposit to summarize
; RCTYPE="D"etail or "A"ccrual
Q
SUSP(RECEIPDA,RCTYPE,TOTAL,PCT) ; unapplied amts for suspense
; RCTYPE = see explanation at DQ above
; Returns PCT,TOTAL if passed by reference
GETTYPE() ; ask type of report to print
H ; Deposit hdr
H1(CONT) ; Receipt Hdr
; CONT = 1 if continuation from previous page
PAUSE ;
SET(CTRL,TXT,PCT,NOSP) ; Sets print array for detail

External References

Name Field # of Occurrence
DD^%DT DQ+22
NOW^%DTC DQ+22
^%ZIS SUMM215+14
^%ZISC SUMM215+15, Q
^%ZTLOAD SUMM215+15
^DIC SUMM215+7
^DIR GETTYPE+4
$$ADDPTEDT^PRCAACC DQ+7
GET^RCDPECH SUSP+31
$$EDILB^RCDPEU DQ+15
$$DEBTOR^RCDPR215 DQ+51
$$GETTYPE^RCDPR215 SUMM215+10
PAUSE^RCDPR215 PAUSE+1
FMSLINES^RCXFMSC1 DQ+10
FULL^VALM1 SUMM215+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: SUMM215+14
Function Call: WRITE
  • Prompt: !!,"<*> please wait <*>"
  • Line Location: SUMM215+18
Function Call: WRITE
  • Prompt: !!,"**** GRAND TOTALS FOR DEPOSIT: "_$P($G(^RCY(344.1,+RCDEPTDA,0)),U)
  • Line Location: DQ+77
Function Call: WRITE
  • Prompt: !!?5,"Appropriation: ",FUND,": ",?35,$J($G(^TMP($J,"RCTOT","PRINTOTL",FUND)),10,2)
  • Line Location: DQ+80
Function Call: WRITE
  • Prompt: !,?35,"=============",!,"Total Appropriation: ",?35,$J(+TOT,10,2)
  • Line Location: DQ+82
Function Call: WRITE
  • Prompt: ?47,"0160a1 sub-totals Champva receipts",!?47,"not sent to FMS on the CR doc."
  • Line Location: DQ+83
Function Call: WRITE
  • Prompt: !
  • Line Location: DQ+86
Function Call: WRITE
  • Prompt: !?5,"INTEREST : (APP: 1435)",?35,$J($P(TOTAL,"^",2),10,2)
  • Line Location: DQ+87
Function Call: WRITE
  • Prompt: !?5,"ADMIN : (APP: 3220)",?35,$J($P(TOTAL,"^",3),10,2)
  • Line Location: DQ+88
Function Call: WRITE
  • Prompt: !?5,"MARSHALL : (APP: 0869)",?35,$J($P(TOTAL,"^",4),10,2)
  • Line Location: DQ+89
Function Call: WRITE
  • Prompt: !?5,"COURTCOST: (APP: 0869)",?35,$J($P(TOTAL,"^",5),10,2)
  • Line Location: DQ+90
Function Call: WRITE
  • Prompt: !?35,"----------"
  • Line Location: DQ+91
Function Call: WRITE
  • Prompt: !?35,$J($P(TOTAL,"^",2)+$P(TOTAL,"^",3)+$P(TOTAL,"^",4)+$P(TOTAL,"^",5),10,2)
  • Line Location: DQ+92
Function Call: WRITE
  • Prompt: !!?5,"Total Appropriation: 3875",?35,$J(^TMP($J,"RCTOT","SUSPENSE"),10,2)
  • Line Location: DQ+93
Function Call: WRITE
  • Prompt: !!,"TOTALS: "
  • Line Location: DQ+97
Function Call: WRITE
  • Prompt: !?5,"TOT AMT POSTED FOR DEPOSIT: ",?35,$J(+TOTLAMT,10,2)
  • Line Location: DQ+98
Function Call: WRITE
  • Prompt: @W
  • Line Location: DQ+105
Function Call: WRITE
  • Prompt: D:SCREEN
  • Line Location: DQ+105
Function Call: WRITE
  • Prompt: @W
  • Line Location: DQ+111
Function Call: WRITE
  • Prompt: !,"Press RETURN to continue: "
  • Line Location: DQ+112
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: H+2
Function Call: WRITE
  • Prompt: $C(13),"Page ",PAGE,?(80-$L(NOW)),NOW
  • Line Location: H+3
Function Call: WRITE
  • Prompt: !,$E($TR(RCYLINE,"-","*"),1,26)," 215 DEPOSIT SUMMARY REPORT ",$E($TR(RCYLINE,"-","*"),1,26)
  • Line Location: H+4
Function Call: WRITE
  • Prompt: !!,"DEPOSIT #: ",DEPOSIT
  • Line Location: H+5
Function Call: WRITE
  • Prompt: !,RCYLINE
  • Line Location: H+6
Function Call: WRITE
  • Prompt: !!,"RECEIPT #: "_RECEIPT_$S($G(CONT):" (continued)",1:"")
  • Line Location: H1+4
Function Call: WRITE
  • Prompt: ?51,"FMS Document #: ",FMSDOCNO
  • Line Location: H1+5
Function Call: WRITE
  • Prompt: !,?11,Z
  • Line Location: H1+7
Function Call: WRITE
  • Prompt: !,Z
  • Line Location: H1+10
Function Call: WRITE
  • Prompt: !
  • Line Location: H1+11
Routine Call
  • DIC
  • Line Location:
    • SUMM215+7
Routine Call
  • DIR
  • Line Location:
    • GETTYPE+4
Routine Call
  • %ZIS
  • Line Location:
    • SUMM215+14

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RCY(344.1 - [#344.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRCA(430 - [#430] DQ+44
^RCY(344 - [#344] DQ+9, DQ+17, DQ+28, SUSP+6, SUSP+7, SUSP+8, SUSP+10, H1+9
^RCY(344.1 - [#344.1] DQ+8, DQ+30, DQ+77
^RCY(344.4 - [#344.4] H1+9
^TMP($J DQ+6!, DQ+12*, DQ+13*, DQ+14!, DQ+18*, DQ+25!, DQ+27, DQ+35, DQ+41, DQ+42
DQ+45, DQ+47*, DQ+57*, DQ+58*, DQ+69, DQ+79, DQ+80, DQ+81, DQ+85, DQ+93
DQ+96, DQ+102, DQ+103, Q+1!, SUSP+5!, SUSP+10*, SUSP+12, SUSP+17, SUSP+19, SUSP+42*
, SUSP+45*, SET+5*

Label References

Name Line Occurrences
DQ SUMM215+19
H DQ+76, DQ+107, DQ+110
H1 DQ+107, DQ+110
PAUSE DQ+99, DQ+105, DQ+110
Q DQ+99, DQ+102
SET DQ+31, DQ+36, DQ+37, DQ+51, DQ+52, DQ+54, DQ+55, DQ+56, DQ+61, DQ+62
DQ+63, DQ+64, DQ+65, DQ+66, DQ+67, DQ+73, DQ+74, SUSP+13, SUSP+14, SUSP+26
, SUSP+27, SUSP+36, SUSP+37, SUSP+38, SUSP+39, SUSP+43, SUSP+44
SUSP DQ+70

Naked Globals

Name Field # of Occurrence
^( DQ+17, DQ+103, SUSP+19

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% SUMM215+4~, DQ+22
%I DQ+3~
%ZIS SUMM215+4~, SUMM215+14*
AMOUNT DQ+3~, SUSP+4~, SUSP+7*, SUSP+10, SUSP+19*, SUSP+20, SUSP+21, SUSP+26
BILL DQ+3~, DQ+44*, DQ+51
BILLDA DQ+3~, DQ+42*, DQ+44, DQ+45, DQ+51
COMMENTS DQ+3~, SUSP+4~, SUSP+19*, SUSP+26, SUSP+27
CONT H1~, H1+4
COUNT DQ+3~, DQ+40*, DQ+43*, DQ+51, SUSP+4~, SUSP+16*, SUSP+25*, SUSP+26
CTRL SET~, SET+5
DA DQ+3~, SUSP+4~, SUSP+6*, SUSP+7, SUSP+8, SUSP+10, SUSP+17*, SUSP+19, SUSP+31
DATA DQ+3~, DQ+28*, DQ+29, DQ+30, DQ+45*, DQ+46, DQ+47, DQ+51, DQ+52
DEPOSIT DQ+3~, DQ+8*, H+5
DETAIL DQ+3~
DIC SUMM215+4~, SUMM215+6*, SUMM215+7!
DIC("A" SUMM215+6*
DIC(0 SUMM215+6*
DIR GETTYPE+1~
DIR("?" GETTYPE+2*, GETTYPE+3*
DIR("A" GETTYPE+2*
DIR("B" GETTYPE+2*
DIR(0 GETTYPE+2*
DT DQ+7
DTIME DQ+112
EDITOT DQ+3~, DQ+26*, DQ+41*
EFTFUND DQ+3~, DQ+7*, DQ+18, DQ+41, DQ+58, DQ+69
FMSDOCNO DQ+3~, DQ+30*, DQ+31, DQ+106*, H1+5
FUND DQ+3~, DQ+35*, DQ+36, DQ+41, DQ+42, DQ+45, DQ+54, DQ+56, DQ+57, DQ+58
DQ+79*, DQ+80, DQ+81, DQ+83
IO DQ+23, DQ+24
IO("Q" SUMM215+15!
IO(0 DQ+23
IOF H+2
IOSL DQ+110
IOST DQ+23
NOSP SET~, SET+5
NOW DQ+3~, DQ+22*, H+3
NS DQ+100~, DQ+103*, DQ+110
PAGE DQ+3~, DQ+21*, H+2*, H+3
PCT DQ+3~, DQ+26*, DQ+31, DQ+36, DQ+37, DQ+51, DQ+52, DQ+54, DQ+55, DQ+56
DQ+61, DQ+62, DQ+63, DQ+64, DQ+65, DQ+66, DQ+67, DQ+70, DQ+73, DQ+74
DQ+102*, DQ+103, SUSP~, SUSP+13, SUSP+14, SUSP+26, SUSP+27, SUSP+36, SUSP+37, SUSP+38
, SUSP+39, SUSP+43, SUSP+44, SET~, SET+5*
PIECE DQ+3~, DQ+47*, DQ+72*, DQ+95*
POP SUMM215+4~, SUMM215+14
PRINTOTL DQ+3~, DQ+39*, DQ+41*, DQ+46*, DQ+55, DQ+57, DQ+58, SUSP+4~, SUSP+16*, SUSP+20*
, SUSP+42, SUSP+44, SUSP+45
Q DQ+100~, DQ+103*, DQ+104, DQ+108, DQ+109
RCCHIS SUSP+30~, SUSP+31
RCCHIS( SUSP+33, SUSP+35, SUSP+38, SUSP+39
RCCOM SUSP+30~, SUSP+35*, SUSP+36, SUSP+37
RCDEPTDA SUMM215+4~, SUMM215+9*, DQ+8, DQ+9, DQ+77
RCDETAIL DQ+3~, DQ+26*
RCSTFLAG DQ+3~, DQ+99, DQ+102, DQ+105, DQ+110, SUSP+17
RCSUB SUSP+30~, SUSP+32*, SUSP+33*, SUSP+34, SUSP+35, SUSP+38, SUSP+39
RCTYPE SUMM215+4~, SUMM215+10*, SUMM215+11, DQ+37, DQ+49, DQ+54, DQ+70, SUSP~, SUSP+14, SUSP+23
, SUSP+43
RCYLINE DQ+3~, DQ+21*, H+4, H+6
RECEIPDA DQ+3~, DQ+9*, DQ+10, DQ+12, DQ+13, DQ+15, DQ+17, DQ+18, DQ+27*, DQ+28
DQ+31, DQ+35, DQ+41, DQ+42, DQ+45, DQ+69, DQ+70, DQ+106*, SUSP~, SUSP+6
, SUSP+7, SUSP+8, SUSP+10, SUSP+31, H1+9
RECEIPT DQ+3~, DQ+29*, DQ+31, DQ+106*, H1+4, H1+6
SCREEN DQ+3~, DQ+23*, DQ+99, DQ+105, DQ+110, DQ+112, H+2
T DQ+100~, DQ+103*, DQ+106, DQ+109
TOT DQ+3~, DQ+16*, DQ+17*, DQ+18, DQ+78*, DQ+81*, DQ+82
TOTAL DQ+3~, DQ+33*, DQ+47*, DQ+62, DQ+63, DQ+64, DQ+65, DQ+67, DQ+69*, DQ+70
DQ+72, DQ+85*, DQ+87, DQ+88, DQ+89, DQ+90, DQ+92, DQ+95, SUSP~, SUSP+21*
TOTLAMT DQ+3~, DQ+72*, DQ+74, DQ+95*, DQ+96*, DQ+98
TXT SET~, SET+5
U DQ+8, DQ+17, DQ+58, DQ+69, DQ+77, DQ+103, SUSP+35, SUSP+38, SUSP+39, SUSP+42
, H1+9, SET+5
UNAPPLY DQ+3~, SUSP+4~, SUSP+8*, SUSP+10, SUSP+19*, SUSP+26
>> VALMBCK SUMM215+2*
W DQ+100~, DQ+101*, DQ+105*, DQ+108*, DQ+109*, DQ+111*
X SUMM215+4~, DQ+3~, DQ+112*, GETTYPE+1~
Y SUMM215+4~, SUMM215+8, SUMM215+9, DQ+3~, DQ+22*, GETTYPE+1~, GETTYPE+5, GETTYPE+6
Z DQ+3~, DQ+17*, H+1~, H1+3~, H1+6*, H1+7, H1+8*, H1+9*, H1+10
ZTDESC SUMM215+4~, SUMM215+16*
>> ZTQUEUED DQ+23
ZTRTN SUMM215+4~, SUMM215+16*
ZTSAVE SUMM215+4~
ZTSAVE("RCDEPTDA" SUMM215+17*
ZTSAVE("RCTYPE" SUMM215+17*
ZTSAVE("ZTREQ" SUMM215+17*
ZTSK SUMM215+4~, SUMM215+15!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All