RCDPEM4 ;OIFO-BAYPINES/PJH - EPAYMENTS AUDIT REPORTS ;Nov 17, 2014@17:00:41
Source file <RCDPEM4.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EOB | ; EEOB Move/Copy/Rmove Audit Report [RCDPE EEOB MOVE/COPY/RMOVE RPT]
|
|
POST | ; ERAs Posted with Paper EOB Audit Report [RCDPE ERA W/PAPER EOB REPORT]
|
|
ASKUSR | ;collect filter and device options
|
|
RPRTCMPL | ;Compile and print report
|
|
EXIT | ;
|
|
CMPLERA | ;Generate the ERA posted with paper EOB report ^TMP array
; ^RCY(344.4,0) = ELECTRONIC REMITTANCE ADVICE^344.4I^ |
|
CMPLEOB | ;Generate the EOB Moved/Copy/Remove report ^TMP array
|
|
DISP | ; Format the display for screen/printer or MS Excel
|
|
LINE(VAUTD) | ;List selected stations
|
|
SELDIV(VAUTD,Z) | ;Devisions are organized as Z(1)="DIV1,DIV2,..., Z(2)="DIVN,DIVN+1,... etc.
; Input: ; VAUTD (required/pass-by-ref) - Division(s) array; result of call to DIVISION^VAUTOMA ; Output: ; Z (required/pass-by-ref) - reformatted array of divisions |
|
HDRBLD | ; create the report header
; returns RCHDR, RCPGNUM, RCSTOP ; RCHDR(0) = header text line count ; RCHDR("XECUTE") = M code for page number ; RCHDR("RUNDATE") = date/time report generated, external format ; RCPGNUM - page counter ; RCSTOP - flag to exit ; INPUT: ; RCDISPTY - Display/print/Excel flag ; RCDTRNG - date range ; RCRTYP - Report Type (EOB or ERA) ; VAUTD |
|
HDRLM | ; create the Listman header
; returns RCHDR ; RCHDR(0) = header text line count ; INPUT: ; RCDTRNG - date range ; VAUTD - Division filter value(s) |
|
HDREOB() | ; extrinsic variable, header for EOB report
|
|
HDRERA() | ; extrinsic variable, header for ERA report
|
|
HDRXEC(TYP) | ; create xecute code for header
|
|
DTRNG() | ; function, return date range for a report
|
|
DATES(BDATE,EDATE) | ;Get a date range.
|
|
STADIV | ;Division/Station Filter/Sort
|
|
ACTION() | ; Get action type
|
|
DISPTY() | ; Get display/output type
|
|
ERASTA(ERAIEN,STA,STNUM,STNAM) | ; Get the station for this ERA
; read allowed on BILL/CLAIMS file (#399) via IA 3820 ; returns STA: station IEN, STNAM: station name, STNUM: station number |
|
EOBSTA(EOBIEN,STA,STNUM,STNAM) | ; Get the station for this EOB
|
|
DTPRB() | ; Get the Start Date type
|
|
WP(JC) | ; format justification comments
; JC - Justification Comment |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DGCR(399 - [#399] | EXTERNAL^DILFD |