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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PRCAGST

Package: Accounts Receivable

Routine: PRCAGST


Information

PRCAGST ;WASH-ISC@ALTOONA,PA/CMS-Print Patient Statement ;12/12/96 9:39 AM

Source Information

Source file <PRCAGST.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Accounts Receivable 6 ^PRCAGST1  SITE^PRCAGU  $$DADD^RCAMADD  ($$FPS,$$PST)^RCAMFN01  $$STD^RCCPCFN  ($$NAM,$$SADD,$$SSN)^RCFN01  
Integrated Billing 1 $$ISGMTBIL^IBAGMT  
Registration 1 $$SITE^VASITE  
VA FileMan 1 DD^%DT  

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

Package Total Caller Graph
Accounts Receivable 3 PRCAGS  RCCPCPS  RCCPCSTM  

Entry Points

Name Comments DBIA/ICR reference
V ;;4.5;Accounts Receivable;**34,181,190,249**;Mar 20, 1995;Build 2
EN(DEB,TBAL,PDAT,PBAL,LDT) ;
LB
MES ;text for no amount due
GMT(PRDEB)

External References

Name Field # of Occurrence
DD^%DT EN+11, EN+15
$$ISGMTBIL^IBAGMT GMT+4
^PRCAGST1 LB+12
SITE^PRCAGU EN+2
$$DADD^RCAMADD LB+2
$$FPS^RCAMFN01 EN+11
$$PST^RCAMFN01 EN+11
$$STD^RCCPCFN EN+11
$$NAM^RCFN01 LB
$$SADD^RCFN01 EN+4
$$SSN^RCFN01 EN+3
$$SITE^VASITE EN+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !!,"Department of Veterans Affairs",?50,"Acct No.: ",$P($$SITE^VASITE(),U,3)_"/"_$E(SSN,6,9)
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: !,$G(ADD(1))
  • Line Location: EN+10
Function Call: WRITE
  • Prompt: !,$G(ADD(2)),?50
  • Line Location: EN+12
Function Call: WRITE
  • Prompt: "Due: UPON RECEIPT"
  • Line Location: EN+12
Function Call: WRITE
  • Prompt: !,$G(ADD(3)),?50,$S(TBAL>0:"Amount Due: $"_$J(TBAL,0,2),1:"NO AMOUNT DUE")
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: !,$G(ADD(5)),?50,"Today's Date: "
  • Line Location: EN+15
Function Call: WRITE
  • Prompt: Y
  • Line Location: EN+15
Function Call: WRITE
  • Prompt: !!,?2,"Please Make your Check or Money Order payable to the ""Department of Veterans"
  • Line Location: EN+17
Function Call: WRITE
  • Prompt: !,?2,"Affairs"" and send payment to the above address. If you have any questions"
  • Line Location: EN+18
Function Call: WRITE
  • Prompt: !,?2,"regarding this statement, please call the number listed above.",!!!
  • Line Location: EN+19
Function Call: WRITE
  • Prompt: !,?7,NAM
  • Line Location: LB+1
Function Call: WRITE
  • Prompt: !,?7,$E(ADD(X),1,40)
  • Line Location: LB+5
Function Call: WRITE
  • Prompt: ?50
  • Line Location: LB+5
Function Call: WRITE
  • Prompt: !
  • Line Location: LB+6
Function Call: WRITE
  • Prompt: !,?2,SITE("COM1")
  • Line Location: LB+7
Function Call: WRITE
  • Prompt: !,?2,"REDUCTION OF INPATIENT COPAYMENT DUE TO GEOGRAPHIC MEANS TEST STATUS"
  • Line Location: LB+8
Function Call: WRITE
  • Prompt: !!
  • Line Location: LB+9
Function Call: WRITE
  • Prompt: !,?10,"Please Detach and Return Top Portion with Payment"
  • Line Location: LB+9
Function Call: WRITE
  • Prompt: !,Y
  • Line Location: LB+10
Function Call: WRITE
  • Prompt: !,"IMPORTANT: Please read the Notice of Rights accompanying this statement!",!
  • Line Location: LB+11
Function Call: WRITE
  • Prompt: !!,?2,"This statement is being sent to you to provide you with information"
  • Line Location: MES+1
Function Call: WRITE
  • Prompt: !,?2,"concerning transactions affecting your account. If a prepayment offset"
  • Line Location: MES+2
Function Call: WRITE
  • Prompt: !,?2,"a bill or you have made one or more payments or charges were removed,"
  • Line Location: MES+3
Function Call: WRITE
  • Prompt: !,?2,"from your account, you are being sent this statement to confirm these actions.",!!
  • Line Location: MES+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRCA(430 - [#430] GMT+4
^TMP("PRCAGT" GMT+2, GMT+3

Label References

Name Line Occurrences
$$GMT LB+8
LB EN+16
MES EN+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADD EN+1~, EN+4*, EN+5, EN+6, EN+7, LB!, LB+2*, LB+3, LB+4
ADD( EN+5*, EN+6*, EN+7*, LB+3*, LB+4*, LB+5
ADD(1 EN+10
ADD(2 EN+12
ADD(3 EN+13
ADD(4 EN+14
ADD(5 EN+15
DA EN+1~
DEB EN~, EN+3, EN+11, LBLB+2, LB+8
DT EN+11, EN+15
IOF EN+8
LDT EN~, EN+11
LN EN+1~
NAM EN+1~, LB*, LB+1
PAGE EN+1~
PBAL EN~
PDAT EN~
PRBN GMT~, GMT+3*, GMT+4
PRDAT GMT~, GMT+2*, GMT+3
PRDEB GMT~, GMT+2, GMT+3
PRGMT GMT~, GMT+1*, GMT+2, GMT+3, GMT+4*, GMT+5
>> SITE EN+2
>> SITE("COM1" LB+7
>> SITE("SCAN" LB+5
SSN EN+1~, EN+3*, EN+9
TBAL EN~, EN+12, EN+13, EN+14, EN+16, LB+9
U EN+5, EN+6, EN+7, EN+9, LB+3, LB+4, GMT+4
X EN+1~, EN+5*, EN+6*, EN+7*, LB+3*, LB+4*, LB+5*
X1 EN+1~
X2 EN+1~
Y EN+1~, EN+5*, EN+11*, EN+15*, LB+3*, LB+10*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All