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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PRCADR1

Package: Accounts Receivable

Routine: PRCADR1


Information

PRCADR1 ;SF-ISC/YJK-PRINT ADDRESS,APPROPR.CDS ;8/16/96 1:02 PM

Source Information

Source file <PRCADR1.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Accounts Receivable 3 PRCOMM^PRCAUT3  $$DADD^RCAMADD  ($$ADM,$$INT)^RCMSFN01  
Registration 1 DEM^VADPT  
VA FileMan 1 ^%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: 12

Package Total Caller Graph
Accounts Receivable 12 PRCA 3RD PROFILE  PRCA DISP AUDIT  PRCA MEANS PROFILE  PRCA OTHER PROFILE  PRCA PROFILE  PRCA VENDOR PROFILE  PRCATO2  PRCATP1  
PRCATP2  PRCATP3  PRCATP4  PRCATP5  

Entry Points

Name Comments DBIA/ICR reference
V ;;4.5;Accounts Receivable;**49,138,233**;Mar 20, 1995;Build 4
EN1 ;print the appropriation,pat ref #. (multiple) and amount.
END1
WRPAT
EN2 ;PRINT DEBTOR'S ADDRESS - VENDOR
WR
END2
EN4 ;Print the debtor's other bills.
END4
EN41
END41
EN5 ;Print interest/admin rate date and rate.
EN51 ;
W5
PATNM ;write a patient name for the 3rd party
EN6 ;Insurance insured's information

External References

Name Field # of Occurrence
^%DT EN4+4
PRCOMM^PRCAUT3 EN4+1
$$DADD^RCAMADD EN2+1
$$ADM^RCMSFN01 EN51+1
$$INT^RCMSFN01 EN5+2
DEM^VADPT PATNM+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"ORIGINAL AMOUNT: ",$J($P(^PRCA(430,D0,0),U,3),0,2)
  • Line Location: EN1+1
Function Call: WRITE
  • Prompt: !,"MEDICARE CONTRACTUAL ADJUSTMENT: ",$J($P($G(^PRCA(430,D0,13)),"^"),0,2)
  • Line Location: EN1+2
Function Call: WRITE
  • Prompt: !,"UNREIMBURSED MEDICARE EXPENSE: ",$J($P($G(^PRCA(430,D0,13)),"^",2),0,2)
  • Line Location: EN1+3
Function Call: WRITE
  • Prompt: !!,"FISCAL YEAR",?15,"APPROP. CODE",?38,"PAT REFERENCE #",?66,"AMOUNT"
  • Line Location: EN1+4
Function Call: WRITE
  • Prompt: !,"-----------",?15,"------------",?38,"---------------",?66,"------"
  • Line Location: EN1+5
Function Call: WRITE
  • Prompt: !,?5,PRCAFY,?18,$E(PRCAPPR,1,10),?40,PRCAPAT,?60,$J(PRCAMT,12,2)
  • Line Location: WRPAT+3
Function Call: WRITE
  • Prompt: !
  • Condition for execution: PRCALN<1
  • Line Location: WR+0
Function Call: WRITE
  • Prompt: !,?PRCALN,$P(PRCAGL,U,1)
  • Line Location: WR+0
Function Call: WRITE
  • Prompt: ", ",PRCASTE," ",$P(PRCAGL,U,6)
  • Line Location: WR+2
Function Call: WRITE
  • Prompt: " PHONE NO.:",$P(PRCAGL,U,9)
  • Line Location: WR+3
Function Call: WRITE
  • Prompt: !,"Statement date: "
  • Line Location: EN4+4
Function Call: WRITE
  • Prompt: $S($L(Y)>4:Y,1:"N/A")
  • Line Location: EN4+4
Function Call: WRITE
  • Prompt: !,"OTHER BILLS:",!?2
  • Line Location: EN4+5
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: EN4+7
Function Call: WRITE
  • Prompt: !!,"INTEREST EFFECTIVE RATE DATE: ",PRCA("INTD"),?45,"ANNUAL INTEREST RATE: ",PRCA("INTR")
  • Line Location: W5+0
Function Call: WRITE
  • Prompt: !,"ADMIN EFFECTIVE RATE DATE: ",PRCA("ADMD"),?45,"MONTHLY ADMIN RATE: ",PRCA("ADMR")
  • Line Location: W5+1
