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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: RCTCSP4E

Package: Accounts Receivable

Routine: RCTCSP4E


Information

RCTCSP4E ;HAF/ASF - CS Debt Referral Stop Reactivate Report ;6/1/2017

Source Information

Source file <RCTCSP4E.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Accounts Receivable 4 $$SSN^RCFN01  DEBSTAT^RCTCS1  (DATES,DEBTORS,FORMAT)^RCTCSP4  HDR^RCTCSP4E  
Kernel 3 $$S^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  EN^XUTMDEVQ  
VA FileMan 2 $$GET1^DIQ  ^DIR  

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: 2

Package Total Caller Graph
Accounts Receivable 2 RCTCSP4  RCTCSP4E  

Entry Points

Name Comments DBIA/ICR reference
HDR ; report header
HDRX ;
EXCELHD ; print an Excel header record (only 1 Excel header should print for the whole report)
EXCELN ; write a line of Excel data
CSV(STRING,DATA) ; build the Excel data string format
DIVHDR ;
DLEVEL ; stop/reactivate report at 340 debtor level
QENT ;queue ENTRY
DSR ;
PRINT ;print for debtor level
DLHDR ;Debtor Level Header
DEVICE() ; Device Selection
DLXHD ; print an Excel header record DEBTOR level
DEXLN ; write a line of Excel data for debtor

External References

Name Field # of Occurrence
$$S^%ZTLOAD HDR+46
$$GET1^DIQ DSR+3, PRINT+6, PRINT+10
^DIR HDR+6, DEVICE+29
$$SSN^RCFN01 PRINT+4
DEBSTAT^RCTCS1 DSR+6
DATES^RCTCSP4 DLEVEL+4
DEBTORS^RCTCSP4 DLEVEL+2
FORMAT^RCTCSP4 DLEVEL+6
HDR^RCTCSP4E PRINT+20
$$FMTE^XLFDT HDR+27, HDR+28, HDR+34, EXCELN+12, EXCELN+13, DIVHDR+4, DIVHDR+9, DLHDR+4, DLHDR+9
$$NOW^XLFDT HDR+34, DIVHDR+9, DLHDR+9
EN^XUTMDEVQ DEVICE+27

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: $C(13)
  • Line Location: HDR+12
Function Call: WRITE
  • Prompt: ?47,"Cross-Servicing Stop Reactivate Report by ",$S(RCTCDIV="D":"Division",1:"Debtor"),?122,"Page: ",PAGE
  • Line Location: HDR+22
Function Call: WRITE
  • Prompt: !,"Date Range: "
  • Line Location: HDR+24
Function Call: WRITE
  • Prompt: "ALL"
  • Line Location: HDR+25
Function Call: WRITE
  • Prompt: $$FMTE^XLFDT($G(RCTCDATE("BEGIN")),"2Z")," - "
  • Line Location: HDR+27
Function Call: WRITE
  • Prompt: $$FMTE^XLFDT($G(RCTCDATE("END")),"2Z")
  • Line Location: HDR+28
Function Call: WRITE
  • Prompt: " Currently Flagged, Reactivated, or Both: "
  • Line Location: HDR+30
Function Call: WRITE
  • Prompt: $S(RCTCFLG="C":"Currently Flagged",RCTCFLG="R":"Reactivated",1:"Both")
  • Line Location: HDR+31
Function Call: WRITE
  • Prompt: " "_DIV1
  • Line Location: HDR+32
Function Call: WRITE
  • Prompt: " Division: All"
  • Line Location: HDR+33
Function Call: WRITE
  • Prompt: ?111,$$FMTE^XLFDT($$NOW^XLFDT)
  • Line Location: HDR+34
Function Call: WRITE
  • Prompt: !,"Debtors: "
  • Line Location: HDR+35
Function Call: WRITE
  • Prompt: "ALL"
  • Line Location: HDR+36
Function Call: WRITE
  • Prompt: RTCN_" "
  • Line Location: HDR+38
Function Call: WRITE
  • Prompt: !,SEPLINE
  • Line Location: HDR+41
