RCDPENE1 ;AITC/CJE - NEGATIVE ERA LINE REPORT ;Dec 20, 2014@18:42
Source file <RCDPENE1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
COMPILE | ; Generate the Auto Posting report ^TMP array
; Input: GLOB - "^TMP("RCDPENER",$J)" ; RCDISP - 0 - Output to paper or screen, 1 - Output to Excel ; RCDIV - 1 - All divisions, 2 - Selected divisions ; RCDIVS()- Array of selected divisions if RCDIV=2 ; RCRANGE - 1^Start Date^End Date ; RCJOB - $J ; RCLAIM - "M" - Medical Claims, "P" - Pharmacy Claims, "B" - Both ; RCPAGE - Initialized to 0 ; RCPARRAY- Array of selected payers ; RCPROG - "RCDPENER" ; RCSORT - 0 - Sort by Payer Name, 1 - Sort by Payer TIN ; RCWHICH - 1 - Filter by Payer Name, 2 - Filter by Payer TIN ; ^TMP("RCSELPAY",RCJOB) - Selected Payer Names or TINs |
|
SAVE(ERAIEN,RCRZ,RCSORT) | ; EP - Save to ^TMP global
; Input: ERAIEN - Internal IEN into file 344.4 ; RCRZ - Internal IEN into sub-file 344.41 ; STNAM - Division Name (Primary Sort) ; STNUM - Station Number ; ^TMP("RCDPEAPP2",$J,ERAIEN,RCRZ) - Array of detail lines ; Output: ^TMP("RCDPENER",$J) Contains report details in ^ delimited format |
FileNo | Call Tags |
---|---|
^RCY(344.4 - [#344.4] | GET1^DIQ |
344.41 | EXTERNAL^DILFD, GET1^DIQ |
^IBM(361.1 - [#361.1] | GET1^DIQ |
^PRCA(430 - [#430] | GET1^DIQ |