Function Call: WRITE
  • Prompt: !,"PATIENT: ",$S($D(VADM):VADM(1),1:""),?45,"SSN: ",$S($D(VADM):$P(VADM(2),U,2),1:""),!
  • Line Location: PATNM+3
Function Call: WRITE
  • Prompt: !!,"INSURED'S NAME",?28,"ID NO.",?45,"GROUP NAME",?62,"GROUP NO."
  • Line Location: EN6+2
Function Call: WRITE
  • Prompt: !,?2,$P(Z,U,1),?29,$P(Z,U,4),?46,$P(Z,U,5),?63,$P(Z,U,6)
  • Line Location: EN6+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" EN4+4, EN5+3, EN51+1
^DIC(36 - [#36] EN6+4, EN6+5
^PRC(442 - [#442] WRPAT+1
^PRCA(430 - [#430] EN1+1, EN1+2, EN1+3, EN1+6, WRPATWRPAT+1, WRPAT+2, EN2+1, EN4+1, EN4+2
EN4+6, EN41EN41+1, EN5+2, EN51+1, PATNM+2, EN6+1, EN6+4
^PRCA(430.2 - [#430.2] EN4+1, EN41
^PRCA(430.3 - [#430.3] EN41+1
^RCD(340 - [#340] EN2+1, EN4+3, EN4+4

Label References

Name Line Occurrences
EN41 EN4+6
END2 EN2+1
END4 EN4+1, EN4+3
END41 EN41
WRPAT EN1+6

Naked Globals

Name Field # of Occurrence
^(0 WRPATWRPAT+1, EN2+1, EN4+2, EN41+1, EN6+4, EN6+5
^(202 EN6+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% END2!, EN6+4*, EN6+5!
%DT EN4+4~*
>> D0 EN1+1, EN1+2, EN1+3, EN1+6, WRPATWRPAT+1, WRPAT+2, EN2+1, EN4+1, EN4+2
EN4+6
DFN PATNM+2*, PATNM+3!
DT EN4+4
DTIME EN4+7
I WR+1*, EN4+6*, END4!
IOF EN4+8
IOSL EN4+6
IOST EN4+6
PRCA("ADMD" EN5+1*, EN51+1*, W5+1, W5+2!
PRCA("ADMR" EN5+1*, EN51+1*, W5+1, W5+2!
PRCA("INTD" EN5+1*, EN5+3*, W5W5+2!
PRCA("INTR" EN5+1*, EN5+2*, W5W5+2!
>> PRCABN EN5+1, EN5+2, EN51+1, PATNM+1, PATNM+2, EN6+1, EN6+4
PRCABNT EN4+5*, EN4+6*, END4!, EN41EN41+1
PRCABTY EN41+1*, END41!
PRCACT EN4+5*, EN4+6*, END4!, EN41+1
PRCADB EN2+1*!
PRCADBPT EN2+1*, END2!, EN4+2*, EN4+3, EN4+4, EN4+6, END4!
PRCAE1 EN1+6*, END1!
PRCAFN EN1+6*, END1!, WRPATWRPAT+1
PRCAFY WRPAT*, WRPAT+3, WRPAT+4!
PRCAGL EN2+1*, EN2+2, WRWR+1, WR+2, WR+3, END2!
PRCAIDT EN5+2*, W5+2!
PRCALN EN2+2*, WRWR+1, END2!
PRCAMT WRPAT*, WRPAT+3, WRPAT+4!
PRCAPAT WRPAT+1*, WRPAT+3, WRPAT+4!
PRCAPPR WRPAT+2*, WRPAT+3, WRPAT+4!
PRCASTE EN2+2*, WR+2, END2!
>> PRCAT PATNM+1, EN6+1
PRCAT1 EN4+1*, END4!
PRCAT11 EN41*, EN41+1, END41!
U EN1+1, WRPATWRPAT+1, WRPAT+2, EN2+1, EN2+2, WRWR+1, WR+2, WR+3
EN4+1, EN4+2, EN41EN41+1, PATNM+2, PATNM+3, EN6+3, EN6+4, EN6+5
VADM PATNM+3!
VADM(1 PATNM+3
VADM(2 PATNM+3
VAERR PATNM+3!
X EN2+1~*, EN4+3*, EN4+4*, EN4+6*, EN4+7*, EN5+2*, EN5+3, EN51+1*, W5+2*
Y EN4+4~, EN5+3*, EN51+1*
Z EN6+1*, EN6+3, EN6+5!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All