Function Call: WRITE
  • Prompt: !,SEPLINE
  • Line Location: HDR+43
Function Call: WRITE
  • Prompt: !!!?5,"*** Report Halted by TaskManager Request ***"
  • Line Location: HDR+48
Function Call: WRITE
  • Prompt: RCH
  • Line Location: EXCELHD+26
Function Call: WRITE
  • Prompt: !,RCZ
  • Line Location: EXCELN+20
Function Call: WRITE
  • Prompt: !,"Date Range: "
  • Line Location: DIVHDR+2
Function Call: WRITE
  • Prompt: "All"
  • Line Location: DIVHDR+3
Function Call: WRITE
  • Prompt: $$FMTE^XLFDT($G(RCTCDATE("BEGIN")),"2Z")," - ",$$FMTE^XLFDT($G(RCTCDATE("END")),"2Z")
  • Line Location: DIVHDR+4
Function Call: WRITE
  • Prompt: ?47,"Cross-Servicing Stop Reactivate Report by Bill",?122,"Page: ",PAGE
  • Line Location: DIVHDR+5
Function Call: WRITE
  • Prompt: !
  • Line Location: DIVHDR+6
Function Call: WRITE
  • Prompt: "Division(s): All"
  • Line Location: DIVHDR+6
Function Call: WRITE
  • Prompt: ?45," Currently Flagged, Reactivated, or Both: "
  • Line Location: DIVHDR+7
Function Call: WRITE
  • Prompt: $S(RCTCFLG="C":"Currently Flagged",RCTCFLG="R":"Reactivated",1:"Both")
  • Line Location: DIVHDR+8
Function Call: WRITE
  • Prompt: ?111,$P($$FMTE^XLFDT($$NOW^XLFDT),":",1,2)
  • Line Location: DIVHDR+9
Function Call: WRITE
  • Prompt: !,"Division(s): "
  • Line Location: DIVHDR+11
Function Call: WRITE
  • Prompt: $E(DV1,1,$L(DV1)-2)
  • Line Location: DIVHDR+12
Function Call: WRITE
  • Prompt: !,"Debtor Range: "
  • Line Location: DIVHDR+13
Function Call: WRITE
  • Prompt: "ALL"
  • Line Location: DIVHDR+14
Function Call: WRITE
  • Prompt: RCTCDEBT1,":",RCTCDEBT2
  • Line Location: DIVHDR+15
Function Call: WRITE
  • Prompt: !,SEPLINE
  • Line Location: DIVHDR+16
Function Call: WRITE
  • Prompt: !,"Debtor Name",?24,"Division",?34,"Pt ID",?44,"Bill#",?55,"AR CAT",?66,"Status",?78,"Letter1",?88,"StopDate",?100,"Reason",?110,"CS STOP",?120,"User"
  • Line Location: DIVHDR+17
Function Call: WRITE
  • Prompt: !,SEPLINE
  • Line Location: DIVHDR+19
Function Call: WRITE
  • Prompt: !,NN
  • Line Location: PRINT+12
Function Call: WRITE
  • Prompt: ?35,PTID
  • Line Location: PRINT+13
Function Call: WRITE
  • Prompt: ?42,SSN
  • Line Location: PRINT+14
Function Call: WRITE
  • Prompt: ?54,SR
  • Line Location: PRINT+15
Function Call: WRITE
  • Prompt: ?57,XDATE
  • Line Location: PRINT+16
Function Call: WRITE
  • Prompt: ?75,REASON
  • Line Location: PRINT+17
Function Call: WRITE
  • Prompt: ?107,USER
  • Line Location: PRINT+19
Function Call: WRITE
  • Prompt: *7
  • Line Location: PRINT+20
Function Call: WRITE
  • Prompt: !!,?20,"*** ",$S($G(RCTCSTOP):"Report Ended",1:"End of Report")," ***"
  • Line Location: PRINT+21
Function Call: READ
  • Prompt: !!
  • Variable: "Type <Enter> to continue or '^' to exit
  • Timeout: ",X:DTIME
  • Line Location: PRINT+22
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRINT+22
Function Call: WRITE
  • Prompt: !,"Date Range: "
  • Line Location: DLHDR+2
