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

Package: Prosthetics

Routine: RMPRPIY7


Information

RMPRPIY7 ;HINCIO/ODJ - PIP EDIT - PROMPTS ;9/18/02 15:17

Source Information

Source file <RMPRPIY7.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Prosthetics 5 $$GET^RMPRPIX6  ($$ETOI,$$GET)^RMPRPIX7  LIKE^RMPRPIY8  LIKE^RMPRPIYB  LIKE^RMPRPIYC  
VA FileMan 2 NOW^%DTC  ^DIR  

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

Package Total Caller Graph
Prosthetics 10 RMPRPIXR  RMPRPIY1  RMPRPIY6  RMPRPIYA  RMPRPIYG  RMPRPIYL  RMPRPIYN  RMPRPIYS  
RMPRPIYT  RMPRPIYX  

Entry Points

Name Comments DBIA/ICR reference
LOCNM(RMPRSTN,RMPR5,RMPREXC) ;
LOCNM1
LOCNMX
OK(RMPRYN,RMPREXC) ;
OKX
HCPCS(RMPRSTN,RMPRHPTX,RMPR1,RMPR11,RMPREXC) ;
HCPCS1
CHECK
HCPCSU
HCPCSX
ITEM(RMPRSTN,RMPRLCN,RMPRHCPC,RMPR11,RMPR4,RMPREXC) ;
ITEMA1
ITEMX
QTY(RMPRQTY,RMPREXC) ;
QTYX
TVAL(RMPRTVAL,RMPREXC) ;
TVALX
REO(RMPRREO,RMPREXC) ;
REOX
VEND(RMPRVEND,RMPREXC) ;
VENDX
PVEN(RMPRSTN,RMPRLCN,RMPRHCPC,RMPRITM,RMPR6,RMPR7,RMPREXC) ;
PVEN1
PVEN1A
PVEN2
PVEN3
PVENX

External References

Name Field # of Occurrence
NOW^%DTC LOCNM+2
^DIR LOCNM1, OK+7, HCPCS1, ITEMA1, QTY+7, TVAL+7, REO+7, VEND+7, PVEN2+25
$$GET^RMPRPIX6 PVEN2+19, PVEN3+6
$$ETOI^RMPRPIX7 PVEN2+15, PVEN3+3
$$GET^RMPRPIX7 PVEN2+9, PVEN3+1
LIKE^RMPRPIY8 ITEMA1+4
LIKE^RMPRPIYB LOCNM1+11
LIKE^RMPRPIYC HCPCS1+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Please enter a valid Location"
  • Line Location: LOCNM1+14
Function Call: WRITE
  • Prompt: !,"** No HCPCS Selected or Unable to Select Inactive HCPCS..."
  • Line Location: CHECK+0
Function Call: WRITE
  • Prompt: !,"** Unable to Select Inactive HCPCS item..."
  • Line Location: CHECK+1
Function Call: WRITE
  • Prompt: !,"Cannot locate ITEM with this sequence NUMBER"
  • Line Location: ITEMA1+9
Function Call: WRITE
  • Prompt: " ",RMPR11("HCPCS-ITEM")," ",RMPR11("DESCRIPTION")
  • Line Location: ITEMA1+11
Function Call: WRITE
  • Prompt: !,"Select a current Stock Record to edit...",!
  • Line Location: PVEN2+2
Function Call: WRITE
  • Prompt: !,?7,"Date",?21,"Quantity",?35,"Value",?42,"Vendor"
  • Line Location: PVEN2+3
Function Call: WRITE
  • Prompt: !,?2,$J(RMPRLIN,2)
  • Line Location: PVEN2+10
Function Call: WRITE
  • Prompt: ?7,$P(RMPR7("DATE&TIME"),"@",1)
  • Line Location: PVEN2+11
Function Call: WRITE
  • Prompt: ?21,$J(RMPR7("QUANTITY"),8,0)
  • Line Location: PVEN2+12
Function Call: WRITE
  • Prompt: ?30,$J(RMPR7("VALUE"),10,2)
  • Line Location: PVEN2+13
Function Call: WRITE
  • Prompt: ?42,RMPR6("VENDOR")
  • Line Location: PVEN2+20
