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

Package: Integrated Patient Fund

Routine: PRPFCD1


Information

PRPFCD1 ;ALTOONA/CTB EXPANDED HEADER FOR PATIENT FUNDS CARD ;11/22/96 4:34 PM

Source Information

Source file <PRPFCD1.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Integrated Patient Fund 2 LHDR1^PRPFCD  (,D,DGINPW)^PRPFU1  

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
Integrated Patient Fund 2 PRPFCD  PRPFDSI  

Entry Points

Name Comments DBIA/ICR reference
V ;;3.0;PATIENT FUNDS;**6**;JUNE 1, 1989
LHDR ;PRINTS THE EXPANDED HEADER FOR THE PATIENT CARD
ADD ;COMPRESS ADDRESS INFO
ADD1 ;COMPRESS RELATIVE ADDRESS
ADD2 ;COMPRESS PATIENT ADDRESS
ADD3 ;COMPRESS CIVIL GUARDIAN ADDRESS

External References

Name Field # of Occurrence
LHDR1^PRPFCD LHDR+23
^PRPFU1 LHDR+13, LHDR+16, LHDR+18
D^PRPFU1 LHDR+14, LHDR+17
DGINPW^PRPFU1 LHDR+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "~~PRPF~~",!,$P(DFN(0),U)_"^"_$P(DFN(.31),U,3)_"^"_$P(DFN(0),"^",9),!
  • Line Location: LHDR+7
Function Call: WRITE
  • Prompt: "BENEFICIARY: ",?32,"CLAIM #:",?48,"I.D. #",?64,"WARD",?75,"INDIGENT",?88,"DATE OF BIRTH",?105,"DATE OF ADMISSION"
  • Line Location: LHDR+11
Function Call: WRITE
  • Prompt: !,$P(DFN(0),U),?32,"C-",$P(DFN(.31),U,3),?48,$P(DFN(0),U,9),?64,$P(DFN(.1),U)
  • Line Location: LHDR+12
Function Call: WRITE
  • Prompt: ?78,Y
  • Line Location: LHDR+13
Function Call: WRITE
  • Prompt: ?89,Y,?105,DOA
  • Line Location: LHDR+14
Function Call: WRITE
  • Prompt: !!,"TYPE OF ACCOUNT",?25,"DATE OF RESTRICTION",?50,"COMPETENCY",?84,"APPORTIONEE",?100,"GUARDIAN",?116,"INST'L AWARD"
  • Line Location: LHDR+15
Function Call: WRITE
  • Prompt: !,Y
  • Line Location: LHDR+16
Function Call: WRITE
  • Prompt: ?25,Y
  • Line Location: LHDR+17
Function Call: WRITE
  • Prompt: ?50,Y,?86,"$",$J($P(PDFN(0),U,6),0,2),?100,"$",$J($P(PDFN(0),U,7),0,2),?118,"$",$J($P(PDFN(0),U,8),0,2)
  • Line Location: LHDR+19
Function Call: WRITE
  • Prompt: !!,"PATIENT ADDRESS",?32,"NEAREST RELATIVE",?64,"VA GUARDIAN",?96,"CIVIL GUARDIAN"
  • Line Location: LHDR+20
Function Call: WRITE
  • Prompt: !,$E($P(DFN(.11),U,I),1,30),?32,$E($P(DFN(.21),U,I),1,30),?64,$E($P(DFN(.29),U,I),1,30),?96,$E($P(DFN(.291),U,I),1,30)
  • Line Location: LHDR+21
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: LHDR+22

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(5 - [#5] ADD+5, ADD1+4, ADD2+4, ADD3+4
^DPT - [#2] LHDR+1, ADD+2, ADD1+1, ADD2+1, ADD2+5, ADD3+1
^PRPF(470 - [#470] LHDR+3

Label References

Name Line Occurrences
ADD LHDR+2
ADD1 ADD+2
ADD2 ADD1+1
ADD3 ADD2+1

Naked Globals

Name Field # of Occurrence
^( LHDR+1, ADD+2, ADD1+1, ADD2+1, ADD2+5, ADD3+1
^(1 LHDR+3
^(2 LHDR+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DD LHDR+13*, LHDR+16*, LHDR+18*
>> DFN LHDR+1, LHDR+3, ADD+2, ADD1+1, ADD2+1, ADD2+5, ADD3+1
>> DFN( LHDR+1*, LHDR+7, LHDR+12, LHDR+21, ADD+2*, ADD+3*, ADD+4*, ADD+5*, ADD+6*, ADD1+1*
, ADD1+2*, ADD1+3*, ADD1+4*, ADD1+5*, ADD2+1*, ADD2+2*, ADD2+3*, ADD2+4*, ADD2+5*, ADD3+1*
, ADD3+2*, ADD3+3*, ADD3+4*, ADD3+5*
>> DFN(0 LHDR+7, LHDR+12, LHDR+14
>> DOA LHDR+14
>> F LHDR+13*, LHDR+16*, LHDR+18*
I LHDR+1*, LHDR+21*, ADD+3*, ADD1+2*, ADD2+2*, ADD3+1!, ADD3+2*, ADD3+6!
IOF LHDR+4
J ADD+3*, ADD+4, ADD+5*, ADD+6, ADD1+2*, ADD1+3, ADD1+4*, ADD1+5, ADD2+2*, ADD2+3
, ADD2+4*, ADD2+5, ADD3+1!, ADD3+2*, ADD3+3, ADD3+4*, ADD3+5, ADD3+6!
>> LINE LHDR+22
>> PDFN(0 LHDR+3*, LHDR+13, LHDR+16, LHDR+17, LHDR+18, LHDR+19
>> PDFN(1 LHDR+3*
>> PDFN(2 LHDR+3*
>> PGCOUNT LHDR+8*, LHDR+9*
>> PRPF("ARCHIVE" LHDR+5
TMP ADD+2!*, ADD+3, ADD+4, ADD+5, ADD+6, ADD1+1!*, ADD1+2, ADD1+3, ADD1+4, ADD1+5
, ADD1+6!, ADD2+1!*, ADD2+2, ADD2+3, ADD2+4, ADD3+1!*, ADD3+2, ADD3+3, ADD3+4, ADD3+5
, ADD3+6!
U LHDR+7, LHDR+12, LHDR+13, LHDR+14, LHDR+16, LHDR+17, LHDR+18, LHDR+19, LHDR+21, ADD2+5
>> X LHDR+6*, LHDR+13*, LHDR+16*, LHDR+18*
>> Y LHDR+13, LHDR+14*, LHDR+16, LHDR+17*, LHDR+19
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All