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

Package: Prosthetics

Routine: RMPRPRT1


Information

RMPRPRT1 ;PHX/HNB-CONTINUATION OF PRINT 2319 ;10/19/1993

Source Information

Source file <RMPRPRT1.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Prosthetics 2 (OLD,WRIL)^RMPRPAT1  (EXIT,HDR)^RMPRPRT  
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: 2

Package Total Caller Graph
Prosthetics 2 RMPOPRT  RMPRPRT  

Entry Points

Name Comments DBIA/ICR reference
EXIT
HDRH
PRT

External References

Name Field # of Occurrence
DD^%DT RMPRPRT1+26, RMPRPRT1+35
OLD^RMPRPAT1 RMPRPRT1+38
WRIL^RMPRPAT1 RMPRPRT1+39
EXIT^RMPRPRT EXIT
HDR^RMPRPRT RMPRPRT1+9, RMPRPRT1+12, RMPRPRT1+29, RMPRPRT1+32, RMPRPRT1+42, RMPRPRT1+44, RMPRPRT1+47, RMPRPRT1+50, PRT+27

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: RMPRPRT1+9
Function Call: WRITE
  • Prompt: !!,"PSC Issue Card: "
  • Line Location: RMPRPRT1+10
Function Call: WRITE
  • Prompt: !
  • Line Location: RMPRPRT1+10
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: RMPRPRT1+12
Function Call: WRITE
  • Prompt: "NONE LISTED",!
  • Line Location: RMPRPRT1+16
Function Call: WRITE
  • Prompt: !,"Clothing Allowance: ",!
  • Line Location: RMPRPRT1+17
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: RMPRPRT1+22
Function Call: WRITE
  • Prompt: !,?22,"Date of Exam: ",Y
  • Line Location: RMPRPRT1+26
Function Call: WRITE
  • Prompt: " Examiner: ",$E($P(^VA(200,$P(RR5,U,6),0),U,1),1,30)
  • Condition for execution: $P(RR5,U,6)
  • Line Location: RMPRPRT1+26
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: RMPRPRT1+29
Function Call: WRITE
  • Prompt: "NONE LISTED",!
  • Line Location: RMPRPRT1+30
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: RMPRPRT1+32
Function Call: WRITE
  • Prompt: ?64,Y
  • Line Location: RMPRPRT1+35
Function Call: WRITE
  • Prompt: !,"Automobile(s): NONE LISTED"
  • Line Location: RMPRPRT1+36
Function Call: WRITE
  • Prompt: !,"Items Returned: "
  • Line Location: RMPRPRT1+37
Function Call: WRITE
  • Prompt: "NONE LISTED"
  • Line Location: RMPRPRT1+40
Function Call: WRITE
  • Prompt: !!,"Other Data: "
  • Line Location: RMPRPRT1+42
Function Call: WRITE
  • Prompt: !?5,R5(4,J,0)
  • Line Location: RMPRPRT1+42
Function Call: WRITE
  • Prompt: !?5,R5(4,J,0)
  • Line Location: RMPRPRT1+42
Function Call: WRITE
  • Prompt: "NONE LISTED"
  • Line Location: RMPRPRT1+43
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: RMPRPRT1+44
Function Call: WRITE
  • Prompt: !,"RECORD OF APPLIANCES/REPAIRS: "
  • Line Location: RMPRPRT1+45
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: RMPRPRT1+47
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: RMPRPRT1+50
Function Call: WRITE
  • Prompt: !,"No Appliances or Repairs exist for this veteran!",!!
  • Line Location: RMPRPRT1+51
Function Call: WRITE
  • Prompt: !!,"End of Appliance/Repair records for this veteran!",!!," *Historical Item"
  • Line Location: RMPRPRT1+52
Function Call: WRITE
  • Prompt: !!?4,"DATE",?13,"QTY",?17," HCPCS DESC",?29,"N R ",?33,"VENDOR",?45,"STA",?50,"SERIAL NBR",?62,"DELIVERED",?72,"COST",!
  • Line Location: HDRH+0
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDRH+1
Function Call: WRITE
  • Prompt: !,RC,". ",DATE,?13,QTY,?17
  • Line Location: PRT+17
Function Call: WRITE
  • Prompt: $E($P(^("HST"),U,1),1,10)
  • Line Location: PRT+20
Function Call: WRITE
  • Prompt: ?29,TRANS,?31,TRANS1
  • Line Location: PRT+21
Function Call: WRITE
  • Prompt: ?33,RMPRLPRO
  • Line Location: PRT+23
