RCDPEWLA ;ALB/TMK - ELECTRONIC EOB MESSAGE WORKLIST ;Jun 06, 2014@19:11:19
Source file <RCDPEWLA.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ADDLINES(RCSCR) | ; Add lines to file 344.49, delete any existing lines
; RCSCR = ien of entry in file 344.49 |
|
TOOOLD(RCDEP) | ; Check if deposit in ien RCDPE (file 344.1) is too old to use
|
|
PARAMS(SOURCE) | ;EP Called from INIT^RCDPEWL
; Retrieve/Edit/Save View Parameters for EEOB Scratchpad Worklist ; Input: SOURCE - "MO" - Select Entry from the worklist ; "CV" - Change View from the scratch pad ; Output: ^TMP($J,"RC_SORTPARM")- Order of Payment ; ("N":No Order/"F":Zero-Payments First/"L":Zero-Payments Last) ; ^TMP($J,"RC_EEOBPOST")- EEOB Posting Status ("P":Posted/"U":Unposted/"B":Both) ; ^TMP("RCSCRATCH_PVW",$J,"RC_SORTPARM") - Order of Payment (same layout as above) ; ^TMP("RCSCRATCH_PVW",$J,"RC_EEOBPOST") - EEOB Posting Status (same layout as above) ; ; The ^TMP("RCSCRATCH_PVW",$J) global contains the sort/filters of the user's preferred ; view while ^TMP($J,"RC_SORTPARM") & ^TMP($J,"RC_EEOBPOST") contain the ; sort/filters of what is currently displayed. They may or may not be the same values. |
|
PREFVW(SOURCE) | ; Checks to see if the user has a preferred view
; PRCA*4.5*317 added subroutine ; When source is 'CV', checks to see if the preferred view is being used ; Input: SOURCE - 'MO' - When called from the Worklist menu ; option ; 'CV' - When called from the Change View ; action |
|
ORDERPAY() | ||
POSTSTAT() | ||
SAVEPVW | ; Option to save as User Preferred View for the scratch pad
; PRCA*4.5*317 added subroutine ; Input: ^TMP($J,"RC_EEOBPOST") - Current EEOB Posting Status ; ^TMP($J,"RC_SORTPARM") - Current EEOB Sort Parameter ; Output Current worklist scratch pad settings set as preferred view (potentially) |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^RCY(344.49 - [#344.49] | Classic Fileman Calls |