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

Package: Prosthetics

Routine: RMPRPIY6


Information

RMPRPIY6 ;HINES OIFO/ODJ - EI - Edit Locations and Items ;10/7/02 14:46

Source Information

Source file <RMPRPIY6.m>

Call Graph

Call Graph

Call Graph Total: 18

Package Total Call Graph
Prosthetics 17 $$GETUSR^RMPRPIU0  ($$ETOI,$$GET,$$UPD)^RMPRPIX1  ($$CRE,$$GET,$$UPD)^RMPRPIX4  $$GET^RMPRPIX5  ($$DTIEN,$$ETOI,$$UPD,$$VNDIEN)^RMPRPIX6  $$UPD^RMPRPIX7  ($$GET,$$UPD)^RMPRPIXB  $$GET^RMPRPIXD  
TRANS^RMPRPIXF  $$UPCR^RMPRPIXJ  ($$STN,ITED,MASIT)^RMPRPIY1  (QTY,REO,SRC,TVAL,UCST,UNIT)^RMPRPIY5  (HCPCS,LOCNM)^RMPRPIY7  $$LOC1^RMPRPIYB  ITEM^RMPRPIYP  LOCN^RMPRPIYQ  
PVEN^RMPRPIYR  
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: 2

Package Total Caller Graph
Prosthetics 2 RMPR INV EDIT  RMPRPIXF  

Entry Points

Name Comments DBIA/ICR reference
EI
STN
HCPCS
HCPCS3
HCPCS4
HCPCS4A
HCPCS5
CURSTL
CURST
RLOC
LOCN
LOCN1
REO
REO1 ;
SRC
QTY
UCST
TVAL
VEND ;D VEND^RMPRPIY5(.RMPRVEND,.RMPREXC)
UNIT
TRANS
TRANSX
HAL
EIU
EIX
UNLOCK

External References

Name Field # of Occurrence
$$GETUSR^RMPRPIU0 TRANSX+5
$$ETOI^RMPRPIX1 HCPCS4+1
$$GET^RMPRPIX1 HCPCS4A+14
$$UPD^RMPRPIX1 HCPCS4A+11
$$CRE^RMPRPIX4 REO1+10
$$GET^RMPRPIX4 REO+9
$$UPD^RMPRPIX4 REO1+14
$$GET^RMPRPIX5 CURST+16, LOCN+5
$$DTIEN^RMPRPIX6 TRANS+54
$$ETOI^RMPRPIX6 TRANS+5
$$UPD^RMPRPIX6 TRANS+15, TRANS+49
$$VNDIEN^RMPRPIX6 CURST+12
$$UPD^RMPRPIX7 TRANS+10, TRANS+18, TRANS+47
$$GET^RMPRPIXB TRANS+28
$$UPD^RMPRPIXB TRANS+50
$$GET^RMPRPIXD HCPCS4A+2
TRANS^RMPRPIXF TRANS+2
$$UPCR^RMPRPIXJ TRANS+56
$$STN^RMPRPIY1 STN+1
ITED^RMPRPIY1 HCPCS5
MASIT^RMPRPIY1 HCPCS4A+3
QTY^RMPRPIY5 QTY
REO^RMPRPIY5 REO1+2
SRC^RMPRPIY5 SRC+1
TVAL^RMPRPIY5 TVAL+4
UCST^RMPRPIY5 UCST
UNIT^RMPRPIY5 UNIT
HCPCS^RMPRPIY7 HCPCS+3
LOCNM^RMPRPIY7 LOCN1
$$LOC1^RMPRPIYB LOCN+1
ITEM^RMPRPIYP HCPCS3
LOCN^RMPRPIYQ RLOC
PVEN^RMPRPIYR CURST+1
KILL^XUSCLEAN EIX

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: STN+1
Function Call: WRITE
  • Prompt: !!,"Editing Inventory Items.",!
  • Line Location: HCPCS+0
Function Call: WRITE
  • Prompt: !,"** No HCPCS selected."
  • Line Location: HCPCS+7
Function Call: WRITE
  • Prompt: !!,"HCPCS: "_RMPR1("HCPCS")_" "_RMPR1("SHORT DESC")
  • Line Location: HCPCS4+0
