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

Package: Prosthetics

Routine: RMPRSP7


Information

RMPRSP7 ;HIN/RVD-PRINT 2319 WITHOUT SUSPENSE LINK ;3/17/03 08:13

Source Information

Source file <RMPRSP7.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 RECORDS WITHOUT SUSPENSE  

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 RMPRSP7+9
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 PATIENT RECORDS NOT LINKED TO SUSPENSE Run Date:",RMDATE,?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: !,"DATE",?10,"PATIENT",?26,"ITEM",?49,"COST",?57,"VISTA #",?67,"INITIATOR"
  • Line Location: HEAD1+3
Function Call: WRITE
  • Prompt: !,"----",?10,"-------",?26,"----",?49,"----",?57,"-------",?67,"---------"
  • Line Location: HEAD1+4
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+19
^PRC(441 - [#441] BUILD+16, BUILD+17
^RMPO(665.72 - [#665.72] BUILD+3
^RMPR(660 - [#660] BUILD+1, BUILD+4, BUILD+5
^RMPR(661 - [#661] BUILD+16, BUILD+17
^RMPR(668 - [#668] BUILD+10, BUILD+11
^TMP($J PRINT+1!, PRINT+9, BUILD+37*, WRITE+2, WRITE+3, EXIT1+1!
^VA(200 - [#200] BUILD+32

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+23*, BUILD+36*
>> RDDT BUILD+34*, BUILD+37, WRITE+6*, WRITE+12
>> RDT PRINT+5*, BUILD+1
>> RET PRINT+5*, BUILD+1
>> RI BUILD+1*, BUILD+34, BUILD+37, WRITE+1*, WRITE+2*, WRITE+3
>> RJ BUILD+1*, BUILD+3, BUILD+4, BUILD+5, BUILD+10, BUILD+11, BUILD+25, BUILD+37, WRITE+2*, WRITE+3
, WRITE+4
>> RM WRITE+1*, WRITE+2*, WRITE+3
>> RM0 BUILD+4*, BUILD+6, BUILD+7, BUILD+9, BUILD+12, BUILD+13, BUILD+14, BUILD+24, BUILD+27
>> RM10 BUILD+5*, BUILD+7, BUILD+20, BUILD+21, BUILD+22, BUILD+23, BUILD+26, BUILD+28, BUILD+29, BUILD+30
, BUILD+31
>> RMAMT BUILD+24*, BUILD+37, WRITE+7*, WRITE+12
>> RMCOSU BUILD+28*
>> RMDAT WRITE+3*, WRITE+5, WRITE+6, WRITE+7, WRITE+8, WRITE+9, WRITE+10, WRITE+11
>> RMDATE PRINT+3*, HEAD
>> RMDFN BUILD+13*, BUILD+19
>> RMEDAT PRINT+7*, HEAD+1
>> RMIADT BUILD+22*
>> RMIE68 BUILD+10*, BUILD+11
>> RMINI BUILD+32*, BUILD+33*, BUILD+37, WRITE+9*, WRITE+12
>> RMINIE BUILD+27*, BUILD+32
>> RMITEM BUILD+15*, BUILD+17*, BUILD+18*, BUILD+37, WRITE+5*, WRITE+12
>> RMITIEN BUILD+14*, BUILD+16, BUILD+17
>> RMPAGE PRINT+4*, HEAD, HEAD+2*
>> RMPAT BUILD+15*, BUILD+19*, BUILD+37, WRITE+4*, WRITE+12
>> RMPCEP BUILD+30*
RMPR EXIT1+2~
RMPR("L" WRITE+16, HEAD1+2
RMPR("STA" PRINT+4, PRINT+5, BUILD+7
>> RMPRDI BUILD+26*, BUILD+37, WRITE+11*
>> RMPREDT STDT+8*, STDT+9, PRINT+5, PRINT+7, BUILD+1
>> RMPREND PRINT+4*, BUILD+1, WRITE+1*, WRITE+2, WRITE+14*, HEAD1*, EXIT
RMPRFLG WRITE+13*, WRITE+15!, HEAD1+5*
>> RMPRSDT STDT+6*, STDT+9, CONT, PRINT+5, PRINT+6
RMPRSITE EXIT1+2~
>> RMRXDT BUILD+21*
>> RMSDAT PRINT+6*, HEAD+1
>> RMSRC BUILD+25*, BUILD+37, WRITE+8*, WRITE+12
>> RMSUSP BUILD+20*
>> RMSUST BUILD+29*
>> RMTOBAL PRINT+4*
>> RPDT BUILD+31*, BUILD+35*, BUILD+37, WRITE+10*
>> RS PRINT+4*, PRINT+5*, BUILD+12, HEAD+1
U BUILD+6, BUILD+7, BUILD+9, BUILD+12, BUILD+13, BUILD+14, BUILD+16, BUILD+17, BUILD+19, BUILD+20
, BUILD+21, BUILD+22, BUILD+23, BUILD+24, BUILD+26, BUILD+27, BUILD+28, BUILD+29, BUILD+30, BUILD+31
, BUILD+32, WRITE+5, WRITE+6, WRITE+7, WRITE+8, WRITE+9, WRITE+10, WRITE+11, HEAD+1
X STDT+1!, PRINT+2!, PRINT+3*
Y RMPRSP7+9, 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