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

Package: Prosthetics

Routine: RMPRRET9


Information

RMPRRET9 ;PHX/RFM-RETURN ITEMS FROM FILE 667.1 ;8/29/1994

Source Information

Source file <RMPRRET9.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 5 ^DIC  FILE^DICN  ^DIE  IX1^DIK  ^DIR  
IFCAP 1 ^PRCPUSA  
Kernel 1 KILL^XUSCLEAN  
Prosthetics 1 DIV4^RMPRSIT  

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
Prosthetics 1 RMPR RETURN EDIT  

Entry Points

Name Comments DBIA/ICR reference
EN
EN1
RETU
SER
POS ;D WAIT^DICD H 1
CK()
EDT ;EDIT RETURNED/CONDEMNED ITEMS
EX
DSP
INV ;UPDATE INVENTORY
EXIT

External References

Name Field # of Occurrence
^DIC ENEDT+2
FILE^DICN POS+1
^DIE EDT+4
IX1^DIK POS+2
^DIR EN1EN1+2, RETUSERSER+1
^PRCPUSA INV+2
DIV4^RMPRSIT EDT+1
KILL^XUSCLEAN EXIT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Enter `^` to exit"
  • Line Location: EN1+0
Function Call: WRITE
  • Prompt: !,"Enter the Returned Status or `^` to exit"
  • Line Location: RETU+0
Function Call: WRITE
  • Prompt: !!,$C(7),?5,"Someone else is Editing this entry"
  • Line Location: EDT+3
Function Call: WRITE
  • Prompt: ?15,$S($P(ZA,U,3):$P(^PRC(441,$P(^RMPR(661,$P(ZA,U,3),0),U,1),0),U,2),1:$S($D(^RMPR(667.1,+$P(ZA,U,21),0)):$P(^(0),U,1),1:" "))," ",$P(ZA,U,6)," ",$E($P(^DPT($P(ZA,U,2),0),U,1),1,30)
  • Line Location: DSP+0
Function Call: WRITE
  • Prompt: !
  • Line Location: DSP+0
Function Call: WRITE
  • Prompt: !,$C(7),7,"Error encountered while posting this item to GIP. Please",!,"post this item manually.",!
  • Line Location: INV+3
Routine Call
  • DIC
  • Line Location:
    • EN
    • EDT+2
Routine Call
  • DIE
  • Line Location:
    • EDT+4
Routine Call
  • DIR
  • Line Location:
    • EN1
    • EN1+2
    • RETU
    • SER
    • SER+1

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] DSP
^PRC(441 - [#441] DSP
^RMPR(660 - [#660] EDT+5*, EDT+6*
^RMPR(660.1 - [#660.1] POS+2*, EDT+3, EDT+4, EDT+6, EXDSP
^RMPR(661 - [#661] DSPINV+2
^RMPR(667.1 - [#667.1] DSP
^RMPR(667.3 - [#667.3] EDT+5*
^RMPR(669.9 - [#669.9] INV+1

Label References

Name Line Occurrences
$$CK EN1EN1+2, RETUSERSER+1
EN1 EN1
EX EDT+4, EDT+5
EXIT ENEN1EN1+2, RETUSERSER+1, POS+1, POS+3, EDT+1, EDT+2
EDT+3, EX
INV EDT+5
RETU RETU

Naked Globals

Name Field # of Occurrence
^(0 POS+2*, DSPINV+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA POS+2*, EDT+4*, EDT+5
DD POS+1!
>> DFN POS+2
DIC EN!*, POS+1*, POS+2, EDT+2*, EDT+4
DIC("A" EN*, EDT+2*
DIC("S" EDT+1*
DIC("W" EDT+2*
DIC(0 EN*, POS+1*, EDT+2*
>> DIE EDT+4*
>> DIK POS+2*
DIR EN1!, EN1+2!, RETU!, SER!, SER+1!
DIR("A" EN1*, EN1+2*, RETU*, SER*
DIR("B" EN1*, EN1+2*, RETU*, SER+1*
DIR(0 EN1*, EN1+2*, RETU*, SER*, SER+1*
DLAYGO POS+1*!, EDT+1*
DO POS+1!
>> DR EDT+4*
DT POS+1, POS+2
>> DTOUT CK, EDT+4
>> DUOUT CK
>> IEN POS+2*
>> PRCP("I" INV+2*
>> PRCP("ITEM" INV+2!*, INV+3
>> PRCP("QTY" INV+2*
>> PRCP("TYP" INV+2*
>> PRCPPRIV INV+2*
RMPR EXIT~
RMPR("STA" POS+2
>> RMPRCOST EN1+2*
>> RMPRCST EN1+2*, POS+2
>> RMPRDRET SER+1*, POS+2
>> RMPRITEM EN*, POS+2
>> RMPRQTY EN1+1*, POS+2
>> RMPRSER SER*, POS+2
RMPRSITE INV+1, EXIT~
>> RMPRSTAT RETU+1*, POS+2
U POS+2, EDT+5, EDT+6, DSPINV+1, INV+2
>> X EN1EN1+1, EN1+2, RETUSERPOS+1*, EDT+1
>> Y ENRETU+1, SER+1, POS+1, POS+2, EDT+2, EDT+3, EDT+4, DSP
>> Y(0 EDT+4
>> ZA EDT+4*, EDT+6, EX, DSP*
>> ZA(1 EDT+4*, EDT+5, INV+2
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