RCDPEOP ;AITC/FA - EFT Overrride Report ;Jun 06, 2014@19:11:19
Source file <RCDPEOP.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 | 1 | RCDPE EFT UNLOCK OVERRIDE REP |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;EP for EFT Override Report [RCDPE EFT OVERRIDE REPORT]
|
|
LMOUT(RCRPLST,RCDTRNG,RCTYPE) | ; Output report to Listman
; Input: RCRPLST - "RCDPEOP" ; Input: RCDTRNG - ^Start Date^End Date ; RCTYPE - 'M', 'P', 'T' or 'A' ; RCRPLST - "RCDPEOP" ; ^TMP($J,RCRPLST) - Array of data lines to be displayes ; Output: Report is displayed in Listman |
|
COMPILE | ; Entry point for queued job
; Input: RCDISPTY - 1 - Display to Excel, 0 otherwise ; RCDTRNG - ^Start Date^End Date ; RCLSTMGR - ListMan flag ; RCTYPE - 'M', 'P' , 'T' or 'A' ; RCRPLST - "RCDPEOP" ; Output: ^TMP($J,RCRPLST,CT) - Array of report lines to be displayed |
|
OUTLN(D1,RCDISPTY,RCHDT,RCCTYPE,RCRPLST,CT,TOT) | ; Store one line of output into arrays
; Input: D1 - DE of sub-file 344.612 being processed ; RCDISPTY - 1 - Display to Excel, 0 otherwise ; RCHDT - Internal Date/Time of current entry being processed ; RCCTYPE - Current Override Type ; RCRPLST - "RCDPEOP" ; CT - Current line Count ; TOT - Current total # of EFT Lockout Overrides for date range ; TOT("M") - Current total # of Medical EFT LO Overrides for range ; TOT("P") - Current total # of Rx EFT LO Overrides for range ; TOT("T") - Current total # of TRICARE EFT LO Overrides for range ; ^TMP(RCRPLST,$J,RCHDT,CT) - Current Array of output display lines ; Output: CT - Updated line Count ; TOT - Updated total # of EFT Lockout Overrides for date range ; TOT("M") - Updated total # of Medical EFT LO Overrides for range ; TOT("P") - Updated total # of Rx EFT LO Overrides for range ; TOT("T") - Updated total # of TRICARE EFT LO Overrides for range ; ^TMP(RCRPLST,$J,RCHDT,CT) - Updated Array of output display lines |
|
HDRBLD(RCDISPTY,RCDTRNG,RCTYPE,RCHDR) | ; Create the report header
; Input: RCDISPTY - 1 - Output to Excel, 0 otherwise ; RCDTRNG - User selected date range - ^Start Date End Date ; RCTYPE - User selected M/P/T filter - 'M', 'P' , 'T' or 'A' ; Output: RCHDR - Array of header lines to be displayed |
|
HDRLN1(RCDTRNG) | ; Format the second header display line
; Input: RCDTRNG - User selected date range - ^Start Date End Date ; Returns: text for the first header line after the title line |
|
HDRLN2(RCTPYE) | ; Format the second header display line
; Input: RCTYPE - User selected M/P/T filter - 'M', 'P' , 'T' or 'A' ; Returns: text for the third header line after the title line |
|
HDRLN3() | ; Format the second header display line
|
|
RPT(RCDISPTY,RCHDR) | ; Display/print the report using data populated in temporary global array
; Input: RCDISPTY - 1 - Output to Excel, 0 otherwise ; RCHDR - Array of header lines to be displayed ; ^TMP($J,RCRPLST) - Array of data lines to be displayed or output to excel ; |
|
HDRDSP(PAGE,LNCNT,RCHDR,RCSTOP) | ||
ASK(STOP,TYP) | ; Ask to continue, if TYP=1 then prompt to finish
; Input: TYP - 1 - Prompt to finish, 0 Otherwise ; Output: STOP - 1 abort print, 0 otherwise |
Name | Field # of Occurrence |
---|---|
^%ZIS | EN+26 |
HOME^%ZIS | EN+35 |
^%ZISC | EN+42, LMOUT+19 |
^%ZTLOAD | EN+32 |
$$GET1^DIQ | COMPILE+18, OUTLN+19, OUTLN+22, OUTLN+23 |
^DIR | ASK+8 |
$$ASKLM^RCDPEARL | EN+20 |
$$ENDORPRT^RCDPEARL | RPT+9 |
$$NOW^RCDPEARL | HDRLN1+7 |
LMRPT^RCDPEARL | LMOUT+17 |
$$DISPTY^RCDPEM3 | EN+13 |
$$DTRNG^RCDPEM4 | EN+11 |
INFO^RCDPEM6 | EN+18 |
$$RTYPE^RCDPEU1 | EN+9 |
$$SETSTR^VALM1 | COMPILE+40, COMPILE+44, COMPILE+48, COMPILE+52, OUTLN+30, OUTLN+31, OUTLN+32, OUTLN+33, OUTLN+34, HDRLN1+9 |
$$FMTE^XLFDT | OUTLN+25, HDRLN1+4, HDRLN1+5 |
Name | Line Occurrences |
---|---|
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 |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^RCY(344.61 - [#344.61] | COMPILE+14, COMPILE+17 |
^TMP( | LMOUT+20!, COMPILE+9!, COMPILE+25, COMPILE+29, COMPILE+31, COMPILE+33!, OUTLN+27*, OUTLN+35* |
^TMP($J | EN+41!, LMOUT+17, LMOUT+20!, COMPILE+9!, COMPILE+32*, COMPILE+37*, COMPILE+41*, COMPILE+45*, COMPILE+49*, COMPILE+53* , RPT+7, RPT+16, RPT+18 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%ZIS | EN+1~, EN+25* |
CT | COMPILE+7~, COMPILE+11*, COMPILE+20, COMPILE+27*, COMPILE+28, COMPILE+29*, COMPILE+30, COMPILE+31, OUTLN~, OUTLN+24* , OUTLN+27, OUTLN+35 |
D1 | COMPILE+7~, COMPILE+17*, COMPILE+18, COMPILE+20, OUTLN~, OUTLN+19, OUTLN+22, OUTLN+23 |
DIR | ASK+3~ |
DIR("A" | ASK+5* |
DIR(0 | ASK+6* |
DIROUT | ASK+3~ |
DIRUT | ASK+3~, ASK+9 |
DIV | HDRBLD+5~ |
DLINE | RPT+5~, RPT+18*, RPT+19, RPT+22 |
DTOUT | ASK+3~ |
DUOUT | ASK+3~, ASK+9 |
HCNT | HDRBLD+5~ |
HDR | LMOUT+7~, LMOUT+17 |
HDR("TITLE" | LMOUT+9* |
HDR(1 | LMOUT+10* |
HDR(2 | LMOUT+11* |
HDR(3 | LMOUT+12* |
HDR(4 | LMOUT+13* |
HDR(5 | LMOUT+14* |
HDR(6 | LMOUT+15* |
HDR(7 | LMOUT+16* |
HNM | HDRBLD+5~ |
I | HDRDSP+9~, HDRDSP+14* |
IO | EN+37 |
IO("Q" | EN+27, EN+34! |
IOF | HDRDSP+11 |
IOSL | RPT+21 |
IOST | ASK+4 |
LN | OUTLN+18~, OUTLN+29*, OUTLN+30*, OUTLN+31*, OUTLN+32*, OUTLN+33*, OUTLN+34*, OUTLN+35, HDRLN1+3~, HDRLN1+6* , HDRLN1+9*, HDRLN1+10, HDRLN2+3~, HDRLN2+5*, HDRLN2+6, RPT+5~, RPT+14*, RPT+15, RPT+16*, RPT+17 , RPT+18 |
LNCNT | RPT+5~, RPT+6*, RPT+8, RPT+11, RPT+18*, RPT+21, HDRDSP~, HDRDSP+15* |
PAGE | RPT+5~, RPT+6*, RPT+8, RPT+11, RPT+21, HDRDSP~, HDRDSP+10, HDRDSP+12*, HDRDSP+13 |
POP | EN+26, EN+28~ |
RCCOM | OUTLN+18~, OUTLN+22*, OUTLN+27, OUTLN+32 |
RCCTYPE | COMPILE+7~, COMPILE+18*, COMPILE+19, COMPILE+20, OUTLN~, OUTLN+27, OUTLN+28, OUTLN+33 |
RCDISPTY | EN+1~, EN+13*, EN+14, EN+16, EN+39, EN+40, COMPILE+20, COMPILE+34, OUTLN~, OUTLN+26 , HDRBLD~, HDRBLD+7, RPT~, RPT+8, RPT+11, RPT+12, RPT+19, RPT+20 |
RCDTRNG | EN+1~, EN+11*, EN+12, EN+22, EN+39, LMOUT~, LMOUT+10, COMPILE+12, HDRBLD~, HDRBLD+11 , HDRLN1~, HDRLN1+4, HDRLN1+5 |
RCDYS | OUTLN+18~, OUTLN+23*, OUTLN+27, OUTLN+34 |
RCHDR | EN+1~, EN+39, EN+40, COMPILE+7~, HDRBLD~, HDRBLD+6!, HDRBLD+10*, RPT~, RPT+8, RPT+11 , RPT+21, HDRDSP~, HDRDSP+11 |
RCHDR( | HDRDSP+14 |
RCHDR(1 | HDRBLD+8*, HDRBLD+11*, RPT+12 |
RCHDR(2 | HDRBLD+12* |
RCHDR(3 | HDRBLD+13* |
RCHDR(4 | HDRBLD+14* |
RCHDT | COMPILE+7~, COMPILE+12*, COMPILE+14*, COMPILE+15, COMPILE+16, COMPILE+17, COMPILE+20, COMPILE+23*, COMPILE+24, COMPILE+25* , COMPILE+26, COMPILE+29, COMPILE+31, OUTLN~, OUTLN+25, OUTLN+27, OUTLN+35 |
RCHDTE | COMPILE+7~, COMPILE+12*, COMPILE+16 |
RCLSTMGR | EN+1~, EN+15*, EN+17*, EN+19, EN+20*, EN+21 |
RCPGNUM | COMPILE+7~ |
RCRPLST | EN+1~, EN+8*, EN+22, LMOUT~, LMOUT+17, LMOUT+20, COMPILE+9, COMPILE+20, COMPILE+25, COMPILE+29 , COMPILE+31, COMPILE+32, COMPILE+33, COMPILE+37, COMPILE+41, COMPILE+45, COMPILE+49, COMPILE+53, OUTLN~, OUTLN+27 , OUTLN+35, RPT+7, RPT+16, RPT+18 |
RCRPLSTS | COMPILE+7~, COMPILE+8* |
RCSTOP | COMPILE+7~, COMPILE+11*, COMPILE+13, COMPILE+15*, COMPILE+16*, RPT+5~, RPT+6*, RPT+15, RPT+21, RPT+23 , HDRDSP~, HDRDSP+10 |
RCTOT | COMPILE+7~, COMPILE+11*, COMPILE+20, COMPILE+51 |
RCTOT("M" | COMPILE+11*, COMPILE+39 |
RCTOT("P" | COMPILE+11*, COMPILE+43 |
RCTOT("T" | COMPILE+11*, COMPILE+47 |
RCTPYE | HDRLN2~ |
RCTYPE | EN+1~, EN+9*, EN+10, EN+22, EN+39, LMOUT~, LMOUT+11, COMPILE+19, COMPILE+38, COMPILE+42 , COMPILE+46, COMPILE+50, HDRBLD~, HDRBLD+12, HDRLN2+4 |
RCUSER | OUTLN+18~, OUTLN+20*, OUTLN+21*, OUTLN+27, OUTLN+31 |
STOP | ASK~, ASK+9* |
TOT | OUTLN~, OUTLN+24* |
TOT( | OUTLN+28* |
TYP | ASK~, ASK+5 |
XX | COMPILE+7~, COMPILE+23*, COMPILE+31*, COMPILE+32, COMPILE+37*, COMPILE+41*, COMPILE+45*, COMPILE+49*, COMPILE+53*, OUTLN+18~ , OUTLN+19*, OUTLN+20, OUTLN+21, OUTLN+25*, OUTLN+27, OUTLN+30, HDRBLD+5~, HDRLN1+3~, HDRLN1+7*, HDRLN1+8* , HDRLN1+9, HDRLN2+3~, HDRLN2+4*, HDRLN2+5 |
YY | COMPILE+7~, COMPILE+39*, COMPILE+40, COMPILE+43*, COMPILE+44, COMPILE+47*, COMPILE+48, COMPILE+51*, COMPILE+52, HDRLN1+3~ , HDRLN1+4*, HDRLN1+6 |
ZTDESC | EN+28~, EN+30* |
ZTRTN | EN+28~, EN+29* |
ZTSAVE | EN+28~ |
ZTSAVE("RC*" | EN+31* |
ZTSK | EN+28~, EN+33, EN+34! |
ZZ | COMPILE+7~, COMPILE+31*, COMPILE+32, COMPILE+40*, COMPILE+41, COMPILE+44*, COMPILE+45, COMPILE+48*, COMPILE+49, COMPILE+52* , COMPILE+53, HDRLN1+3~, HDRLN1+5*, HDRLN1+6 |