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

Package: Prosthetics

Routine: RMPRPCER


Information

RMPRPCER ;HIN/RVD-PRINT PCE DATA ;7/3/01

Source Information

Source file <RMPRPCER.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 4 ^%ZIS  ^%ZISC  ^%ZTLOAD  KILL^XUSCLEAN  
VA FileMan 2 (,DD)^%DT  ^DIR  
Prosthetics 1 DIV4^RMPRSIT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Prosthetics 1 RMPR PRINT PCE DATA  

Entry Points

Name Comments DBIA/ICR reference
HEAD
CONT
HEAD1
NONE
WRITE ;write report to a selected device
EXIT1
EXIT
BUILD ;build a tmp global.
PRINT
STDT ;RMPRSDT is start date in FM internal form.

External References

Name Field # of Occurrence
^%DT STDT+5, STDT+7, PRINT+3
DD^%DT PRINT+6, PRINT+7
^%ZIS CONT
^%ZISC EXIT1
^%ZTLOAD CONT+3
^DIR WRITE+14, HEAD1, EXIT
DIV4^RMPRSIT RMPRPCER+4
KILL^XUSCLEAN EXIT1+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$C(7),"Invalid Date Range Selection!!"
  • Line Location: STDT+9
Function Call: WRITE
  • Prompt: !!,"Processing report......."
  • Line Location: PRINT+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: WRITE+14
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: WRITE+15
Function Call: WRITE
  • Prompt: !,RMPR("L")
  • Line Location: WRITE+16
Function Call: WRITE
  • Prompt: !,"<End of Report>"
  • Line Location: WRITE+17
Function Call: WRITE
  • Prompt: !,"*** PROSTHETICS PCE DATA *** Run Date: ",RMRDAT,?70,"PAGE: ",RMPAGE
  • Line Location: HEAD+0
Function Call: WRITE
  • Prompt: !,"Start Date: ",RMSDAT,?26,"End Date: ",RMEDAT,?51,"station: ",$E($P($G(^DIC(4,RS,0)),U,1),1,19)
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEAD1+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEAD1+1
Function Call: WRITE
  • Prompt: !,RMPR("L")
  • Line Location: HEAD1+2
Function Call: WRITE
  • Prompt: !?30,"TYPE OF",?42,"CPRS",?60,"PCE"
  • Line Location: HEAD1+3
Function Call: WRITE
  • Prompt: !,"DATE",?10,"PATIENT",?21,"ITEM",?30,"REQUEST",?40,"REQUESTOR",?51,"ICD9",?60,"DATE",?68,"DIAGNOSIS"
  • Line Location: HEAD1+4
Function Call: WRITE
  • Prompt: !,"----",?10,"-------",?21,"----",?30,"-------",?40,"---------",?51,"----",?58,"--------",?68,"---------"
  • Line Location: HEAD1+5
Function Call: WRITE
  • Prompt: !!,"NO DATA TO PRINT !!!!!"
  • Line Location: NONE+0
Routine Call
  • DIR
  • Line Location:
    • WRITE+14
    • HEAD1
    • EXIT