Function Call: WRITE
  • Prompt: ?33,$E(VEN,1,10)
  • Line Location: PRT+25

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] PRT+26
^PRC(440 - [#440] PRT+14
^PRC(441 - [#441] RMPRPRT1+15
^RMPR(660 - [#660] RMPRPRT1+47, RMPRPRT1+50, PRT+2, PRT+4, PRT+13
^RMPR(660.1 - [#660.1] RMPRPRT1+39, RMPRPRT1+40
^RMPR(661 - [#661] RMPRPRT1+15
^RMPR(661.1 - [#661.1] PRT+18
^RMPR(665 - [#665] RMPRPRT1+19, RMPRPRT1+20, RMPRPRT1+38
^RMPR(667 - [#667] RMPRPRT1+32, RMPRPRT1+33, RMPRPRT1+35
^RMPR(667.2 - [#667.2] RMPRPRT1+35
^VA(200 - [#200] RMPRPRT1+26
^XDRM - [#15.4] RMPRPRT1+8
^XDRM("B" RMPRPRT1+6, RMPRPRT1+7

Label References

Name Line Occurrences
HDRH RMPRPRT1+45, PRT+27
PRT RMPRPRT1+47, RMPRPRT1+50

Naked Globals

Name Field # of Occurrence
^("LB" PRT+4
^(0 RMPRPRT1+15, PRT+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> AMIS PRT*, PRT+18
AN RMPRPRT1+45*, RMPRPRT1+47*, RMPRPRT1+50*, EXIT!, PRT+2, PRT+4, PRT+13
CST EXIT!, PRT+2*, PRT+26, PRT+28*
DATE EXIT!, PRT*, PRT+11*, PRT+17, PRT+28*
DEL EXIT!, PRT*, PRT+16*, PRT+26, PRT+28*
FRM EXIT!, PRT+11*, PRT+28*
I RMPRPRT1+11*, RMPRPRT1+16, RMPRPRT1+42*, RMPRPRT1+43, EXIT!
IOF RMPRPRT1+9, RMPRPRT1+12, RMPRPRT1+29, RMPRPRT1+32, RMPRPRT1+42, RMPRPRT1+44, RMPRPRT1+47, RMPRPRT1+50
IOSL RMPRPRT1+9, RMPRPRT1+12, RMPRPRT1+29, RMPRPRT1+32, RMPRPRT1+42, RMPRPRT1+44, RMPRPRT1+47, RMPRPRT1+50, PRT+27
IT EXIT!
J RMPRPRT1+10*, RMPRPRT1+11, RMPRPRT1+13*, RMPRPRT1+14, RMPRPRT1+15, RMPRPRT1+42*, EXIT!
K EXIT!
L RMPRPRT1+14*, RMPRPRT1+15, EXIT!, HDRH+1*
QTY EXIT!, PRT*, PRT+17, PRT+28*
R0 EXIT!
>> R5(0 RMPRPRT1+30
>> R5(4 RMPRPRT1+42
>> R5(5 RMPRPRT1+13, RMPRPRT1+14, RMPRPRT1+15
>> R5(6 RMPRPRT1+18, RMPRPRT1+21, RMPRPRT1+28, RMPRPRT1+30
RA RMPRPRT1+20*, RMPRPRT1+21, RMPRPRT1+28, RMPRPRT1+45*, RMPRPRT1+46*, RMPRPRT1+47*, RMPRPRT1+48*, RMPRPRT1+50*, EXIT!
RC RMPRPRT1+45*, RMPRPRT1+47*, RMPRPRT1+50*, RMPRPRT1+51, EXIT!, PRT+17
REM EXIT!, PRT+11*, PRT+27, PRT+28*
>> RI RMPRPRT1+19*, RMPRPRT1+20
>> RMPRDFN RMPRPRT1+6, RMPRPRT1+7, RMPRPRT1+19, RMPRPRT1+20, RMPRPRT1+32, RMPRPRT1+38, RMPRPRT1+39, RMPRPRT1+40, RMPRPRT1+47
RMPRE EXIT!
RMPRFLG RMPRPRT1+34, RMPRPRT1+35*, RMPRPRT1+36, EXIT!
RMPRLPRO PRT+4*, PRT+5*, PRT+6*, PRT+7*, PRT+8*, PRT+9*, PRT+10*, PRT+23, PRT+24!
RMPRMERG RMPRPRT1+5~*, RMPRPRT1+7*, RMPRPRT1+8*, RMPRPRT1+49, RMPRPRT1+50
RO RMPRPRT1+31*, RMPRPRT1+32*, RMPRPRT1+33, RMPRPRT1+35, RMPRPRT1+39*, EXIT!
>> RR5 RMPRPRT1+21*, RMPRPRT1+23, RMPRPRT1+24, RMPRPRT1+25, RMPRPRT1+26
SN EXIT!, PRT*, PRT+26, PRT+28*
STA EXIT!, PRT*, PRT+26, PRT+28*
TRANS EXIT!, PRT*, PRT+15*, PRT+21, PRT+28*
TRANS1 EXIT!, PRT+15*, PRT+21, PRT+28*
TYPE EXIT!, PRT*, PRT+13*, PRT+18, PRT+28*
U RMPRPRT1+14, RMPRPRT1+15, RMPRPRT1+24, RMPRPRT1+25, RMPRPRT1+26, RMPRPRT1+28, RMPRPRT1+30, RMPRPRT1+33, RMPRPRT1+35, PRT
, PRT+2, PRT+4, PRT+11, PRT+13, PRT+14, PRT+18, PRT+26
VEN EXIT!, PRT*, PRT+14*, PRT+25, PRT+28*
Y RMPRPRT1+26*, RMPRPRT1+35*, RMPRPRT1+47*, RMPRPRT1+50*, EXIT!, PRT, PRT+2, PRT+11, PRT+18, PRT+26
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All