Function Call: WRITE
  • Prompt: "All"
  • Line Location: DLHDR+3
Function Call: WRITE
  • Prompt: $$FMTE^XLFDT($G(RCTCDATE("BEGIN")),"2Z")," - ",$$FMTE^XLFDT($G(RCTCDATE("END")),"2Z")
  • Line Location: DLHDR+4
Function Call: WRITE
  • Prompt: ?35,"Cross-Servicing Stop Reactivate Report at Debtor Level",?122,"Page: ",PAGE
  • Line Location: DLHDR+5
Function Call: WRITE
  • Prompt: !?33," Currently Flagged, Reactivated, or Both: "
  • Line Location: DLHDR+6
Function Call: WRITE
  • Prompt: $S(RCTCFLG="C":"Currently Flagged",RCTCFLG="R":"Reactivated",1:"Both")
  • Line Location: DLHDR+7
Function Call: WRITE
  • Prompt: !,"Debtor Range: ",DEBRANGE
  • Line Location: DLHDR+8
Function Call: WRITE
  • Prompt: ?111,$P($$FMTE^XLFDT($$NOW^XLFDT),":",1,2)
  • Line Location: DLHDR+9
Function Call: WRITE
  • Prompt: !,SEPLINE
  • Line Location: DLHDR+10
Function Call: WRITE
  • Prompt: !,"Debtor Name",?35,"Pt ID",?42,"SSN",?53,"S/R",?57,"Date",?75,"Reason",?107,"User"
  • Line Location: DLHDR+11
Function Call: WRITE
  • Prompt: !,SEPLINE
  • Line Location: DLHDR+12
Function Call: WRITE
  • Prompt: !!,"It is recommended that you Queue this report to a device ",!,"that is 132 characters wide",!
  • Line Location: DEVICE+3
Function Call: WRITE
  • Prompt: !!,"To capture as an Excel format, it is recommended that you queue this report to"
  • Line Location: DEVICE+5
Function Call: WRITE
  • Prompt: !,"a spool device with margins of 256 and page length of 99999,"
  • Line Location: DEVICE+6
Function Call: WRITE
  • Prompt: !,"(e.g. spoolname;256;99999).This should help avoid wrapping problems.",!
  • Line Location: DEVICE+7
Function Call: WRITE
  • Prompt: !,"Another method would be to set up your terminal to capture the detail report"
  • Line Location: DEVICE+8
Function Call: WRITE
  • Prompt: !,"data. On some terminals, this can be done by clicking on the 'Tools' menu above,"
  • Line Location: DEVICE+9
Function Call: WRITE
  • Prompt: !,"then click on 'Capture Incoming Data' to save to Desktop."
  • Line Location: DEVICE+10
Function Call: WRITE
  • Prompt: !,"To avoid undesired wrapping of the data saved to the file,"
  • Line Location: DEVICE+11
Function Call: WRITE
  • Prompt: !,"please enter '0;256;99999' at the 'DEVICE:' prompt."
  • Line Location: DEVICE+12
Function Call: WRITE
  • Prompt: !!,"Report compilation has started with task# ",ZTSK,".",!
  • Line Location: DEVICE+29
Function Call: WRITE
  • Prompt: RCH
  • Line Location: DLXHD+9
Function Call: WRITE
  • Prompt: !,RCZ
  • Line Location: DEXLN+9
