Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: RCDPEFA2

Package: Accounts Receivable

Routine: RCDPEFA2


Information

RCDPEFA2 ;AITC/FA - FIRST PARTY AUTO-DECREASE REPORT, cont. ; 5/29/19 12:31pm

Source Information

Source file <RCDPEFA2.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Accounts Receivable 2 ASK^RCDPEADP  ($$PCENT,HDR)^RCDPEFA1  
Kernel 2 ^%ZIS  $$FMTE^XLFDT  
VA FileMan 2 ^DIC  ^DIR  
Registration 1 DIVISION^VAUTOMA  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Accounts Receivable 2 RCDPEFA1  RCDPEFA3  

Entry Points

Name Comments DBIA/ICR reference
STADIV(RCVAUTD) ; EP from RCDPEFA1 - Division/Station selection
; Input: None
; Output: RCVAUTD - Array of selected Divisions/Stations, passed by ref.
; Returns: 1 - All selected, 2 - specific Divisions/Stations, 0 - U or timeout
ASKPAT() ; EP from RCDPEFA1 - Filter by Patient or 'ALL'
; Input: None
; Returns: P - Sort by Claim
; A - Sort by Patient Name
; 0 - User entered '^' or timed out
ASKPAT2() ; Select the Patient to filter by
; Input: None
; Returns: IEN - Select Patient IEN file #2
; 0 - User entered '^' or timed out or no patient selected
ASKPAT3() ; Ask whether to display comment details for single patient search
; Input: None
; Returns: Y = Yes, display comment details
; N = No, do not display comment details
; -1 = User entered '^' or timed out
ASKSORT() ; EP from RCDPEFA1 - Select the sort criteria
; Input: None
; Returns: C - Sort by Claim
; N - Sort by Patient Name
; 0 - User entered '^' or timed out
SORTORD(SORT) ; EP from RCDPEFA1 - Select the sort order
; Input: SORT - 'C' - Sort by Claim Number
; 'N' - Sort by Patient Name
; Returns: F - First to Last
; L - Last to First
; 0 - User entered '^' or timed out
DTRNG() ; EP from RCDPEFA1 - Get the date range for the report
; Input: None
; Returns: A1|A2|A3 - Where:
; A1 - 0 - User up-arrowed or timed out, 1 otherwise
; A2 - Auto-Post Start Date
; A3 - Auto-Post End Date
DATES(BDATE,EDATE) ; Get a date range.
; Input: None
; Output: BDATE - Internal Auto-Post Start Date
; EDATE - Internal Auto-Post End Date
D1 ; looping tag
DISPTY() ; EP from RCDPEFA1 - Get display/output type
; Input: None
; Returns: 1 - Output to Excel
; 0 - Output to paper
DETSUM() ; EP from RCDPEFA1 - Get detail/summary type
DEVICE(IO) ; Select output device
; Input: None
; Output: IO - Array of selected output info
; Returns: 0 - No device selected, 1 Otherwise
LMAN(DATA,INPUT,RCCMT,XX) ;EP from RCDPEFA1
; Format and save List Manager line
; Input: DATA - ERA line adjustment total
; INPUT - Input parameters in delimited list
; RCCMT - Array of free text comments for this decrease
; XX - List Counter for ^TMP("RCDPE_ADP",$J)
TOTALD(LMAN,HDRINFO,PAGE,STOP,DAY,DTOTAL,LCNT) ; Totals for a single day
; Input: LMAN - 1 if output to List Template, 0 otherwise
; HDRINFO - Array of header information
; PAGE - Page Number
; DAY - FileMan date to display totals for
; DTOTAL - Array of totals by day
; LCNT - Current line count (only passedif LMAN=1)
; Output: PAGE - Updated Page Number (if a new header is displayed)
; STOP - 1 if user indiacted to stop
; LCNT - Updated line count (only passedif LMAN=1)
TOTALG(LMAN,HDRINFO,PAGE,GTOTAL,STOP,LCNT) ; Overall report total
; Input: LMAN - 1 if output to Listman, 0 otherwise
; HDRINFO - Array of header info
; PAGE - Current Page Number
; GTOTAL - Grand Totals for report
; LCNT - Current line count (only passedif LMAN=1)
; Output: PAGE - Updated Page Number (if new header is displayed)
; LCNT - Updated line count (only passedif LMAN=1)

External References

