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

Package: Integrated Patient Fund

Routine: PRPFMUL


Information

PRPFMUL ;ALTOONA/CTB MULTIPLE TRANSACTION POSTING ;11/22/96 4:40 PM

Source Information

Source file <PRPFMUL.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Integrated Patient Fund 7 HILO^PRPFBAL  ^PRPFDEF  GETPAT^PRPFED  ^PRPFPOST  EN^PRPFRES  MSG^PRPFU1  ^PRPFYN  
VA FileMan 3 ^DIC  ^DIE  ^DIK  

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 MULTIPLE POST  

Entry Points

Name Comments DBIA/ICR reference
V ;;3.0;PATIENT FUNDS;**6**;JUNE 1, 1989
PAT
B
CLEAR
LIST ;LIST SELECTION FROM MULTIPLES
LKUP
OUT ;PRIMARY EXIT POINT
OUT1

External References

Name Field # of Occurrence
^DIC LKUP+1
^DIE B+1, LKUP+2
^DIK LKUP+1, LKUP+2, OUT+1
HILO^PRPFBAL LIST+1
^PRPFDEF PAT+1, PAT+6
GETPAT^PRPFED PAT
^PRPFPOST B+2
EN^PRPFRES PAT+3
MSG^PRPFU1 B+1, LKUP+2
^PRPFYN V+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This option will accept entry of transactions in which the basic information",!,"is the same for each patient.",!
  • Line Location: V+1
Function Call: WRITE
  • Prompt: !,"When entering the following information, REMEMBER that this information",!,"WILL be used for all patients until you exit from this option.",!
  • Line Location: V+2
Function Call: WRITE
  • Prompt: !,"ACCOUNT TYPE: * * * ",TYPE," * * "
  • Line Location: PAT+5
Function Call: WRITE
  • Prompt: !,"BALANCE INFORMATION:",?40,"RESTRICTION AVAILABILITY: ",!
  • Line Location: PAT+7
Function Call: WRITE
  • Prompt: !,"TOTAL BALANCE: $",$J(PRBAL("SB"),9,2)
  • Line Location: PAT+8
Function Call: WRITE
  • Prompt: ?40,"MONTH: $",$J($P(DFN(1),"^",7)-$P(DFN(1),"^",11),9,2)
  • Line Location: PAT+8
Function Call: WRITE
  • Prompt: !?5,"DEFERRED: $",$J(PRBAL("DEF"),9,2)
  • Line Location: PAT+9
Function Call: WRITE
  • Prompt: ?41,"WEEK: $",$J(($P(DFN(1),"^",8)-$P(DFN(1),"^",12)),9,2)
  • Line Location: PAT+9
Function Call: WRITE
  • Prompt: !?4,"AVAILABLE: $",$J(PRBAL("SB")-PRBAL("DEF"),9,2),!
  • Line Location: PAT+10
Function Call: READ
  • Variable: X
  • Timeout: 3
  • Line Location: B+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: LIST+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: LIST+2
Function Call: WRITE
  • Prompt: @PFHI,?15,"MULTIPLE TRANSACTION POSTING",!!,@PFLO,"REFERENCE: ",@PFHI,PRPFT(7),!,@PFLO,"DEPOSIT/WITHDRAWAL: ",@PFHI,$S(PRPFT(8)="D":"DEPOSIT",1:"WITHDRAWAL")
  • Line Location: LIST+5
Function Call: WRITE
  • Prompt: !,@PFLO,"CASH/CHECK/OTHER: ",@PFHI,$S(PRPFT(9)=1:"CASH",PRPFT(9)=2:"CHECK",1:"OTHER")
  • Line Location: LIST+6
Function Call: WRITE
  • Prompt: !,@PFLO,"FORM: ",@PFHI,$P(^PRPF(470.2,PRPFT(11),0),"^"),!,@PFLO,"SOURCE: ",@PFHI,$S(PRPFT(10)="G":"GRATUITOUS",1:"PRIVATE SOURCE")
  • Line Location: LIST+7
Function Call: WRITE
  • Prompt: !,@PFLO,"DATE: "
  • Line Location: LIST+8
Function Call: WRITE
  • Prompt: @PFHI,Y,!,@PFLO,"REMARKS: ",@PFHI,PRPFT(16),!
  • Line Location: LIST+8