Routine Call
  • DIR
  • Line Location:
    • HDR+6
    • DEVICE+29

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^RCD(340 - [#340] GET1^DIQ
340.08 GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RCD(340 - [#340] QENT+4, DSR+2, DSR+7, DSR+10, DSR+12, PRINT+7
^TMP("RCTC" DLEVEL+1!, QENT+3!, DSR+13*, DSR+14*, DSR+15*, PRINT+1, PRINT+2, PRINT+3

Label References

Name Line Occurrences
$$CSV EXCELHD+3, EXCELHD+4, EXCELHD+6, EXCELHD+9, EXCELHD+12, EXCELHD+13, EXCELHD+17, EXCELHD+18, EXCELHD+20, EXCELHD+24
, EXCELHD+25, EXCELN+2, EXCELN+3, EXCELN+4, EXCELN+6, EXCELN+8, EXCELN+9, EXCELN+12, EXCELN+13, EXCELN+14
, EXCELN+16, EXCELN+19, DLXHD+2, DLXHD+3, DLXHD+4, DLXHD+5, DLXHD+6, DLXHD+7, DLXHD+8, DEXLN+2
, DEXLN+3, DEXLN+4, DEXLN+5, DEXLN+6, DEXLN+7, DEXLN+8
DEVICE DLEVEL+7
DEXLN PRINT+11
DIVHDR HDR+20
DLHDR HDR+20
DLXHD DLHDR+1
DSR QENT+4
EXCELHD DIVHDR+1
HDR QENT+2
HDRX HDR+6, HDR+46
PRINT QENT+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BILLDATA EXCELN+3, EXCELN+6, EXCELN+8, EXCELN+9, EXCELN+12, EXCELN+13, EXCELN+14
>> CRT HDR+4*, HDR+6, HDR+9, HDR+12
DATA CSV~, CSV+1
>> DEBRANGE DLEVEL+3*, DLHDR+8
>> DEBTDATA EXCELN+2, EXCELN+4
>> DEBTNAME DSR+3*, DSR+4, DSR+5, DSR+11
>> DEBTOR QENT+4*, DSR+2, DSR+3, DSR+6, DSR+7, DSR+10, DSR+12, DSR+13, DSR+14, DSR+15
, PRINT+1*, PRINT+2, PRINT+3, PRINT+4, PRINT+6, PRINT+7
DIR HDR+2~, HDR+6!, DEVICE+1~, DEVICE+29!
DIR(0 HDR+6*, DEVICE+29*
DIROUT HDR+2~
DIRUT HDR+2~, DLEVEL+2, DLEVEL+4, PRINT+22
>> DIV1 HDR+32*
DTIME PRINT+22
DTOUT HDR+2~
DUOUT HDR+2~
>> DV DIVHDR+11*
>> DV1 DIVHDR+11*, DIVHDR+12
>> G DSR+12*, PRINT+7*, PRINT+8, PRINT+9, PRINT+10
>> G( DSR+12*
G1 DSR+1~
>> IENS PRINT+6*
IOF HDR+9, PRINT+22
IOSL PRINT+20
IOST HDR+4, PRINT+22
LASTDT DSR+1~
LASTIEN DSR+1~
>> N1 DSR+10*, DSR+12, DSR+13, DSR+14, DSR+15, PRINT+3*, PRINT+6, PRINT+7
>> NN DSR+11*, DSR+13, DSR+14, DSR+15, PRINT+1*, PRINT+2, PRINT+3, PRINT+5, PRINT+12, DEXLN+2
>> PAGE HDR+6, HDR+9, HDR+12, HDR+14*, HDR+22, DIVHDR+5, DLEVEL+5*, QENT+1*, DLHDR+5
POP DEVICE+1~, DEVICE+28
>> PTID PRINT+5*, PRINT+13, DEXLN+3
RCDSTAT DSR+1~
RCDSTAT("STOP FLAG" , DSR+13, DSR+14
>> RCDT DSR+12*, DSR+13, DSR+14, DSR+15, PRINT+2*, PRINT+3
RCH EXCELHD+2~, EXCELHD+3*, EXCELHD+4*, EXCELHD+6*, EXCELHD+9*, EXCELHD+12*, EXCELHD+13*, EXCELHD+17*, EXCELHD+18*, EXCELHD+20*
, EXCELHD+24*, EXCELHD+25*, EXCELHD+26, DLXHD+1~, DLXHD+2*, DLXHD+3*, DLXHD+4*, DLXHD+5*, DLXHD+6*, DLXHD+7*
, DLXHD+8*, DLXHD+9
RCSR HDR+2~, DSR+12*, DSR+13, DSR+14
>> RCTC("DIVN" DIVHDR+11
>> RCTC("DIVS" HDR+32
>> RCTCDATE HDR+25, DLEVEL+4, DLHDR+3
>> RCTCDATE("BEGIN" HDR+27, DIVHDR+3, DIVHDR+4, DSR+8, DLHDR+4
>> RCTCDATE("END" HDR+28, DIVHDR+4, DSR+9, DLHDR+4
>> RCTCDB HDR+20, HDR+36
>> RCTCDEBT1 DIVHDR+14, DIVHDR+15, DLEVEL+3, DSR+4
>> RCTCDEBT2 DIVHDR+14, DIVHDR+15, DLEVEL+3, DSR+5
>> RCTCDIV HDR+22, HDR+32, HDR+42, DIVHDR+6, DIVHDR+10
>> RCTCEXCEL DIVHDR+1, DLEVEL+6, PRINT+11, DLHDR+1, DEVICE+3, DEVICE+4
>> RCTCFLG HDR+31, DIVHDR+8, DSR+13, DSR+14, DSR+15, DLHDR+7
>> RCTCSP4("DEBTOR" HDR+36, HDR+38
>> RCTCSTOP HDR+6*, HDR+47*, DLEVEL+5*, QENT+1*, PRINT+1, PRINT+2, PRINT+21, PRINT+22
RCZ EXCELN+1~, EXCELN+2*, EXCELN+3*, EXCELN+4*, EXCELN+6*, EXCELN+8*, EXCELN+9*, EXCELN+12*, EXCELN+13*, EXCELN+14*
, EXCELN+16*, EXCELN+19*, EXCELN+20, DEXLN+1~, DEXLN+2*, DEXLN+3*, DEXLN+4*, DEXLN+5*, DEXLN+6*, DEXLN+7*
, DEXLN+8*, DEXLN+9
>> REASON PRINT+6*, PRINT+17, DEXLN+7
RET DEVICE+1~, DEVICE+2*, DEVICE+28*, DEVICE+30
>> RTCN HDR+38*
>> SEPLINE HDR+41, HDR+43, DIVHDR+16, DIVHDR+19, DLEVEL+5*, QENT+1*, DLHDR+10, DLHDR+12
>> SR PRINT+8*, PRINT+15, DEXLN+5
>> SRDT DSR+7*, DSR+8, DSR+9, DSR+10
>> SSN PRINT+4*, PRINT+5, PRINT+14, DEXLN+4
STRING CSV~, CSV+1*, CSV+2
>> TRANDATA EXCELN+15, EXCELN+19
>> TT EXCELN+15*, EXCELN+16
U EXCELN+2, EXCELN+3, EXCELN+4, EXCELN+6, EXCELN+8, EXCELN+9, EXCELN+12, EXCELN+13, EXCELN+14, EXCELN+15
, EXCELN+19, CSV+1, DSR+12, PRINT+8, PRINT+9, PRINT+10
>> USER PRINT+10*, PRINT+19, DEXLN+8
X HDR+2~, PRINT+22*, DEVICE+1~
>> XDATE PRINT+9*, PRINT+16, DEXLN+6
Y HDR+2~, HDR+6, DEVICE+1~
ZTDESC DEVICE+1~, DEVICE+15*, DEVICE+27
>> ZTQUEUED HDR+46
ZTRTN DEVICE+1~, DEVICE+14*, DEVICE+27
ZTSAVE DEVICE+1~, DEVICE+27
ZTSAVE("DEBRANGE" DEVICE+25*
ZTSAVE("DLEVEL" DEVICE+26*
ZTSAVE("RCTC(" DEVICE+16*
ZTSAVE("RCTCDATE" DEVICE+22*
ZTSAVE("RCTCDATE(" DEVICE+23*
ZTSAVE("RCTCDB" DEVICE+17*
ZTSAVE("RCTCDEBT1" DEVICE+20*
ZTSAVE("RCTCDEBT2" DEVICE+21*
ZTSAVE("RCTCDIV" DEVICE+18*
ZTSAVE("RCTCEXCEL" DEVICE+24*
ZTSAVE("RCTCFLG" DEVICE+19*
ZTSK DEVICE+1~, DEVICE+29
>> ZTSTOP HDR+47*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All