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

Package: Prosthetics

Routine: RMPRED4


Information

RMPRED4 ;PHX/RFM,RVD-EDIT ISSUE FROM STOCK ;8/29/1994

Source Information

Source file <RMPRED4.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Prosthetics 5 ($$COST,BAL)^RMPR5NU1  (NHCPC,QTYN)^RMPRED5  (CO,LOC)^RMPRED6  $$DEL^RMPRPCED  LOWBA^RMPRSTI  
VA FileMan 5 DD^%DT  ^DIC  FILE^DICN  (,IX1)^DIK  ^DIR  
IFCAP 1 ^PRCPUSA  
Kernel 1 KILL^XUSCLEAN  

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 RMPRED6  

Entry Points

Name Comments DBIA/ICR reference
QTY ;
DATE
REQ
LOT
REMA
CC
POST ;POSTS EDITED TRANSACTION TO 660
DEL1 ;ENTRY POINT TO DELETE AN ISSUE FROM STOCK
DEL2
ERR
EXIT ;KILL VARIABLES AND EXIT ROUTINE

External References

Name Field # of Occurrence
DD^%DT DATE+2
^DIC DEL1+7, DEL1+8
FILE^DICN DEL2+34
^DIK DEL2+12, DEL2+19, DEL2+38
IX1^DIK POST+10, DEL2+36
^DIR RMPRED4+9, QTY+1, DATE, REQ, LOT, REMA, DEL1+3
^PRCPUSA DEL1+9
$$COST^RMPR5NU1 RMPRED4+8
BAL^RMPR5NU1 DEL2+32
NHCPC^RMPRED5 POST+13
QTYN^RMPRED5 POST+12
CO^RMPRED6 RMPRED4+9, QTY+1, DATE+1, REQ, LOT, REMA, CC, DEL1+4
LOC^RMPRED6 QTY+2
$$DEL^RMPRPCED DEL2+5
LOWBA^RMPRSTI QTY+2
KILL^XUSCLEAN EXIT+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?5,"Deleted..."
  • Condition for execution: $P(R1(0),U,12)&(X="@")
  • Line Location: DATE+1
Function Call: WRITE
  • Prompt: ?16,"??"
  • Line Location: DATE+1
Function Call: WRITE
  • Prompt: !,"Jumping not allowed!"
  • Line Location: REQ+1
Function Call: WRITE
  • Prompt: !?5,"Deleted..."
  • Line Location: REQ+2
Function Call: WRITE
  • Prompt: !,"Jumping not allowed!"
  • Line Location: LOT+1
Function Call: WRITE
  • Prompt: !?5,"Deleted..."
  • Line Location: LOT+2
Function Call: WRITE
  • Prompt: !,"Jumping not allowed!"
  • Line Location: REMA+1
Function Call: WRITE
  • Prompt: !?5,"Deleted..."
  • Line Location: REMA+2
Function Call: WRITE
  • Prompt: !,"Posting...."
  • Line Location: POST+1
Function Call: WRITE
  • Prompt: $C(7),!?10,"Deleted..."
  • Line Location: DEL2+39
Function Call: WRITE
  • Prompt: !!,"Error encountered while posting to GIP. Patient 10-2319 not deleted!! Please check with your Application Coordinator."
  • Line Location: ERR+0
Routine Call
  • DIC
  • Line Location:
    • DEL1+7
    • DEL1+8
