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: PRCAG

Package: Accounts Receivable

Routine: PRCAG


Information

PRCAG ;WASH-ISC@ALTOONA,PA/CMS-Reprint Statement/Letter Option Entries ;8/23/93 2:42 PM

Source Information

Source file <PRCAG.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
Accounts Receivable 2 PRDT^PRCAGP  SITE^PRCAGU  
VA FileMan 2 ^%DT  ^DIC  

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: 4

Package Total Caller Graph
Accounts Receivable 4 PRCAE PR LETTERS  PRCAE PR STATEMENT  PRCAE REPRINT LETTERS  PRCAE REPRINT UB  

Entry Points

Name Comments DBIA/ICR reference
V ;;4.5;Accounts Receivable;**149,165,198**;Mar 20, 1995
REP ;ENTRY FROM REPRINT PAT STATEMENT
ADT
REPD
REPQ
UB ;ENTRY FROM REPRINT UB BILLS
REB ;ENTRY FROM REPRINT FOLLOW-UP LETTERS
REBDT
REBD
REBD1
REBQ
PRDT ;ENTRY FROM PRINT STATEMENT/LETTER BY DATE OPTION

External References

Name Field # of Occurrence
^%DT ADTREBDT
^%ZIS REPDREBD+1
^%ZISC REPQREBQ
^%ZTLOAD REPD+2, REBD1+1
^DIC ADT+7, ADT+12, REBDT+8, REBDT+15
PRDT^PRCAGP PRDT+1
SITE^PRCAGU REB+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: REP+2
Function Call: WRITE
  • Prompt: !!,*7,"No notifications sent on that date",!
  • Line Location: ADT+2
Function Call: WRITE
  • Prompt: !!,"Press return at the 'Patient:' prompts to reprint all patient statements",!,"for the date selected or select a start and/or end point."
  • Line Location: ADT+4
Function Call: WRITE
  • Prompt: !,"NOTE: The range is in print order not alphabetic!",!
  • Line Location: ADT+5
Function Call: WRITE
  • Prompt: *7,!," Sorry, Debtor Statement not found on this date!"
  • Line Location: ADT+11
Function Call: WRITE
  • Prompt: *7,!," Sorry, Debtor Statement not found on this date!"
  • Line Location: ADT+15
Function Call: WRITE
  • Prompt: *7,!,"Ending bill is before starting bill!"
  • Line Location: ADT+16
Function Call: WRITE
  • Prompt: !!
  • Line Location: REPD+0
Function Call: WRITE
  • Prompt: !!,*7,"YOU MUST QUEUE THIS OUTPUT",!
  • Line Location: REPD+1
Function Call: WRITE
  • Prompt: !!,*7,"No notifications sent on that date",!
  • Line Location: REBDT+2
Function Call: WRITE
  • Prompt: !!,"Press return at the 'Bill:' prompts to reprint all ",ETY," Letters",!,"for the date selected or select a start and/or end point."
  • Line Location: REBDT+4
Function Call: WRITE
  • Prompt: !,"Do not select bills that print on the Patient Statement."
  • Line Location: REBDT+5
Function Call: WRITE
  • Prompt: !,"NOTE: The range is in print order not alphabetic!",!
  • Line Location: REBDT+6
Function Call: WRITE
  • Prompt: *7,!," Sorry, not found!"
  • Line Location: REBDT+14
Function Call: WRITE
  • Prompt: *7,!," Sorry, not found!"
  • Line Location: REBDT+20
Function Call: WRITE
  • Prompt: *7,!,"Ending bill is before starting bill!"
  • Line Location: REBDT+21
Function Call: WRITE
  • Prompt: !!
  • Line Location: REBDT+22
Function Call: WRITE
  • Prompt: !!,*7,"YOU MUST QUEUE THIS OUTPUT",!
  • Line Location: REBD+2
Routine Call
  • DIC
  • Line Location:
    • ADT+7
    • ADT+12
    • REBDT+8
    • REBDT+15
