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

Package: Prosthetics

Routine: RMPRSEA


Information

RMPRSEA ;PHX/RFM-SEARCH FILE 660 ENTRIES FOR RECALLED ITEM ;8/29/1994

Source Information

Source file <RMPRSEA.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA FileMan 5 (,DD)^%DT  C^%DTC  ^DIC  WAIT^DICD  ^DIR  
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  
Prosthetics 2 DIV4^RMPRSIT  $$STA^RMPRUTIL  

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

Package Total Caller Graph
Prosthetics 2 RMPR AUTO RECALL  RMPR PRINT RECALL  
Kernel 1 ^DIC(19  

Entry Points

Name Comments DBIA/ICR reference
ENDATE
PRINT
PRI
EXIT
EXIT1
CK
CON
HEAD
AUT ;AUTOMOTIVE EQUIPMENT SEARCH
PRINTA
CK1
INF
HDR
SERIAL
ITEM

External References

Name Field # of Occurrence
^%DT RMPRSEA+4, ENDATE, AUT+1, AUT+2
DD^%DT ENDATE+1, CON+2, HEAD, AUT+3, INF+1
C^%DTC PRINT, PRINTA
^%ZIS ENDATE+3, AUT+5
HOME^%ZIS RMPRSEA+4
^%ZISC EXIT1
^%ZTLOAD ENDATE+6, AUT+7
^DIC ITEM
WAIT^DICD PRINT
^DIR ENDATE+2, EXIT+1, CON+5, AUT+4, INF+3, SERIAL
DIV4^RMPRSIT RMPRSEA+4
$$STA^RMPRUTIL HEAD

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: RMPRSEA+4
Function Call: WRITE
  • Prompt: !,$C(7),"Invalid Date Range Selection!!"
  • Line Location: ENDATE+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRI+1
Function Call: WRITE
  • Prompt: $C(7),!!,"NO SELECTIONS MADE DURING THIS DATE RANGE!!"
  • Line Location: PRI+1
Function Call: WRITE
  • Prompt: !!?32,"END OF REPORT"
  • Line Location: PRI+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EXIT+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CON+0
Function Call: WRITE
  • Prompt: !,Y,?15,$E($P(^DPT($P(^RMPR(660,RP,0),U,2),0),U,1),1,13),?30,$E($P(^DPT($P(^RMPR(660,RP,0),U,2),0),U,9),6,9),?36,$E($P(^PRC(441,$P(^RMPR(661,$P(^RMPR(660,RP,0),U,6),0),U,1),0),U,2),1,17)
  • Line Location: CON+2
Function Call: WRITE
  • Prompt: !,"LOT NBR:",?10,$P(^RMPR(660,RP,0),U,24),?25,"SERIAL NBR:",?37,$P(^RMPR(660,RP,0),U,11),!
  • Line Location: CON+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CON+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CON+6
Function Call: WRITE
  • Prompt: !,?10,"RECALLED ITEM REPORT"
  • Line Location: HEAD+0
Function Call: WRITE
  • Prompt: ?39,Y_"-"
  • Line Location: HEAD+0
Function Call: WRITE
  • Prompt: ?39,Y_"-"
  • Line Location: HEAD+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: AUT+1
Function Call: WRITE
  • Prompt: !,$C(7),"Invalid Date Range Selection!!"
  • Line Location: AUT+2
Function Call: WRITE
  • Prompt: !!,"NO SELECTION MADE DURING THIS DATE RANGE!!"
  • Line Location: PRINTA+2
Function Call: WRITE
  • Prompt: !,Y,?15,$E($P(^DPT(RPAT,0),U,1),1,13),?30,$E($P(^DPT(RPAT,0),U,9),6,9),?36,$P(^RMPR(667.1,$P(RAUT,U,3),0),U,1)
  • Line Location: INF+1
Function Call: WRITE
  • Prompt: !,"VEHICLE ID# ",$P(^RMPR(667,$P(RAUT,U,2),0),U,1),?50,"SERIAL # ",$P(RAUT,U,6)
  • Line Location: INF+2
Function Call: WRITE
  • Prompt: !,LI
  • Line Location: INF+2
Function Call: WRITE
  • Prompt: @IOF,!,"REQUEST DATE",?15,"PATIENT NAME",?30,"SSN",?36,"ITEM",?70,"PAGE ",PAGE
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !,LI
  • Line Location: HDR+0
Routine Call
  • DIC
  • Line Location:
    • ITEM
Routine Call
  • DIR
  • Line Location:
    • ENDATE+2
    • EXIT+1
    • CON+5
    • AUT+4
    • INF+3
    • SERIAL
Routine Call
  • %ZIS
  • Line Location:
    • ENDATE+3
    • AUT+5
Routine Call
  • %ZIS
  • Line Location:
    • RMPRSEA+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RMPR(661 - [#661] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] CON+2, INF+1
^PRC(440 - [#440] CON+3
^PRC(441 - [#441] CK, CK+2, CON+2
^RMPR(660 - [#660] PRI, CK, CK+1, CK+2, CON+2, CON+3, CON+4
^RMPR(661 - [#661] CK, CK+2, CON+2
^RMPR(667 - [#667] INF, INF+2
^RMPR(667.1 - [#667.1] INF+1
^RMPR(667.3 - [#667.3] PRINTA+1, CK1, INF

Label References

Name Line Occurrences
@( ENDATE+2
AUT AUT+2
CK PRI
CK1 PRINTA+1
CON CK+1, CK+2
ENDATE ENDATE
EXIT RMPRSEA+4, ENDATE, ENDATE+1, ENDATE+2, ENDATE+3, ENDATE+6, PRI, AUT+1, AUT+2, AUT+3
, AUT+4, AUT+5, AUT+7, PRINTA+1, PRINTA+3
EXIT1 ENDATE+2
HDR PRINTA, INF+3
HEAD PRI+1, CON+1, CON+5, CON+6
INF CK1
PRINT ENDATE+4
PRINTA AUT+6

Naked Globals

Name Field # of Occurrence
^(0 CK, CK+1, INF

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT RMPRSEA+4*, ENDATE*, AUT+1*, AUT+2*
>> %DT("A" RMPRSEA+4*, ENDATE*, AUT+1*, AUT+2*
>> %ZIS ENDATE+3*, AUT+5*
DIC EXIT1!, ITEM*
DIC("A" ITEM*
DIC(0 ITEM*
DIR ENDATE+2!, EXIT+1!, EXIT1!, CON+5!, AUT+4!, INF+3!, SERIAL!
DIR("A" AUT+4*, SERIAL*
DIR(0 ENDATE+2*, EXIT+1*, CON+5*, AUT+4*, INF+3*, SERIAL*
DIRUT ENDATE+2, EXIT1!, AUT+4, SERIAL, ITEM*
DTOUT EXIT+1, EXIT1!
DUOUT PRI, EXIT+1, EXIT1!, CON+5*, PRINTA+1, INF+3*
GOTO ENDATE+2*, EXIT1!, CK+1, CK+2
IO ENDATE+4, AUT+6
IO("Q" ENDATE+4, AUT+6, AUT+7!
IOF PRI+1, CON, CON+5, CON+6, HDR
IOM INF+2, HDR
ION ENDATE+5, AUT+7
IOP ENDATE+3!, AUT+5!
IOSL CON, CON+5, CON+6, INF+3, INF+4
IOST PRINT, EXIT, EXIT+1, CON+5, INF+3
J PRI*, EXIT1!, PRINTA+1*
K PRI*, EXIT1!, PRINTA+1*
LI EXIT1!, INF+2*, HDR*
PAGE PRINT*, EXIT1!, CON, HEAD*, PRINTA*, HDR*
>> POP ENDATE+3, PRI+1, AUT+5
RAUT EXIT1!, INF*, INF+1, INF+2
RMPRBDT RMPRSEA+4*, ENDATE, ENDATE+1, PRINT, EXIT1!, HEAD, AUT+1*, AUT+2, PRINTA
RMPRCOUN RMPRSEA+4*, PRINT*, PRI+1, PRI+2, EXIT1!, CON, CON+1*, AUT+1*, PRINTA*, PRINTA+2
, INF*
RMPREDT ENDATE+1*, PRI, PRI+1, PRI+2, EXIT+1, EXIT1!, HEAD, AUT+3*, PRINTA+1
RMPREND RMPRSEA+4*, PRINT*, PRI, PRI+2, EXIT+1, EXIT1!, CON+5*, AUT+1*, PRINTA*, PRINTA+1
, INF+3*
RMPRFLL EXIT+1, EXIT1!, CON+5*, INF+3*
RMPRSE EXIT1!, CK+1, CK+2, AUT+4*, CK1, SERIAL*, ITEM+1*
RMPRX ENDATE+1*, EXIT1!, AUT+3*
RMPRY ENDATE+1*, EXIT1!, AUT+3*
RO PRINT*, PRI*, EXIT1!, PRINTA*, PRINTA+1*
RP PRINT*, PRI*, EXIT1!, CK, CK+1, CK+2, CON+2, CON+3, CON+4, PRINTA*
, PRINTA+1*, CK1, INF
RPAT EXIT1!, INF*, INF+1
U CK, CK+1, CK+2, CON+2, CON+3, CON+4, CK1, INF, INF+1, INF+2
, ITEM+1
X RMPRSEA+4, PRINT, EXIT1!, AUT+4, PRINTA, SERIAL
>> X1 PRINT*, PRINTA*
>> X2 PRINT*, PRINTA*
Y RMPRSEA+4, ENDATE, ENDATE+1*, ENDATE+2, EXIT1!, CON+2*, CON+5, HEAD*, AUT+1, AUT+2
, AUT+3*, INF*, INF+1, INF+3, ITEM, ITEM+1
>> ZTDESC ENDATE+5*, AUT+7*
>> ZTIO ENDATE+5*, AUT+7*
>> ZTRTN ENDATE+5*, AUT+7*
>> ZTSAVE("GOTO" ENDATE+5*
>> ZTSAVE("RMPR(""STA"")" ENDATE+5*
>> ZTSAVE("RMPRBDT" ENDATE+5*, AUT+7*
>> ZTSAVE("RMPREDT" ENDATE+5*, AUT+7*
>> ZTSAVE("RMPRSE" ENDATE+5*, AUT+7*
>> ZTSAVE("RMPRX" ENDATE+5*, AUT+7*
>> ZTSAVE("RMPRY" ENDATE+5*, AUT+7*
>> ZTSK ENDATE+6
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