Name Field # of Occurrence
^%ZIS DEVICE+6
^DIC ASKPAT2+7
^DIR ASKPAT+11, ASKPAT3+8, ASKSORT+11, SORTORD+12, D1+5, D1+13, DISPTY+8, DETSUM+5
ASK^RCDPEADP TOTALD+27, TOTALG+21
$$PCENT^RCDPEFA1 TOTALD+17, TOTALG+12, TOTALG+28
HDR^RCDPEFA1 TOTALD+29, TOTALG+23
DIVISION^VAUTOMA STADIV+5
$$FMTE^XLFDT TOTALD+14

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,LN1
  • Line Location: TOTALD+31
Function Call: WRITE
  • Prompt: !,LN2
  • Line Location: TOTALD+32
Function Call: WRITE
  • Prompt: !,LN3
  • Line Location: TOTALD+33
Function Call: WRITE
  • Prompt: !!,"**** Totals for Date Range: # of Decrease Adjustments: "_+$P(GTOTAL,U,1)
  • Line Location: TOTALG+25
Function Call: WRITE
  • Prompt: !,Y
  • Line Location: TOTALG+27
Function Call: WRITE
  • Prompt: !,Y,!
  • Line Location: TOTALG+29
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+6
Routine Call
  • DIC
  • Line Location:
    • ASKPAT2+7
Routine Call
  • DIR
  • Line Location:
    • ASKPAT+11
    • ASKPAT3+8
    • ASKSORT+11
    • SORTORD+12
    • D1+5
    • D1+13
    • DISPTY+8
    • DETSUM+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] STADIV+9