Routine Call
  • %ZIS
  • Line Location:
    • REPD
    • REBD+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RCD(340 - [#340] Classic Fileman Calls
^PRCA(430 - [#430] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRCA(430 - [#430] REBDT+10, REBDT+17
^RC(341 - [#341] ADT+2, ADT+9, ADT+10, ADT+14, REBDT+2, REBDT+10, REBDT+11, REBDT+13, REBDT+17, REBDT+18
^RC(341.1 - [#341.1] ADT+9, ADT+14, REBDT+10, REBDT+17
^RC(342 - [#342] REPDREBD+1

Label References

Name Line Occurrences
ADT ADT+2, ADT+11, ADT+15, ADT+16
REBD REBD+2
REBD1 REBD
REBDT REBDT+2, REBDT+14, REBDT+20, REBDT+21
REBQ REBDTREBDT+8, REBDT+15, REBD+1
REPD REPD+1
REPQ ADTADT+7, ADT+12, REPD

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT REP+1~, ADT*, REB+1~, REBDT*
%DT("A" ADT*, REBDT*
%DT(0 ADT*, REBDT*
>> %ZIS REPD*, REBD+1*
>> %ZIS("B" REPD*, REBD+1*
BEG REP+1~, ADT+8*, ADT+9*, ADT+10*, ADT+11, ADT+16, REB+1~, REBDT+9*, REBDT+10*, REBDT+11*
REBDT+13*, REBDT+14, REBDT+21
>> DA REBDT+11*, REBDT+18*
DAT REP+1~, ADT+3*, ADT+9, ADT+10, ADT+14, ADT+17, REB+1~, REBDT+3*, REBDT+10, REBDT+13
REBDT+17
DATE REP+1~, ADT+9*, ADT+14*, REB+1~, REBDT+10*, REBDT+11, REBDT+17*, REBDT+18
DEB REP+1~, ADT+9*, ADT+14*, REB+1~, REBDT+10*, REBDT+11*, REBDT+17*, REBDT+18*
DIC REP+1~, ADT+7*, ADT+12*, REB+1~, REBDT+8*
DIC("A" ADT+7*, ADT+12*, REBDT+8*, REBDT+15*
DIC("S" ADT+7*, ADT+12*, REBDT+8*
DIC(0 ADT+7*, ADT+12*, REBDT+8*
DPTNOFZK ADT+6~*, REBDT+7~*
DPTNOFZY ADT+6~*, REBDT+7~*
>> DTOUT ADT+7, ADT+12, REBDT+8, REBDT+15
END REP+1~, ADT+13*, ADT+14*, ADT+15, ADT+16, REB+1~, REBDT+16*, REBDT+17*, REBDT+18*, REBDT+20
REBDT+21
ETY UB+1*, REB+3*, REBDT+4, REBDT+10, REBDT+17, REBDREBD1+1, REBQ!
HDAT REP+1~, ADT+17*
>> IO("Q" REPD+1, REBD+2
IOP REP+1~, REPD*, REB+1~, REBD+1*
>> POP REPDREBD+1
SITE REP+1~, REB+1~
TYP REP+1~, ADT+9*, ADT+14*, REB+1~, REBDT+10*, REBDT+11, REBDT+17*, REBDT+18
U REPDREBDT+10, REBDT+17, REBD+1
X REP+1~, ADT+7, ADT+12, REB+1~, REBDT+8, REBDT+15
Y REP+1~, ADTADT+1*, ADT+2, ADT+3, ADT+8*, ADT+9, ADT+13*, ADT+14, REB+1~
REBDTREBDT+1*, REBDT+2, REBDT+3, REBDT+9*, REBDT+10, REBDT+11, REBDT+16*, REBDT+17, REBDT+18
ZTDESC REP+1~, REPD+2*, REB+1~, REBD1+1*
>> ZTIO REBD*
ZTRTN REP+1~, REPD+2*, REB+1~, REBD1*
ZTSAVE REP+1~, REB+1~
ZTSAVE("BEG" REPD+2*, REBD1*
ZTSAVE("DAT" REBD1*
ZTSAVE("END" REPD+2*, REBD1*
ZTSAVE("ETY" REBD1*
ZTSAVE("HDAT" REPD+2*
ZTSAVE("SITE" REBD1*
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