Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: RCTCSWL

Package: Accounts Receivable

Routine: RCTCSWL


Information

RCTCSWL ;ALB/PAW-Cross Servicing Worklist ;30-SEP-2015

Source Information

Source file <RCTCSWL.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; -- Main entry point for RCTCSP RECONCILIATION WORKLIST
INIT ; Initialize variables
HDR ; Set header for CS Worklist
FILTER(FILTERS) ; Set filters
; Sets an array of filters to determine which entries to include in display
; Input: None
; Output:
; Returns: 0 if the user entered '^' or timed out, 1 otherwise
; FILTERS(0) = Piece 1 = 1=Bankruptcy,2=Deaths,3=Uncollectable,4=Payment in Full,5=Satisfied PA,6=Compromise,7=All Returns
; Piece 3 = All (0) or Select (1) Patients
SHOWFILT(FILTERS) ; Display
; Displays the currently selected filter selections for the
; Billing and NVC Precert Worklist display
; Input: FILTERS() - Array of filter settings. See FILTERS for a detailed
; explanation of the FILTERS array
; Output: Current Filter settings are displayed
ASKDIV(FILTERS) ; Sets a list of Divisions to be displayed in the Reconciliation Worklist
; Input: FILTERS - Current Array of filter settings
; Output: FILTERS - Updated Array of filter settings
ONEDIV(DIC,IEN,FIRST) ; Prompts the user for a Division
; Input: DIC - Variable/Array of settings needed for ^DIC call
; FIRST - Set to 1 initially and then 0 for subsequent calls
; Output: FIRST - Set to 0
; IEN - IEN of the selected Division
; null if no selection was made
EXPAND ; ACTION - Expand Patient (EP)
LINKI ; ACTION - View Patient Insurance (VI)
ACCTPR ; ACTION - Account Profile (AP)
PTVW ; ACTION - View Patient (PT)
CEA ; ACTION - CANCEL EDIT ADD (CN)
CEAX ;
PRTSTAT ; ACTION - PRINT A PAYMENT STATEMENT (PR)
REMOVE ; ACTION - REMOVE FROM WORKLIST (RM)
KILLGLB ; Kill Worklist Globals
HELP ; -- help code
EXIT ; -- exit code
EXDIV ;
CHKFILT ; Check Filters

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,VALMHDR(1)
  • Line Location: HDR+11
Function Call: WRITE
  • Prompt: !,"Please Select Type of Report"
  • Line Location: FILTER+12
Function Call: WRITE
  • Prompt: !!?11,"1 Bankruptcy"
  • Line Location: FILTER+13
Function Call: WRITE
  • Prompt: !?11,"2 Deaths"
  • Line Location: FILTER+14
Function Call: WRITE
  • Prompt: !?11,"3 Uncollectible"
  • Line Location: FILTER+15
Function Call: WRITE
  • Prompt: !?11,"4 Payment in Full"
  • Line Location: FILTER+16
Function Call: WRITE
  • Prompt: !?11,"5 Satisfied PA"
  • Line Location: FILTER+17
Function Call: WRITE
  • Prompt: !?11,"6 Compromise"
  • Line Location: FILTER+18
Function Call: WRITE
  • Prompt: !?11,"7 All Returns"
  • Line Location: FILTER+19
Function Call: WRITE
  • Prompt: !
  • Line Location: FILTER+20
Function Call: WRITE
  • Prompt: !
  • Line Location: FILTER+22
Function Call: WRITE
  • Prompt: !
  • Line Location: FILTER+34
Function Call: WRITE
  • Prompt: !!,*7,"No Division(s) selected. Quitting.",!
  • Line Location: FILTER+35
Function Call: WRITE
  • Prompt: !
  • Line Location: FILTER+54
Function Call: WRITE
  • Prompt: !!!,"Type of Report: "
  • Line Location: SHOWFILT+8
Function Call: WRITE
  • Prompt: $S(RCRPT[99:"All Returns",1:"Selected")
  • Line Location: SHOWFILT+10
Function Call: WRITE
  • Prompt: !,"Show All or Selected Divisions: "
  • Line Location: SHOWFILT+12
Function Call: WRITE
  • Prompt: $S($G(VAUTD)=0:"Selected",1:"All")
  • Line Location: SHOWFILT+13
Function Call: WRITE
  • Prompt: !!,*7,"Division entry is required!",!
  • Line Location: ONEDIV+8
Function Call: WRITE
  • Prompt: !!,*7,"User exited the option with '^',quitting.",!
  • Line Location: ONEDIV+9
Function Call: WRITE
  • Prompt: !!,"Debtor is not a VA Patient"
  • Line Location: LINKI+7
Function Call: WRITE
  • Prompt: !!,"Debtor is not a VA Patient."
  • Line Location: PTVW+7
Function Call: WRITE
  • Prompt: *7,!!?3,"You must hold the IB AUTHORIZE security key in order to access this option.",!
  • Line Location: CEA+10
Function Call: WRITE
  • Prompt: *7,!!?3,"The AR Debtor must be a patient for this action."
  • Line Location: CEA+19
Function Call: WRITE
  • Prompt: !?3,"For this account, the AR Debtor is ",DEBTTYP,".",!
  • Line Location: CEA+20
Function Call: WRITE
  • Prompt: !
  • Line Location: CEA+28
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DG(40.8 - [#40.8] GET1^DIQ
^PRCA(430 - [#430] Classic Fileman Calls
^PRCA(433 - [#433] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call