Routine Call
  • DIR
  • Line Location:
    • LOCNM1
    • OK+7
    • HCPCS1
    • ITEMA1
    • QTY+7
    • TVAL+7
    • REO+7
    • VEND+7
    • PVEN2+25

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RMPR(661.1 - [#661.1] CHECK
^RMPR(661.11 - [#661.11] CHECK+1
^RMPR(661.7 - [#661.7] PVEN+6

Label References

Name Line Occurrences
CHECK HCPCS1+1
HCPCS1 HCPCS1+6, CHECK, CHECK+1, CHECK+3
HCPCSU HCPCS1+7, CHECK+2
HCPCSX HCPCS1+2, HCPCS1+3, HCPCS1+4
ITEMA1 ITEMA1+7, ITEMA1+8, ITEMA1+13
ITEMX ITEM+4, ITEM+5, ITEM+6, ITEMA1+1, ITEMA1+2, ITEMA1+3, ITEMA1+5, ITEMA1+6, ITEMA1+14
LOCNM1 LOCNM1+12, LOCNM1+13
LOCNMX LOCNM1+4, LOCNM1+5, LOCNM1+6, LOCNM1+7
OK ITEMA1+12
OKX OK+8, OK+9, OK+10
PVEN1 PVEN1A+8
PVEN1A PVEN+7
PVEN2 PVEN1A, PVEN1A+1, PVEN1A+2, PVEN1A+3, PVEN1A+4, PVEN1A+5
PVEN3 PVEN2+1
PVENX PVEN2, PVEN2+26, PVEN2+27, PVEN2+28
QTYX QTY+8, QTY+9, QTY+10
REOX REO+8, REO+9, REO+10
TVALX TVAL+8, TVAL+9, TVAL+10, TVAL+11
VENDX VEND+8, VEND+9, VEND+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA LOCNM+1~, OK+1~, HCPCS+1~, ITEM+1~, QTY+1~, TVAL+1~, REO+1~, VEND+1~, PVEN+1~
DIC HCPCS+1~
DIR LOCNM+1~, OK+1~, HCPCS+1~, ITEM+1~, QTY+1~, TVAL+1~, REO+1~, VEND+1~, PVEN+1~
DIR("?" LOCNM+8*, HCPCS+10*, ITEM+10*
DIR("??" LOCNM+9*, HCPCS+11*, ITEM+11*
DIR("???" HCPCS+12*
DIR("A" LOCNM+6*, OK+4*, HCPCS+3*, ITEM+9*, QTY+5*, TVAL+5*, REO+5*, VEND+5*, PVEN2+24*
DIR("B" LOCNM+7*, OK+5*, HCPCS+8*, QTY+6*, TVAL+6*, REO+6*, VEND+6*
DIR("S" HCPCS+4*
DIR(0 LOCNM+5*, OK+6*, HCPCS+9*, ITEM+8*, QTY+4*, TVAL+4*, REO+4*, VEND+4*, PVEN2+23*
DIROUT LOCNM+1~, LOCNM1+6, OK+1~, OK+9, HCPCS+1~, HCPCS1+3, ITEM+1~, ITEMA1+2, QTY+1~, QTY+9
, TVAL+1~, TVAL+9, REO+1~, REO+9, VEND+1~, VEND+9, PVEN2+27
DIRUT OK+1~, HCPCS+1~, QTY+1~, TVAL+1~, REO+1~, VEND+1~
DTOUT LOCNM+1~, LOCNM1+5, OK+1~, OK+8, HCPCS+1~, HCPCS1+2, ITEM+1~, ITEMA1+1, QTY+1~, QTY+8
, TVAL+1~, TVAL+8, REO+1~, REO+8, VEND+1~, VEND+8, PVEN2+26
DUOUT LOCNM+1~, OK+1~, HCPCS+1~, HCPCS1+4, ITEM+1~, ITEMA1+3, QTY+1~, TVAL+1~, REO+1~, REO+10
, VEND+1~, VEND+10, PVEN2+28
RM6610 HCPCS+2~
RMPR1 HCPCS~, HCPCSU!*
RMPR1("REMOVE" HCPCS1+7
RMPR11 HCPCS~, HCPCS1+5, ITEM~, ITEM+7!, ITEMA1+4
RMPR11("DESCRIPTION" ITEMA1+11
RMPR11("HCPCS-ITEM" ITEMA1+11
RMPR11("IEN" CHECK+1
RMPR1N HCPCS+1~, HCPCS1!, HCPCS1+5, HCPCSU
RMPR1N("HCPCS" HCPCS1+1
RMPR1N("IEN" HCPCS1+1, HCPCS1+7, CHECK, CHECK+2
RMPR4 ITEM~, ITEM+7!, ITEMA1+4
RMPR4("IEN" ITEMA1+8
RMPR5 LOCNM~, LOCNM1+8!, LOCNM1+11
RMPR5("IEN" LOCNM+10*, LOCNM1+4, LOCNM1+13
RMPR5("NAME" LOCNM+7
RMPR5("STATIO N IEN" , LOCNM1+10*
RMPR5("STATION" LOCNM1+9*
RMPR6 PVEN~, PVEN2+16!, PVEN2+19, PVEN2+22!, PVEN3+6
RMPR6("DATE&TIME" PVEN2+17*, PVEN3+4*
RMPR6("HCPCS" PVEN2+18*, PVEN3+5*
RMPR6("VENDOR" PVEN2+20
RMPR7 PVEN~, PVEN2+7!, PVEN2+9, PVEN2+15, PVEN2+22!, PVEN3+1, PVEN3+3
RMPR7("DATE&TIME" PVEN2+11
RMPR7("IEN" PVEN2+8*, PVEN3*
RMPR7("QUANTITY" PVEN2+12
RMPR7("VALUE" PVEN2+13
RMPR7I PVEN+2~, PVEN2+14!, PVEN2+15, PVEN3+2!, PVEN3+3
RMPR7I("DATE&TIME" PVEN2+17, PVEN3+4
RMPRA PVEN+1~
RMPRA( PVEN1A+7*, PVEN2+5, PVEN2+8, PVEN3
RMPRB PVEN+1~
RMPRERR LOCNM+1~, LOCNM+4*, HCPCS+1~, HCPCS+5*, ITEM+1~, ITEM+2*, ITEM+4*, ITEM+5*, ITEM+6*, ITEMX
, QTY+1~, QTY+3*, QTYX, TVAL+1~, TVAL+3*, TVALX, REO+1~, REO+3*, REOX, VEND+1~
, VEND+3*, VENDX, PVEN+1~, PVEN2+9*, PVEN2+15*, PVEN2+19*, PVEN3+1*, PVEN3+3*, PVEN3+6*
RMPREXC LOCNM~, LOCNM+3*, LOCNM1+4*, LOCNM1+5*, LOCNM1+6*, LOCNM1+7*, LOCNM1+11, LOCNM1+12, OK~, OK+2*
, OK+8*, OK+9*, OK+10*, HCPCS~, HCPCS+6*, HCPCS1+2*, HCPCS1+3*, HCPCS1+4*, HCPCS1+5, HCPCS1+6
, ITEM~, ITEM+3*, ITEMA1+1*, ITEMA1+2*, ITEMA1+3*, ITEMA1+4, ITEMA1+5, ITEMA1+6, ITEMA1+7, ITEMA1+12
, QTY~, QTY+8*, QTY+9*, QTY+10*, TVAL~, TVAL+8*, TVAL+9*, TVAL+10*, REO~, REO+8*
, REO+9*, REO+10*, VEND~, VEND+8*, VEND+9*, VEND+10*, PVEN~, PVEN+3*, PVEN2+26*, PVEN2+27*
, PVEN2+28*
RMPRGBL PVEN+1~, PVEN+6*, PVEN1*, PVEN1A, PVEN1A+1, PVEN1A+2, PVEN1A+3, PVEN1A+4, PVEN1A+5, PVEN1A+7
RMPRHCPC ITEM~, ITEM+6, ITEMA1+4, PVEN~, PVEN+6, PVEN1A+4, PVEN2+18, PVEN3+5
RMPRHPTX HCPCS~, HCPCS+7*, HCPCS+8, HCPCS1+1*
RMPRITM PVEN~, PVEN+6, PVEN1A+5
RMPRLCN ITEM~, ITEM+5, ITEMA1+4, PVEN~, PVEN+6, PVEN1A+3
RMPRLIN PVEN+1~, PVEN+5*, PVEN1A+6*, PVEN1A+7, PVEN2, PVEN2+1, PVEN2+4*, PVEN2+6*, PVEN2+10, PVEN2+23
, PVEN2+24
RMPRQTY QTY~, QTY+2*, QTY+6, QTY+11*
RMPRREO REO~, REO+2*, REO+6, REO+11*
RMPRSRC ITEM+1~
RMPRSTN LOCNM~, LOCNM1+9, LOCNM1+10, LOCNM1+11, HCPCS~, HCPCS+3, HCPCS1+5, ITEM~, ITEM+4, ITEMA1+4
, PVEN~, PVEN+6, PVEN1A+2
RMPRTDT LOCNM+1~, LOCNM+2*
RMPRTVAL TVAL~, TVAL+2*, TVAL+6, TVAL+12*
RMPRVEND VEND~, VEND+2*, VEND+6
RMPRVEND("IEN" VEND+2, VEND+11*
RMPRVEND("NAME" VEND+6, VEND+12*
RMPRX PVEN+1~, PVEN+4*, PVEN2+4*, PVEN2+5*, PVEN2+8
RMPRY PVEN+1~, PVEN+4*
RMPRYN LOCNM+1~, OK~, OK+3*, OK+11*, ITEM+1~, ITEMA1+12, ITEMA1+13
RMSTN HCPCS+1~, HCPCS+3*
U CHECK, CHECK+1
X LOCNM+1~, LOCNM+2, LOCNM1+7, LOCNM1+11, OK+1~, OK+10, HCPCS+1~, HCPCS1+4, HCPCS1+5, ITEM+1~
, ITEMA1+3, ITEMA1+4, QTY+1~, QTY+10, TVAL+1~, TVAL+10, TVAL+11, REO+1~, REO+10, VEND+1~
, VEND+10, PVEN+1~, PVEN2+1*, PVEN2+28, PVEN3
Y LOCNM+1~, OK+1~, OK+11, HCPCS+1~, ITEM+1~, QTY+1~, QTY+11, TVAL+1~, TVAL+12, REO+1~
, REO+11, VEND+1~, VEND+11, VEND+12, PVEN+1~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All