Function Call: WRITE
  • Prompt: @PFHI,Y,!,@PFLO,"REMARKS: ",@PFHI,PRPFT(16),!
  • Line Location: LIST+8
Function Call: WRITE
  • Prompt: @PFHI,Y,!,@PFLO,"REMARKS: ",@PFHI,PRPFT(16),!
  • Line Location: LIST+8
Function Call: WRITE
  • Prompt: @PFNORM
  • Line Location: LIST+9
Function Call: READ
  • Variable: X
  • Timeout: 3
  • Line Location: LKUP+2
Routine Call
  • DIC
  • Line Location:
    • LKUP+1
Routine Call
  • DIE
  • Line Location:
    • B+1
    • LKUP+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRPFT(470.5 - [#470.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" LIST+8
^DD(470 V+3, PAT+2
^PRPF(470 - [#470] PAT+1, CLEAR!
^PRPF(470.2 - [#470.2] LIST+7
^PRPFT(470.5 - [#470.5] B*, B+1*, LIST+3

Label References

Name Line Occurrences
B PAT+4
CLEAR B+1, B+2
LIST V+3, B+1, B+2
LKUP V+3, LKUP+1
OUT V+3, V+4, PAT, LKUP+1
PAT B+1, B+3

Naked Globals

Name Field # of Occurrence
^(0 B*
^(1 PAT+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% V+4*, OUT1!
>> %A V+4*
>> %B V+4*
%DT OUT1!
%PRPF PAT, OUT1!
%W OUT1!
%X OUT1!
%Y OUT1!
COUNT LKUP+1*, OUT1!
D OUT1!
D0 PAT+1*!, PAT+6*!, OUT1!
DA B+1*, LKUP+1*, LKUP+2*, OUT+1*, OUT1!
DEP PAT+4, OUT1!
DFN PAT+1, PAT+6, CLEAR, OUT1!
DFN(0 PAT+2
DFN(1 PAT+1*, PAT+6, PAT+8, PAT+9
DI OUT1!
DIC LKUP*, LKUP+1, LKUP+2, OUT1!
DIC("A" B+1*, B+3*
DIC(0 LKUP*
DIE B+1*, LKUP+2*, OUT1!
DIE("NO^" LKUP+2*!
DIK LKUP+1*, LKUP+2*, OUT+1*, OUT1!
DIYS OUT1!
DLAYGO LKUP*, OUT1!
DQ OUT1!
DR B+1*, LKUP+2*, OUT1!
>> I PAT+2*, LIST+3*
IOF LIST+1
K OUT1!
OUT V+3, LKUP*, LKUP+2*, OUT1!
PFHI LIST+5, LIST+6, LIST+7, LIST+8, OUT1!
PFLO LIST+5, LIST+6, LIST+7, LIST+8, OUT1!
PFNORM LIST+9, OUT1!
POP OUT1!
>> PRBAL("DEF" PAT+1*, PAT+6*, PAT+9, PAT+10
>> PRBAL("GB" PAT+6*
>> PRBAL("PB" PAT+6*
>> PRBAL("SB" PAT+6*, PAT+8, PAT+10
PRPF OUT1!
PRPF("KILL" PAT!, B+1, LKUP+2!
PRPF("XDEF" V+3*, PAT+1, PAT+6
>> PRPFDATE PAT+3*
PRPFMUL V+3*, OUT1!
PRPFT LIST+3!, OUT1!
PRPFT( LIST+3*
PRPFT(10 LIST+7
PRPFT(11 LIST+7
PRPFT(16 LIST+8
PRPFT(21 LIST+8
PRPFT(5 PAT+3, LIST+8
PRPFT(7 LIST+5
PRPFT(8 LIST+5
PRPFT(9 LIST+6
Q3 OUT1!
S OUT1!
SOURCE OUT1!
TMP OUT1!
TRDA B, B+1, LIST+3, LKUP+2*, OUT+1, OUT1!
TRDA(0 LIST+3*
>> TYPE PAT+2*, PAT+5
>> TYPEX PAT+2*, PAT+8, PAT+9
U PAT+2
X PAT+1, PAT+6, B+1*, LKUP*, LKUP+2*, OUT1!
X1 OUT1!
Y PAT+2*, B+1, LIST+8*, LKUP+1, LKUP+2, OUT1!
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 |  Naked Globals |  Local Variables  | All