Routine Call
  • %ZIS
  • Line Location:
    • CONT

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] HEAD+1
^DPT - [#2] BUILD+12
^ICD9 - [#80] BUILD+25
^PRC(441 - [#441] BUILD+9, BUILD+10
^RMPR(660 - [#660] BUILD+1, BUILD+2, BUILD+3
^RMPR(661 - [#661] BUILD+9, BUILD+10
^TMP($J PRINT+1!, PRINT+9, BUILD+32*, WRITE+2, WRITE+3, EXIT1+1!
^VA(200 - [#200] BUILD+28

Label References

Name Line Occurrences
BUILD PRINT+8
EXIT CONT+3, PRINT+9, PRINT+12
EXIT1 STDT+5, STDT+7, CONT
HEAD PRINT+9, PRINT+10, WRITE+14, WRITE+15, HEAD1, HEAD1+1
HEAD1 PRINT+10, WRITE+14, WRITE+15
NONE PRINT+9
PRINT CONT
STDT STDT+9
WRITE PRINT+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT STDT+1!, STDT+4*, STDT+7*, PRINT+2!
%DT("A" STDT+2*, STDT+7*
%DT(0 STDT+3*
>> %ZIS CONT*
DIR EXIT!
DIR(0 WRITE+14*, HEAD1*, EXIT*
DT STDT+3
>> DTOUT WRITE+14, HEAD1
IO CONT
IO("Q" CONT, CONT+1!
IOF WRITE+14, WRITE+15, HEAD1, HEAD1+1
ION CONT+1
IOP CONT!
IOSL WRITE+14, WRITE+15, HEAD1, HEAD1+1
IOST PRINT, WRITE+14, HEAD1, HEAD1+1, EXIT
>> POP CONT
>> RCDT BUILD+16*, BUILD+31*
>> RDDT BUILD+29*, BUILD+32, WRITE+6*, WRITE+12
>> RDT PRINT+5*, BUILD+1
>> RET PRINT+5*, BUILD+1
>> RI BUILD+1*, BUILD+29, BUILD+32, WRITE+1*, WRITE+2*, WRITE+3
>> RJ BUILD+1*, BUILD+2, BUILD+3, WRITE+2*, WRITE+3, WRITE+4
>> RM0 BUILD+2*, BUILD+5, BUILD+6, BUILD+7
>> RM10 BUILD+3*, BUILD+4, BUILD+13, BUILD+14, BUILD+15, BUILD+16, BUILD+17, BUILD+18, BUILD+19, BUILD+20
, BUILD+21, BUILD+22, BUILD+23, BUILD+24
>> RMCOSU BUILD+21*
>> RMDAT WRITE+3*, WRITE+5, WRITE+6, WRITE+7, WRITE+8, WRITE+9, WRITE+10, WRITE+11
>> RMDFN BUILD+6*, BUILD+12
>> RMEDAT PRINT+7*, HEAD+1
>> RMIADT BUILD+15*
>> RMICD BUILD+25*, BUILD+26*, BUILD+32, WRITE+9*, WRITE+12
>> RMICD9 BUILD+20*, BUILD+25
>> RMITEM BUILD+8*, BUILD+10*, BUILD+11*, BUILD+32, WRITE+5*, WRITE+12
>> RMITIEN BUILD+7*, BUILD+9, BUILD+10
>> RMPAGE PRINT+4*, HEAD, HEAD+2*
>> RMPAT BUILD+8*, BUILD+12*, BUILD+32, WRITE+4*, WRITE+12
>> RMPCEP BUILD+23*
RMPR EXIT1+2~
RMPR("L" WRITE+16, HEAD1+2
RMPR("STA" PRINT+4, PRINT+5
>> RMPRDI BUILD+19*, BUILD+32, WRITE+11*, WRITE+12
>> RMPREDT STDT+8*, STDT+9, PRINT+5, PRINT+7, BUILD+1
>> RMPREND PRINT+4*, BUILD+1, WRITE+2, WRITE+14*, HEAD1*, EXIT
RMPRFLG WRITE+13*, WRITE+15!, HEAD1+6*
>> RMPRSDT STDT+6*, STDT+9, CONT, PRINT+5, PRINT+6
RMPRSITE EXIT1+2~
>> RMRDAT PRINT+3*, HEAD
>> RMRXDT BUILD+14*
>> RMSDAT PRINT+6*, HEAD+1
>> RMSURE BUILD+18*, BUILD+28*, BUILD+32, WRITE+8*, WRITE+12
>> RMSUSP BUILD+13*
>> RMSUST BUILD+22*
>> RMTOBAL PRINT+4*
>> RMTYRE BUILD+17*, BUILD+27*, BUILD+32, WRITE+7*, WRITE+12
>> RPDT BUILD+24*, BUILD+30*, BUILD+32, WRITE+10*, WRITE+12
>> RS PRINT+4*, PRINT+5*, BUILD+5, HEAD+1
U BUILD+4, BUILD+5, BUILD+6, BUILD+7, BUILD+9, BUILD+10, BUILD+12, BUILD+13, BUILD+14, BUILD+15
, BUILD+16, BUILD+17, BUILD+18, BUILD+19, BUILD+20, BUILD+21, BUILD+22, BUILD+23, BUILD+24, BUILD+25
, BUILD+28, WRITE+5, WRITE+6, WRITE+7, WRITE+8, WRITE+9, WRITE+10, WRITE+11, HEAD+1
X STDT+1!, PRINT+2!, PRINT+3*
Y RMPRPCER+4, STDT+1!, STDT+5, STDT+6, STDT+7, STDT+8, PRINT+2!, PRINT+3, PRINT+6*, PRINT+7*
, WRITE+14, HEAD1
>> ZTDESC CONT+1*
>> ZTIO CONT+1*
>> ZTRTN CONT+1*
>> ZTSAVE("RMPR(" CONT+2*
>> ZTSAVE("RMPR(""STA"")" CONT+2*
>> ZTSAVE("RMPREDT" CONT+2*
>> ZTSAVE("RMPRSDT" CONT+1*
>> ZTSK CONT+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All