Function Call: WRITE
  • Prompt: !,"PROSTHETIC CURRENT STOCK record for HCPCS item open by someone else"
  • Line Location: CURSTL+0
Function Call: WRITE
  • Prompt: !,"Location: "_RMPR5("NAME")
  • Line Location: LOCN+7
Function Call: WRITE
  • Prompt: !
  • Line Location: LOCN1+0
Function Call: WRITE
  • Prompt: !,"TOTAL COST OF QUANTITY: "_RMPRTVAL
  • Line Location: TVAL+2
Function Call: WRITE
  • Prompt: !,"The quantity cannot be allowed because it would cause a",!
  • Line Location: TRANS+60
Function Call: WRITE
  • Prompt: "negative on hand quantity.",!
  • Line Location: TRANS+61
Function Call: WRITE
  • Prompt: "Please check your inventory and use the reconciliation option",!
  • Line Location: TRANS+62
Function Call: WRITE
  • Prompt: "as needed.",!
  • Line Location: TRANS+63
Function Call: WRITE
  • Prompt: !!,"** Item "
  • Line Location: TRANSX+1
Function Call: WRITE
  • Prompt: RMPR11("HCPCS-ITEM")
  • Line Location: TRANSX+2
Function Call: WRITE
  • Prompt: " was "
  • Line Location: TRANSX+3
Function Call: WRITE
  • Prompt: "Edited by "
  • Line Location: TRANSX+4
Function Call: WRITE
  • Prompt: $$GETUSR^RMPRPIU0(DUZ)
  • Line Location: TRANSX+5
Function Call: WRITE
  • Prompt: " @ Location ",RMPR5("NAME")
  • Line Location: TRANSX+7
