RCTCSP4 ;HAF/ASF - CS Debt Referral Stop Reactivate Report ;6/1/2017
Source file <RCTCSP4.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Package | Total | Caller Graph |
|---|---|---|
| Accounts Receivable | 2 | RCTCSP STOP REACTIVATE REPORT RCTCSP4E |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; main report entry point
|
|
| EX | ; main report exit point
|
|
| STOP() | ; Determine if user wants to exit out of the option entirely
; 1=yes, get out entirely ; 0=no, just go back to the previous question |
|
| FLAGGED(RCTCFLG) | ; capture if the user wants bills with a current flag, reactivated, or both
; RCTCFLG=C meaning data is currently present in the STOP TCSP REFERRAL FLAG field (430,157) ; RCTCFLG=R meaning data is currently blank in the STOP TCSP REFERRAL FLAG field (430,157) ; RCTCFLG=B meaning either is wanted ; pass parameter by reference |
|
| FLX | ;
|
|
| DEBBILL | ;
; RCTCDB=C meaning data is currently present in the STOP TCSP REFERRAL FLAG field (430,157) ; RCTCDB=R meaning data is currently blank in the STOP TCSP REFERRAL FLAG field (430,157) |
|
| DIVSEL | ;
|
|
| DEBTORS | ; select debtor range
|
|
| DEBTFR | ; start with debtor
|
|
| DEBTTO | ; go to debtor
|
|
| DBT1 | ||
| DATES | ; all dates or a date range - also capture from and thru dates
; RCTCDATE="A" or "R" if user wants All Dates or to select a Date Range ; RCTCDATE("BEGIN")=starting FM date ; RCTCDATE("END")=ending FM date |
|
| FORMAT | ; output format is Excel format or normal report output
; RCTCEXCEL=0 for normal report output ; RCTCEXCEL=1 for Excel output ; pass parameter by reference |
|
| DEVICE() | ; Device Selection
|
|
| COMPILE | ; entry point for the report compile to build the scratch global
; may be a background task if job queued |
|
| COMIPLX | ;
|
|
| COMP | ; compile data into scratch global
|
|
| ; entry point for printing the report
|
||
| PX | ;
|
|
| PRINTX | ;
|
|
| RPTLN | ; display one line on the report - either normal or Excel
|
|
| RPTLNDIV | ;Lines for division
|
|
| RPTLNX | ;X
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZISC | EN+15, COMPILE+7 |
| ^DIC | DIVSEL+13 |
| $$GET1^DIQ | COMP+21, COMP+23, COMP+28, COMP+37, COMP+47, COMP+63, COMP+64, COMP+65, COMP+66, COMP+67 , COMP+68, COMP+70, COMP+71 |
| ^DIR | STOP+11, FLAGGED+17, DEBBILL+12, DIVSEL+9, DEBTFR+9, DBT1+7, DATES+15, DATES+24, DATES+33, FORMAT+14 , DEVICE+30, PX+1 |
| $$SSN^RCFN01 | COMP+54 |
| DLEVEL^RCTCSP4E | EN+7 |
| EXCELN^RCTCSP4E | RPTLN+4, RPTLNDIV+4 |
| HDR^RCTCSP4E | PRINT+6, PRINT+7, PRINT+8, PRINT+24, PRINTX+3, RPTLN+7, RPTLNDIV+7 |
| $$FMTE^XLFDT | RPTLN+19, RPTLN+20, RPTLNDIV+15, RPTLNDIV+16, RPTLNDIV+20 |
| EN^XUTMDEVQ | DEVICE+28 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^RCD(340 - [#340] | GET1^DIQ |
| ^PRCA(430 - [#430] | GET1^DIQ |
| ^PRCA(430.2 - [#430.2] | GET1^DIQ |
| ^PRCA(433 - [#433] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PRCA(430 - [#430] | COMP+25, COMP+42, COMP+69 |
| ^PRCA(430.3 - [#430.3] | COMP+5 |
| ^PRCA(433 - [#433] | COMP+15, COMP+17, COMP+18, COMP+19 |
| ^RCD(340 - [#340] | COMP+27 |
| ^TMP("RCTCSP4" | EN+14!, COMP+51, COMP+56*, COMP+60, COMP+72*, COMP+75*, PRINT+6, PRINT+12, PRINT+13, PRINT+14 , PRINT+15, PRINT+16, PRINT+17 |
| ^VA(200 - [#200] | COMP+22 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARTTIEN | COMP+1~, COMP+5*, COMP+11*, COMP+15, COMP+17, COMP+18 |
| BILL | PRINT+1~, PRINT+14*, PRINT+15, PRINT+16, PRINT+17 |
| BILLDATA | EN+2~, PRINT+1~, PRINT+15*, RPTLN+11, RPTLN+14, RPTLN+15, RPTLN+17, RPTLN+19, RPTLN+20, RPTLN+21 , RPTLNDIV+11, RPTLNDIV+13, RPTLNDIV+14, RPTLNDIV+15, RPTLNDIV+16, RPTLNDIV+17 |
| CAT | COMP+61~, COMP+69*, COMP+70 |
| CRT | EN+2~, PRINT+1~, PRINT+2*, PX+1 |
| DEBRANGE | EN+2~ |
| DEBTDATA | EN+2~, PRINT+1~, PRINT+13*, RPTLN+10, RPTLN+12, RPTLNDIV+10, RPTLNDIV+12 |
| DEBTNAME | COMP+1~, COMP+28*, COMP+29, COMP+33, COMP+34, COMP+46, COMP+55, COMP+56 |
| DEBTOR | EN+2~ |
| DIC | EN+2~, DIVSEL+1~, DIVSEL+13* |
| DIC(0 | DIVSEL+13* |
| DIR | STOP+4~, STOP+11!, FLAGGED+6~, FLAGGED+17!, DEBBILL+4~, DEBBILL+12!, DIVSEL+1~, DIVSEL+9!, DEBTFR+1~, DEBTFR+9! , DEBTTO+1~, DBT1+7!, DATES+5~, DATES+15!, DATES+24!, DATES+33!, FORMAT+5~, FORMAT+14!, DEVICE+1~, DEVICE+30! , PRINT+1~ |
| DIR("?" | STOP+9*, STOP+10*, FLAGGED+12*, FLAGGED+13*, FLAGGED+14*, FLAGGED+15*, FLAGGED+16*, DEBBILL+10*, DEBBILL+11*, DIVSEL+8* , DEBTFR+6*, DEBTFR+7*, DEBTFR+8*, DBT1+4*, DBT1+5*, DBT1+6*, DATES+11*, DATES+12*, DATES+13*, DATES+14* , DATES+22*, DATES+23*, DATES+31*, DATES+32*, FORMAT+10*, FORMAT+11*, FORMAT+12*, FORMAT+13* |
| DIR("A" | STOP+7*, FLAGGED+10*, DEBBILL+8*, DIVSEL+6*, DEBTFR+4*, DBT1+2*, DATES+9*, DATES+21*, DATES+29*, FORMAT+8* |
| DIR("B" | STOP+8*, FLAGGED+11*, DEBBILL+9*, DIVSEL+7*, DEBTFR+5*, DBT1+3*, DATES+10*, DATES+30*, FORMAT+9* |
| DIR(0 | STOP+6*, FLAGGED+8*, FLAGGED+9*, DEBBILL+6*, DEBBILL+7*, DIVSEL+4*, DIVSEL+5*, DEBTFR+3*, DBT1+1*, DATES+8* , DATES+20*, DATES+28*, FORMAT+7*, DEVICE+30*, PX+1* |
| DIROUT | STOP+4~, DIVSEL+1~, FORMAT+5~, PRINT+1~ |
| DIRUT | EN+8, EN+9, STOP+4~, STOP+12, FLAGGED+18, DEBBILL+13, DIVSEL+1~, DIVSEL+10, DEBTFR+10, DBT1+8 , DATES+16, DATES+25, DATES+34, FORMAT+5~, FORMAT+15, PRINT+1~ |
| DIV1 | EN+2~ |
| DLEVEL | EN+2~ |
| DT | DATES+18 |
| DTOUT | STOP+4~, DIVSEL+1~, FORMAT+5~, PRINT+1~ |
| DUOUT | STOP+4~, DIVSEL+1~, FORMAT+5~, PRINT+1~ |
| DV | EN+2~ |
| FLAG | COMP+1~, COMP+42*, COMP+43, COMP+44 |
| G | EN+2~ |
| IENS | EN+2~ |
| IOSL | PRINT+3*, PRINT+24, PRINTX+3, RPTLN+7, RPTLNDIV+7 |
| IOST | PRINT+2 |
| N1 | EN+2~ |
| NN | EN+2~ |
| P0 | COMP+1~, COMP+19*, COMP+20, COMP+22 |
| PAGE | PRINT+1~, PRINT+4* |
| POP | DEVICE+1~, DEVICE+29 |
| PTID | EN+2~, COMP+52~, COMP+53*, COMP+55*, COMP+56 |
| RC340 | COMP+1~, COMP+25*, COMP+26, COMP+27, COMP+28, COMP+46, COMP+54 |
| RC433 | COMP+1~, COMP+18*, COMP+19, COMP+23, COMP+75, PRINT+1~, PRINT+16*, PRINT+17 |
| RCARCAT | COMP+1~, COMP+21* |
| RCBILLNUM | COMP+1~, COMP+47*, COMP+48, COMP+60, COMP+62, COMP+72, COMP+75 |
| RCD | PRINT+1~, PRINT+12*, PRINT+13, PRINT+14, PRINT+15, PRINT+16, PRINT+17 |
| RCDEBTOR | COMP+1~, COMP+46*, COMP+51, COMP+56, COMP+60, COMP+72, COMP+75 |
| RCDT | EN+2~ |
| RCDV | COMP+52~ |
| RCIBN | COMP+1~, COMP+20*, COMP+21, COMP+25, COMP+37, COMP+42, COMP+47, COMP+63, COMP+64, COMP+65 , COMP+66, COMP+67, COMP+68, COMP+69, COMP+71 |
| RCTC | EN+2~ |
| RCTC("DIVN" | DIVSEL+13* |
| RCTC("DIVS" | DIVSEL+3!, DIVSEL+13*, COMP+39 |
| RCTCDATE | EN+2~, EN+9, DATES+6!, DATES+17*, DATES+18, DATES+25!, DATES+34! |
| RCTCDATE("BEGIN" | DATES+18*, DATES+26*, DATES+28, COMP+15 |
| RCTCDATE("END" | DATES+18*, DATES+35*, COMP+8*, COMP+17 |
| RCTCDB | EN+3~, EN+6, EN+7, EN+10, DEBBILL+5*, DEBBILL+14* |
| RCTCDEBT1 | EN+3~, DEBTFR+2*, DEBTFR+11*, DBT1+10, COMP+33 |
| RCTCDEBT2 | EN+3~, DBT1*, DBT1+9*, DBT1+10, COMP+34 |
| RCTCDIV | EN+3~, EN+10*, DIVSEL+2*, DIVSEL+11*, DIVSEL+12, COMP+38, COMP+39 |
| RCTCDIVN | EN+3~, COMP+37*, COMP+38, COMP+39 |
| RCTCDTENT | COMP+1~, COMP+14*, COMP+15*, COMP+17*, COMP+18, COMP+75 |
| RCTCEXCEL | EN+3~, EN+11, FORMAT+6*, FORMAT+16*, DEVICE+3, DEVICE+4, PRINT+3, RPTLN+4, RPTLNDIV+4 |
| RCTCFLG | EN+3~, EN+5, FLAGGED~, FLAGGED+7*, FLAGGED+19*, COMP+43, COMP+44 |
| RCTCSP4 | EN+3~ |
| RCTCSTOP | EN+3~, PRINT+1~, PRINT+4*, PRINT+8, PRINT+12, PRINT+14, PRINT+16, PRINT+22, PRINT+24, PRINTX+3 , RPTLN+7, RPTLNDIV+7 |
| RCTCTT | COMP+1~ |
| RCTCTT( | COMP+5*, COMP+11 |
| RCTN | EN+3~ |
| RCTTNAME | COMP+1~, COMP+23*, COMP+75 |
| RCX | COMP+61~, COMP+62*, COMP+63*, COMP+64*, COMP+65*, COMP+66*, COMP+67*, COMP+68*, COMP+70*, COMP+71* , COMP+72 |
| REASON | EN+3~ |
| RET | FLAGGED+6~, FLAGGED+7*, FLAGGED+18*, FLX+1, DEBBILL+4~, DEBBILL+5*, DEBBILL+13*, DIVSEL+1~, DIVSEL+2*, DIVSEL+10* , DEBTFR+1~, DEBTFR+2*, DEBTFR+10*, DEBTTO+1~, DBT1*, DBT1+8*, DATES+5~, DATES+7*, DATES+25*, DATES+34* , FORMAT+5~, FORMAT+6*, FORMAT+15*, DEVICE+1~, DEVICE+2*, DEVICE+29*, DEVICE+31 |
| RTCN | EN+3~ |
| SEPLINE | EN+3~, PRINT+1~, PRINT+4* |
| SR | EN+3~ |
| SRDT | EN+3~ |
| SSN | EN+3~, COMP+52~, COMP+53*, COMP+54*, COMP+55, COMP+56 |
| TRANDATA | EN+3~, PRINT+1~, PRINT+17*, RPTLN+22, RPTLN+25, RPTLNDIV+18, RPTLNDIV+20, RPTLNDIV+21 |
| TT | RPTLN+1~, RPTLN+22*, RPTLN+23, RPTLNDIV+1~, RPTLNDIV+18*, RPTLNDIV+19 |
| U | FLAGGED+9, DEBBILL+7, DIVSEL+5, DIVSEL+13, COMP+5, COMP+20, COMP+22, COMP+25, COMP+42, COMP+46 , COMP+56, COMP+63, COMP+64, COMP+65, COMP+66, COMP+67, COMP+68, COMP+69, COMP+70, COMP+71 , COMP+75, RPTLN+10, RPTLN+11, RPTLN+12, RPTLN+14, RPTLN+15, RPTLN+17, RPTLN+19, RPTLN+20, RPTLN+21 , RPTLN+22, RPTLN+25, RPTLNDIV+10, RPTLNDIV+11, RPTLNDIV+12, RPTLNDIV+13, RPTLNDIV+14, RPTLNDIV+15, RPTLNDIV+16, RPTLNDIV+17 , RPTLNDIV+18, RPTLNDIV+20, RPTLNDIV+21 |
| USER | EN+3~, COMP+1~, COMP+22*, COMP+75 |
| X | STOP+4~, FLAGGED+6~, DEBBILL+4~, DIVSEL+1~, DEBTFR+1~, DEBTTO+1~, DATES+5~, FORMAT+5~, DEVICE+1~, PRINT+1~ |
| XDATE | EN+3~ |
| Y | STOP+4~, STOP+12*, STOP+13, FLAGGED+6~, FLAGGED+18, FLAGGED+19, DEBBILL+4~, DEBBILL+13, DEBBILL+14, DIVSEL+1~ , DIVSEL+10, DIVSEL+11, DIVSEL+13, DEBTFR+1~, DEBTFR+10, DEBTFR+11, DEBTTO+1~, DBT1+8, DBT1+9, DATES+5~ , DATES+16, DATES+17, DATES+25, DATES+26, DATES+34, DATES+35, FORMAT+5~, FORMAT+16, DEVICE+1~, PRINT+1~ |
| Y(0 | DIVSEL+13 |
| ZTDESC | DEVICE+1~, DEVICE+15*, DEVICE+28 |
| >> ZTQUEUED | COMPILE+3, COMPILE+8, PX+1 |
| >> ZTREQ | COMPILE+8* |
| ZTRTN | DEVICE+1~, DEVICE+14*, DEVICE+28 |
| ZTSAVE | DEVICE+1~, DEVICE+28 |
| ZTSAVE("DEBRANGE" | DEVICE+26* |
| ZTSAVE("DLEVEL" | DEVICE+27* |
| ZTSAVE("RCARCAT" | DEVICE+19* |
| ZTSAVE("RCTC(" | DEVICE+16* |
| ZTSAVE("RCTCDATE" | DEVICE+23* |
| ZTSAVE("RCTCDATE(" | DEVICE+24* |
| ZTSAVE("RCTCDB" | DEVICE+17* |
| ZTSAVE("RCTCDEBT1" | DEVICE+21* |
| ZTSAVE("RCTCDEBT2" | DEVICE+22* |
| ZTSAVE("RCTCDIV" | DEVICE+18* |
| ZTSAVE("RCTCEXCEL" | DEVICE+25* |
| ZTSAVE("RCTCFLG" | DEVICE+20* |
| ZTSK | DEVICE+1~, DEVICE+30 |
| >> ZTSTOP | PRINT+7 |
| >> ZZRET | DATES+16* |