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

Package: Integrated Patient Fund

Routine: PRPFDMT


Information

PRPFDMT ;ALTOONA/CTB DISPLAY MASTER TRANSACTION ;11/22/96 4:36 PM

Source Information

Source file <PRPFDMT.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Integrated Patient Fund 3 HILO^PRPFBAL  ^PRPFQ  (,D)^PRPFU1  
VA FileMan 1 ^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: 1

Package Total Caller Graph
Integrated Patient Fund 1 PRPF TRANSACTION REVIEW  

Entry Points

Name Comments DBIA/ICR reference
V ;;3.0;PATIENT FUNDS;**6**;JUNE 1, 1989
A
INFO

External References

Name Field # of Occurrence
^DIC A
HILO^PRPFBAL A
^PRPFQ A+1
^PRPFU1 INFO+5, INFO+6, INFO+9
D^PRPFU1 INFO+3, INFO+4, INFO+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: A+2
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y>1
  • Line Location: INFO+1
Function Call: WRITE
  • Prompt: @PFHI,"Review Individual Master Transaction ",@PFLO,!
  • Line Location: INFO+1
Function Call: WRITE
  • Prompt: !,@PFLO,"Transaction ID: ",@PFHI,$P(MADA(0),"^"),?40
  • Line Location: INFO+2
Function Call: WRITE
  • Prompt: @PFLO,"Patient Name: ",@PFHI,$S($D(^DPT(DFN,0)):$P(^(0),"^"),1:"UNKNOWN"),@PFLO,!?40,"Patient Transaction : ",@PFHI,$P(MADA(0),"^",3)
  • Line Location: INFO+2
Function Call: WRITE
  • Prompt: !,@PFLO,"Transaction Date: "
  • Line Location: INFO+3
Function Call: WRITE
  • Prompt: @PFHI,Y
  • Line Location: INFO+3
Function Call: WRITE
  • Prompt: ?40,@PFLO,"Date Entered: "
  • Line Location: INFO+4
Function Call: WRITE
  • Prompt: @PFHI,Y
  • Line Location: INFO+4
Function Call: WRITE
  • Prompt: !,@PFLO,"Reference: ",@PFHI,$P(MADA(0),"^",7),?40,@PFLO,"Dep/With: ",@PFHI
  • Line Location: INFO+5
Function Call: WRITE
  • Prompt: Y
  • Line Location: INFO+5
Function Call: WRITE
  • Prompt: @PFLO,!,"Source: "
  • Line Location: INFO+6
Function Call: WRITE
  • Prompt: @PFHI,X,@PFLO,?40,"Form: "
  • Line Location: INFO+6
Function Call: WRITE
  • Prompt: @PFHI,X,@PFLO,?40,"Form: "
  • Line Location: INFO+6
Function Call: WRITE
  • Prompt: !,@PFLO,"Amount: ",@PFHI
  • Line Location: INFO+7
Function Call: WRITE
  • Prompt: "$ ",$J(Y,0,2),?40,@PFLO,"CA/CK/OTH: "
  • Line Location: INFO+7
Function Call: WRITE
  • Prompt: "$ ",$J(Y,0,2),?40,@PFLO,"CA/CK/OTH: "
  • Line Location: INFO+7
Function Call: WRITE
  • Prompt: !,@PFLO,"Private Source: "
  • Line Location: INFO+8
Function Call: WRITE
  • Prompt: @PFHI,"$ ",$J(Y,0,2),@PFLO,?40,"Gratuitous: "
  • Line Location: INFO+8
Function Call: WRITE
  • Prompt: @PFHI,"$ ",$J(Y,0,2),@PFLO,?40,"Gratuitous: "
  • Line Location: INFO+8
Function Call: WRITE
  • Prompt: !,@PFLO,"Clerk: ",@PFHI
  • Line Location: INFO+9
Function Call: WRITE
  • Prompt: Y,?40,@PFLO,"Remarks: ",@PFHI,$P(MADA(0),"^",16),!,@PFLO,"Deferral Date: "
  • Line Location: INFO+9
Function Call: WRITE
  • Prompt: Y,?40,@PFLO,"Remarks: ",@PFHI,$P(MADA(0),"^",16),!,@PFLO,"Deferral Date: "
  • Line Location: INFO+9
Function Call: READ
  • Variable: X
  • Timeout: $S($D(DTIME):DTIME,1:120)
  • Line Location: INFO+10
Function Call: WRITE
  • Prompt: !!,"Enter RETURN to Continue"
  • Line Location: INFO+10
Function Call: WRITE
  • Prompt: !!
  • Line Location: INFO+10
Routine Call
  • DIC
  • Line Location:
    • A

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZTSK - [#14.4] INFO!
^DPT - [#2] INFO+2

Label References

Name Line Occurrences
A A+1

Naked Globals

Name Field # of Occurrence
^(0 INFO+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% A+2!, INFO+11!
%H A+2!
C A+2!
>> DD INFO+5*, INFO+6*, INFO+9*
DFN INFO+2*, INFO+11!
DIC A*!, A+2!
DIC("A" V+1*, A+1*
DIC(0 A*
DTIME INFO+10
>> F INFO+5*, INFO+6*, INFO+9*
I A+2!
IOF A+2, INFO+1
IOST INFO+10
K A+2!
MADA A+1*, A+2!, INFO+11!
MADA(0 A+1*, INFO+2, INFO+3, INFO+4, INFO+5, INFO+6, INFO+7, INFO+8, INFO+9, INFO+11!
PFHI A+2!, INFO*, INFO+1, INFO+2, INFO+3, INFO+4, INFO+5, INFO+6, INFO+7, INFO+8
, INFO+9, INFO+11!
PFLO A+2!, INFO*, INFO+1, INFO+2, INFO+3, INFO+4, INFO+5, INFO+6, INFO+7, INFO+8
, INFO+9, INFO+11!
PFNORM A+2!, INFO*, INFO+9, INFO+11!
POP A+2!, INFO+11!
PRIOP INFO+11!
S A+2!
TMP A+2!
X A+2!, INFO+5*, INFO+6*, INFO+7*, INFO+9*, INFO+10*, INFO+11!
X2 A+2!
Y A+1, A+2!, INFO+3*, INFO+4*, INFO+5, INFO+6, INFO+7*, INFO+8*, INFO+9*, INFO+11!
Y(0 A+1
ZTDESC A+1*, INFO+11!
ZTRTN A+1*, INFO+11!
ZTSAVE INFO+11!
ZTSAVE("MADA" A+1*
ZTSAVE("MADA*" A+1*
>> ZTSK INFO, INFO+10
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All