Function Call: WRITE
  • Prompt: !!,"** The Item could not be modified due to a problem - please contact support"
  • Line Location: TRANSX+10

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RMPR(661.11 - [#661.11] SRC, SRC+5*
^RMPR(661.4 - [#661.4] REO+1, REO+3
^RMPR(661.7 - [#661.7] CURSTL, UNLOCK

Label References

Name Line Occurrences
EIU CURST+2, RLOC+1, LOCN1+2, LOCN1+3, REO1+4, REO1+5, SRC+4, QTY+3, UCST+3, TVAL+7
, UNIT+3
EIX STN+2, STN+3, HCPCS+4, HCPCS+6, HCPCS3+1, HCPCS4A+4, HCPCS5+1
HAL TRANS+2
HCPCS HCPCS3+2, HCPCS3+3, HCPCS4A+5, HCPCS4A+6, HCPCS5+2, SRC+3, QTY+2, UCST+2, TVAL+6, UNIT+2
, HAL+2
HCPCS4 HCPCS+9
HCPCS4A HCPCS5+3
HCPCS5 CURST+3, LOCN1+1, REO1+3
LOCN CURSTL, CURST+17, RLOC+2
QTY UCST+1, TRANS+59
REO LOCN+2, QTY+1
RLOC CURST+4, CURST+5
SRC SRC+2
STN HCPCS+5
TRANSX REO1+17
UCST TVAL+5, UNIT+1
UNLOCK CURST+3, LOCN1+1, REO1+3, SRC+3, QTY+2, UCST+2, TVAL+6, UNIT+2, TRANSX+12, EIU
VEND TVAL

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DUZ TRANSX+5
IOF STN+1
RMHCC HCPCS4A!, TRANS+2
RMPR1 EI~, STN+4!, HCPCS+2!, HCPCS+3
RMPR1("HCPCS" HCPCS+3, HCPCS3, HCPCS4
RMPR1("IEN" HCPCS+1
RMPR1("SHORT DESC" , HCPCS4
RMPR11 EI~, STN+4!, HCPCS+2!, HCPCS+3, HCPCS3, HCPCS4+1, HCPCS4A+12!, HCPCS4A+14, HCPCS5, RLOC
, REO1+10
RMPR11("HCPCS" CURSTL, CURST+1, REO+1, REO+3, TRANS+52, UNLOCK
RMPR11("HCPCS-ITEM" TRANSX+2
RMPR11("IEN" HCPCS+9, HCPCS4A+9, HCPCS4A+13*, SRC, SRC+5
RMPR11("ITEM" CURSTL, CURST+1, REO+1, REO+3, TRANS+53, UNLOCK
RMPR11I EI+3~, HCPCS4+1!
RMPR11I("ITEM MASTER IEN" , HCPCS4A+1, HCPCS4A+2, HCPCS4A+7, HCPCS4A+15*
RMPR11M EI+3~, HCPCS4A+8!, HCPCS4A+11, HCPCS4A+16!
RMPR11M("IEN" HCPCS4A+9*, HCPCS4A+13
RMPR11M("ITEM MASTER IEN" , HCPCS4A+10*
RMPR4 EI+1~, REO!, REO+9
RMPR4("IEN" REO+1*, REO+2, REO+3*, REO+5, REO1+6, REO1+9, REO1+13
RMPR4("RE-ORD ER QTY" , REO+6*, REO+11, REO1+6
RMPR441 EI+3~, HCPCS4A!, HCPCS4A+2, HCPCS4A+3, HCPCS4A+16!
RMPR441("IEN" HCPCS4A+1*, HCPCS4A+7, HCPCS4A+10, HCPCS4A+15
RMPR4M EI+1~, REO1+7!, REO1+10, REO1+14
RMPR4M("IEN" REO1+13*
RMPR4M("RE-OR DER QTY" , REO1+8*
RMPR5 EI~, STN+4!, HCPCS+2!, CURST!, CURST+16, RLOC, LOCN, LOCN+5, LOCN1, REO1+1
, REO1+10
RMPR5("IEN" CURST+15*, LOCN+3, LOCN+4*, LOCN1+4, REO+3, REO1+6, TRANS+12, TRANS+13, TRANS+16
RMPR5("NAME" LOCN+7, TRANSX+7
RMPR5P EI+2~, LOCN!*, REO1+1!*
RMPR5P("IEN" REO1+6
RMPR6 EI+1~, CURST+1, CURST+4!, CURST+12, REO1+17, TRANS+5, TRANS+54, HAL+1!
RMPR6("DATE&TIME" TRANS+55
RMPR6("IEN" TRANS+14, TRANS+27, TRANS+48
RMPR6("VENDOR IEN" , CURST+13
RMPR6("VENDOR" CURST+14
RMPR69 EI+2~, TRANS+25!, TRANS+28, TRANS+37, TRANS+44, TRANS+50
RMPR69("GAIN/ LOSS VALUE" , TRANS+44*
RMPR69("GAIN/LOSS" TRANS+37*
RMPR69("TRANS IEN" , TRANS+27*
RMPR6I EI+2~, TRANS+4!, TRANS+5
RMPR6I("LOCATION" TRANS+12
RMPR6I("TRAN TYPE" , TRANS+26
RMPR6M EI+1~, TRANS!, TRANS+15, TRANS+19!, TRANS+49, TRANS+57!
RMPR6M("IEN" TRANS+14*, TRANS+48*
RMPR6M("LOCATION" TRANS+13*
RMPR6M("QUANTITY" TRANS+32*
RMPR6M("VALUE" TRANS+40*
RMPR7 EI+1~, CURST+1, CURST+4!, HAL+1!
RMPR7("IEN" CURST+5, TRANS+9, TRANS+17, TRANS+46
RMPR7("QUANTITY" CURST+6, CURST+8, CURST+9, TRANS+24, TRANS+31, TRANS+33
RMPR7("UNIT N AME" , CURST+11
RMPR7("UNIT" CURST+10, TRANS+8
RMPR7("VALUE" CURST+7, CURST+9, TRANS+24, TRANS+39, TRANS+41, TRANS+42
RMPR7M EI+1~, TRANS!, TRANS+10, TRANS+18, TRANS+19!, TRANS+47, TRANS+57!
RMPR7M("IEN" TRANS+9*, TRANS+17*, TRANS+46*
RMPR7M("LOCATION" TRANS+16*
RMPR7M("QUANTITY" TRANS+31, TRANS+35*, TRANS+59
RMPR7M("UNIT" TRANS+8*
RMPR7M("VALUE" TRANS+42*
RMPR9M EI~, TRANS+25!, TRANS+56, TRANS+57!
RMPR9M("HCP" TRANS+52*
RMPR9M("ITE" TRANS+53*
RMPR9M("RDT" TRANS+55*
RMPR9M("STA" TRANS+51*
RMPR9M("TCST" TRANS+30*, TRANS+43*
RMPR9M("TQTY" TRANS+30*, TRANS+36*
>> RMPRBCK SRC*, SRC+5
RMPRERR EI~, STN+1*, STN+2, HCPCS+2!, HCPCS4+1*, HCPCS4A+2*, HCPCS4A+11*, HCPCS4A+14*, CURST+12*, CURST+16*
, LOCN+5*, REO+9*, REO1+10*, REO1+14*, TRANS+5*, TRANS+10*, TRANS+15*, TRANS+18*, TRANS+28*, TRANS+47*
, TRANS+49*, TRANS+50*, TRANS+54*, TRANS+56*, TRANSX
RMPREXC EI~, STN+1, STN+3, HCPCS+2!, HCPCS+3, HCPCS+4, HCPCS+5, HCPCS+6, HCPCS3, HCPCS3+1
, HCPCS3+2, HCPCS3+3, HCPCS4A+3, HCPCS4A+4, HCPCS4A+5, HCPCS4A+6, HCPCS5, HCPCS5+1, HCPCS5+2, HCPCS5+3
, CURST+1, CURST+2, CURST+3, CURST+4, RLOC, RLOC+1, LOCN1, LOCN1+1, LOCN1+2, LOCN1+3
, REO1+2, REO1+3, REO1+4, REO1+5, SRC+1, SRC+2, SRC+3, SRC+4, QTY, QTY+1
, QTY+2, QTY+3, UCST, UCST+1, UCST+2, UCST+3, TVAL+4, TVAL+5, TVAL+6, TVAL+7
, UNIT, UNIT+1, UNIT+2, UNIT+3
RMPRGLAM EI+1~, TRANS+30*, TRANS+41*, TRANS+42, TRANS+43, TRANS+44, HAL+1!
RMPRGLQ EI+2~, TRANS+30*, TRANS+33*, TRANS+36, TRANS+37, TRANSX+6, HAL+1!
RMPRHCPC EI+2~
RMPRLCN EI+2~, STN+4!, HCPCS+2!, CURST*, CURST+1, CURST+15, LOCN+1*, LOCN+2, LOCN+4, LOCN1+4*
, REO+1
RMPROVAL EI+2~, STN*, STN+4, HCPCS+1*
RMPRQTY EI+1~, CURST+6*, QTY, QTY+4*, TVAL+1, TRANS+24, TRANS+31, TRANS+32, TRANS+33, TRANS+35
, HAL+1!
RMPRREO EI+1~, REO+11*, REO1+2, REO1+6, REO1+8, HAL+1!
>> RMPRSRC SRC*, SRC+1, SRC+5
RMPRSTN EI~, STN+1
RMPRSTN("IEN" STN, STN+4, HCPCS+3, HCPCS3, CURSTL, CURST+1, RLOC, LOCN+1, LOCN1, REO+1
, REO+3, TRANS+51, UNLOCK
RMPRTVAL EI~, CURST+7*, TVAL+1*, TVAL+2, TVAL+4, TRANS+24, TRANS+39, TRANS+40, TRANS+41, HAL+1!
RMPRUCST EI+2~, CURST+8*, CURST+9*, UCST, UCST+4*, TVAL, TVAL+1, HAL+1!
RMPRUNI EI+3~, HCPCS+2!, UNIT
RMPRUNI("IEN" CURST+10*, UNIT+4
RMPRUNI("NAME" CURST+11*
RMPRUNI("UNIT" UNIT+4*, TRANS+8
RMPRVEND EI~, HAL+1!
RMPRVEND("IEN" CURST+13*
RMPRVEND("NAME" CURST+14*
U SRC, SRC+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All