^TMP("RCDPE_ADP" LMAN+14*, LMAN+19*, TOTALD+20*, TOTALD+21*, TOTALD+22*, TOTALD+23*, TOTALD+24*, TOTALG+15*, TOTALG+16*, TOTALG+17*
, TOTALG+18*

Label References

Name Line Occurrences
$$ASKPAT2 ASKPAT+14
$$ASKPAT3 ASKPAT+18
DATES DTRNG+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DEVICE+4~, DEVICE+5*
BDATE DATES~, D1+1*, D1+7*, D1+8*, D1+11, D1+15*
C1 ASKPAT+5~, ASKPAT+13*, ASKPAT+14, ASKPAT+16, ASKPAT+20
C2 ASKPAT+5~, ASKPAT+13*, ASKPAT+14*, ASKPAT+15, ASKPAT+16, ASKPAT+18, ASKPAT+20
C3 ASKPAT+5~, ASKPAT+13*, ASKPAT+18*, ASKPAT+19, ASKPAT+20
CNT LMAN+7~, LMAN+16*, LMAN+17, LMAN+18
DAMT TOTALD+10~, TOTALD+12*, TOTALD+16, TOTALD+17
DATA LMAN~, LMAN+8, LMAN+9, LMAN+10, LMAN+11, LMAN+12, LMAN+13
DAY TOTALD~, TOTALD+11, TOTALD+12, TOTALD+13, TOTALD+14
DCNT TOTALD+10~, TOTALD+11*, TOTALD+15
DCOP TOTALD+10~, TOTALD+13*, TOTALD+17
DIC ASKPAT2+4~, ASKPAT2+5*
DIC("A" ASKPAT2+6*
DIC(0 ASKPAT2+5*
DIR ASKPAT+5~, ASKPAT3+5~, ASKSORT+5~, SORTORD+6~, DTRNG+6~, D1+6!, D1+14!, DISPTY+4~, DETSUM+1~
DIR("?" ASKPAT+8*, ASKPAT+9*, ASKSORT+8*, ASKSORT+9*, D1+2*, D1+9*
DIR("A" ASKPAT+7*, ASKPAT3+7*, ASKSORT+7*, SORTORD+9*, D1+4*, D1+12*, DISPTY+6*, DETSUM+2*
DIR("B" ASKPAT+10*, ASKSORT+10*, SORTORD+11*, D1+10*, DISPTY+7*, DETSUM+4*
DIR(0 ASKPAT+6*, ASKPAT3+6*, ASKSORT+6*, SORTORD+10*, D1+3*, D1+11*, DISPTY+5*, DETSUM+3*
DIROUT ASKPAT+5~, ASKPAT2+4~, ASKPAT3+5~, ASKSORT+5~, SORTORD+6~, DTRNG+6~, DISPTY+4~, DETSUM+1~
DIRUT ASKPAT+5~, ASKPAT2+4~, ASKPAT3+5~, ASKSORT+5~, SORTORD+6~, DTRNG+6~, DISPTY+4~, DETSUM+1~
DT D1+3, D1+11
DTOTAL TOTALD~
DTOTAL( TOTALD+11, TOTALD+12, TOTALD+13
DTOUT STADIV+4~, ASKPAT+5~, ASKPAT+12, ASKPAT2+4~, ASKPAT2+8, ASKPAT3+5~, ASKPAT3+9, ASKSORT+5~, ASKSORT+12, SORTORD+6~
, SORTORD+13, DTRNG+6~, D1+7, D1+15, DISPTY+4~, DETSUM+1~, DETSUM+6
DUOUT STADIV+4~, ASKPAT+5~, ASKPAT+12, ASKPAT2+4~, ASKPAT2+8, ASKPAT3+5~, ASKPAT3+9, ASKSORT+5~, ASKSORT+12, SORTORD+6~
, SORTORD+13, DTRNG+6~, D1+7, D1+15, DISPTY+4~, DISPTY+9, DETSUM+1~, DETSUM+6
EDATE DATES~, D1+1*, D1+16*
>> EXCEL TOTALD+29, TOTALG+23
GAMT TOTALG+8~, TOTALG+9*, TOTALG+12, TOTALG+28
GCOP TOTALG+8~, TOTALG+9*, TOTALG+12, TOTALG+28
GTOTAL TOTALG~, TOTALG+9, TOTALG+10, TOTALG+11, TOTALG+25, TOTALG+26
HDRINFO TOTALD~, TOTALD+29, TOTALG~, TOTALG+23
INPUT LMAN~
>> INPUTS LMAN+15
IO DEVICE~
IOSL TOTALD+26, TOTALG+20
LCNT TOTALD~, TOTALD+20*, TOTALD+21*, TOTALD+22*, TOTALD+23*, TOTALD+24*, TOTALG~, TOTALG+15*, TOTALG+16*, TOTALG+17*
, TOTALG+18*
LMAN TOTALD~, TOTALD+19, TOTALG~, TOTALG+14
LN1 TOTALD+10~, TOTALD+14*, TOTALD+15*, TOTALD+21, TOTALD+31, TOTALG+8~, TOTALG+10*, TOTALG+16
LN2 TOTALD+10~, TOTALD+16*, TOTALD+22, TOTALD+32, TOTALG+8~, TOTALG+11*, TOTALG+17
LN3 TOTALD+10~, TOTALD+17*, TOTALD+23, TOTALD+33, TOTALG+8~, TOTALG+12*, TOTALG+18
PAGE TOTALD~, TOTALD+29, TOTALG~, TOTALG+23
POP DEVICE+4~, DEVICE+7
RCCMT LMAN~
RCCMT( LMAN+16, LMAN+18
RCEND DTRNG+6~, DTRNG+7, DTRNG+9
RCSTART DTRNG+6~, DTRNG+7, DTRNG+8, DTRNG+9, DTRNG+10
RCVAUTD STADIV~
RCVAUTD( STADIV+9*
RNGFLG DTRNG+6~
SORT SORTORD~, SORTORD+8
STOP TOTALD~, TOTALD+27, TOTALD+28, TOTALD+30, TOTALG~, TOTALG+21, TOTALG+22, TOTALG+24
U ASKPAT2+11, LMAN+8, LMAN+9, LMAN+10, LMAN+11, LMAN+12, LMAN+13, LMAN+15, TOTALD+11, TOTALD+12
, TOTALD+13, TOTALG+9, TOTALG+10, TOTALG+11, TOTALG+25, TOTALG+26
VAUTD STADIV+4~, STADIV+7
VAUTD( STADIV+8, STADIV+9
X DTRNG+6~
XX ASKPAT+5~, ASKSORT+5~, SORTORD+6~, SORTORD+7*, SORTORD+9, LMAN~, LMAN+14*, LMAN+19*
Y STADIV+4~, STADIV+6, STADIV+8*, STADIV+9, ASKPAT+13, ASKPAT2+9, ASKPAT2+10, ASKPAT2+11, ASKPAT3+5~, ASKPAT3+10
, ASKSORT+13, SORTORD+14, DTRNG+6~, D1+7, D1+8, D1+15, D1+16, DISPTY+4~, DISPTY+10, DETSUM+1~
, DETSUM+7, LMAN+7~, LMAN+8*, LMAN+9*, LMAN+10*, LMAN+11*, LMAN+12*, LMAN+13*, LMAN+14, LMAN+17*
, LMAN+18*, LMAN+19, TOTALG+26*, TOTALG+27, TOTALG+28*, TOTALG+29
Y(0 D1+10
YY SORTORD+6~, SORTORD+8*, SORTORD+9
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All