Routine Call
  • DIR
  • Line Location:
    • RMPRED4+9
    • QTY+1
    • DATE
    • REQ
    • LOT
    • REMA
    • DEL1+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRCP(445 - [#445] Classic Fileman Calls
^RMPR(660 - [#660] Classic Fileman Calls
^RMPR(661.2 - [#661.2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RMPR(660 - [#660] POST+5*, POST+7!, POST+8*, POST+9*, DEL1+6, DEL2, DEL2+1, DEL2+2, DEL2+8, DEL2+15
, EXIT+1
^RMPR(661 - [#661] POST+3, POST+4
^RMPR(661.1 - [#661.1] POST+8
^RMPR(661.2 - [#661.2] DEL2+20, DEL2+35*
^RMPR(661.3 - [#661.3] DEL2+22, DEL2+24, DEL2+27, DEL2+28, DEL2+29*, DEL2+30*, DEL2+31*, DEL2+37
^RMPR(668 - [#668] DEL2+9, DEL2+11, DEL2+13, DEL2+14
^RMPR(669.9 - [#669.9] DEL1+5

Label References

Name Line Occurrences
CC REMA+2
DATE DATE+1
DEL2 DEL1+5
ERR DEL1+7, DEL1+9
EXIT DATE+1, REQ, REMA, POST+12, POST+14, DEL1+3, DEL2+40, ERR
LOT REQ+2, LOT+1
REMA LOT+2, REMA+1
REQ REQ+1

Naked Globals

Name Field # of Occurrence
^("AM" POST+5*
^(1 POST+5*
^(2 POST+5*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ACNT RMPRED4+10*
>> DA POST+10*, DEL2+11*, DEL2+17*, DEL2+36*, DEL2+38*
>> DA(1 DEL2+12*, DEL2+18*
DD DEL2+33!
DIC DEL1+7*!, DEL1+8*!, DEL2+33*, DEL2+36
DIC("S" DEL1+7*, DEL1+8*
DIC(0 DEL1+7*, DEL1+8*, DEL2+33*
DIK POST+10*!, DEL2+12*, DEL2+18*, DEL2+36*, DEL2+38*
DIR RMPRED4+5!, RMPRED4+11!, QTY+3!, DATE!, LOT!, REMA!, DEL1+1!
DIR("A" RMPRED4+7*, DATE*, DEL1+2*
DIR("B" RMPRED4+7*, RMPRED4+8*, QTY+1*, DATE*, REQ*, LOT*, REMA*, DEL1+2*
DIR(0 RMPRED4+7*, QTY+1*, DATE*, REQ*, LOT*, REMA*, DEL1+2*
>> DIRUT RMPRED4+9, QTY+1, REQ, REMA, DEL1+3
DLAYGO DEL2+33*, DEL2+34!
DO DEL2+33!
DT DEL2+33, DEL2+35
>> DTOUT RMPRED4+9, DATE+1, REQ, REMA, DEL1+3
>> DUOUT RMPRED4+9, LOT, DEL1+3
DUZ DEL2+35
>> I DEL2+14*, DEL2+15
>> PRCP("I" DEL1+7*, DEL1+8*
>> PRCP("ITEM" DEL1+9*
>> PRCP("QTY" DEL1+9*
>> PRCP("TYP" DEL1+9*
>> R1("AM" POST+5
>> R1(0 RMPRED4+7, RMPRED4+10*, QTY+1, QTY+2, QTY+3*, DATE, DATE+1, DATE+2*, REQ, REQ+2*
, REQ+3*, LOT, LOT+2*, LOT+3*, REMA, REMA+2*, REMA+3*, POST+2, POST+5, DEL1+9
>> R1(1 POST+2, POST+5
>> R1(2 POST+5
>> R3("D" RMPRED4+10*, DATE, DATE+2*, DEL1+9
>> R6612 DEL2*, DEL2+20
>> RAV DEL2+28*, DEL2+30
>> RAVA DEL2+28*, DEL2+35
>> RBAL DEL2+26*, DEL2+27*, DEL2+29, DEL2+30, DEL2+37
>> RIPNEW POST+2*
>> RITNEW POST+2*, POST+3*
>> RITOLD POST+4*
>> RM0 DEL2+1*
>> RM1 DEL2*, DEL2+21
>> RM10 DEL2+2*, DEL2+4
>> RMAMIEN DEL2+13*, DEL2+17
>> RMAMIS DEL2+8*, DEL2+13, DEL2+15
>> RMAMIS68 DEL2+15*
>> RMBA DEL2+27*
>> RMCHK DEL2+5*
>> RMCNT DEL2+13*, DEL2+15*, DEL2+16
>> RMCOM DEL2+34*, DEL2+35
>> RMDAHC DEL2+21*, DEL2+22, DEL2+35
>> RMDFN POST+11
>> RMHCDA RMPRED4+8, DEL2+22*, DEL2+23, DEL2+24, DEL2+27, DEL2+28, DEL2+29, DEL2+30, DEL2+31
>> RMHCNEW POST+6, POST+8, POST+11, POST+12, POST+13
>> RMHCOLD POST+6, POST+11, POST+12, POST+13
>> RMIE68 DEL2+9*, DEL2+10, DEL2+11, DEL2+12, DEL2+13, DEL2+14, DEL2+18
>> RMIPCE DEL2+4*, DEL2+7
>> RMIT DEL2+21*, DEL2+24, DEL2+35
>> RMITDA RMPRED4+8, DEL2+24*, DEL2+25, DEL2+27, DEL2+28, DEL2+29, DEL2+30, DEL2+31
>> RMITNEW POST+11, POST+12, POST+13
>> RMITOLD POST+11, POST+12, POST+13
>> RMLOC RMPRED4+8, DEL2+20*, DEL2+22, DEL2+24, DEL2+27, DEL2+28, DEL2+29, DEL2+30, DEL2+31, DEL2+35
, DEL2+37
>> RMLOCNEW POST+11, POST+12, POST+13
>> RMLOCOLD POST+11, POST+12, POST+13
RMPR EXIT+2~
RMPR("STA" DEL2+35
>> RMPRCUST QTY+1*, QTY+3
>> RMPRDTD DEL1+7*, DEL1+8
>> RMPRIEN POST+5, POST+7, POST+8, POST+9, POST+10, DEL1+6, DEL2, DEL2+1, DEL2+2, DEL2+5
, DEL2+8, DEL2+9, DEL2+11, DEL2+38, EXIT+1
>> RMPRIP DEL1+6, DEL1+7
>> RMPRPF DEL1+5, DEL2
>> RMPRREL RMPRED4+10*
RMPRSITE DEL1+5, EXIT+2~
>> RMQNEW POST+2*, POST+11, POST+12
>> RMQOLD POST+11, POST+12
>> RMQTY DEL2+1*, DEL2+27, DEL2+31, DEL2+35
>> RMSO POST+11
>> RMSTO DEL2+20*, DEL2+21
>> RMTOBA DEL2+35
>> RMTOCO DEL2+35
>> RMUBA QTY+2
>> RMVAR POST+11*, POST+12, POST+13
U RMPRED4+7, RMPRED4+10, QTY+1, QTY+2, QTY+3, DATE, DATE+1, DATE+2, REQ, REQ+2
, REQ+3, LOT, LOT+2, LOT+3, REMA, REMA+2, REMA+3, POST+2, POST+3, POST+4
, POST+9, DEL1+5, DEL1+6, DEL1+9, DEL2, DEL2+1, DEL2+4, DEL2+20, DEL2+21, DEL2+27
, DEL2+28, DEL2+29, DEL2+30, DEL2+31, DEL2+37
>> X DATE+1, REQ+1, REQ+2, REQ+3, LOT+1, LOT+2, LOT+3, REMA+1, REMA+2, REMA+3
, DEL1+7*, DEL2+33*
>> Y RMPRED4+10, QTY+2, QTY+3, DATE+2*, DEL1+4, DEL1+7, DEL1+8, DEL2+35, DEL2+36
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