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 |  Label References |  Local Variables  | All
Print Page as PDF
Routine: RMPRPIYU

Package: Prosthetics

Routine: RMPRPIYU


Information

RMPRPIYU ;HINCIO/ODJ - PIP Data Prompts;3/8/01

Source Information

Source file <RMPRPIYU.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Prosthetics 2 $$STOCK^RMPRPIUE  LIKE^RMPRPIYB  
VA FileMan 2 ^DIC  ^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: 1

Package Total Caller Graph
Prosthetics 1 RMPRPIYT  

Entry Points

Name Comments DBIA/ICR reference
QTY(RMPRQTY,RMPREXC,RMPR5,RMPR11) ;
QTYX
QM
VEND(RMPRV,RMPRVNDR,RMPREXC) ;
VENDX
LOCNM(RMPRSTN,RMPR5,RMPREXC) ;
LOCNM1
LOCNMX
OK(RMPRYN,RMPREXC) ;
OKX

External References

Name Field # of Occurrence
^DIC VEND+7
^DIR QTY+15, LOCNM1, OK+7
$$STOCK^RMPRPIUE QTY+10, QM+1
LIKE^RMPRPIYB LOCNM1+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Current balance is = "_RMPRSTK("QOH")
  • Line Location: QM+2
Function Call: WRITE
  • Prompt: !,"Enter quantity 1 to "_RMPRSTK("QOH")_" or enter '^' to QUIT?"
  • Line Location: QM+3
Function Call: WRITE
  • Prompt: !,"Please enter a valid Location"
  • Line Location: LOCNM1+11
Routine Call
  • DIC
  • Line Location:
    • VEND+7
Routine Call
  • DIR
  • Line Location:
    • QTY+15
    • LOCNM1
    • OK+7

Label References

Name Line Occurrences
LOCNM1 LOCNM1+9, LOCNM1+10
LOCNMX LOCNM1+1, LOCNM1+2, LOCNM1+3, LOCNM1+4
OKX OK+8, OK+9, OK+10
QTYX QTY+11, QTY+16, QTY+17, QTY+18
VENDX VEND+8, VEND+9, VEND+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA QTY+1~, VEND+1~, LOCNM+1~, OK+1~
DIC VEND+1~, VEND+5*
DIC("A" VEND+4*
DIC("S" VEND+6*
DIC(0 VEND+3*
DIR QTY+1~, LOCNM+1~, OK+1~
DIR("?" QTY+14*, LOCNM+6*
DIR("??" LOCNM+7*
DIR("A" QTY+13*, LOCNM+5*, OK+4*
DIR("B" OK+5*
DIR(0 QTY+12*, LOCNM+4*, OK+6*
DIROUT QTY+1~, QTY+17, VEND+1~, VEND+9, LOCNM+1~, LOCNM1+3, OK+1~, OK+9
DIRUT QTY+1~, VEND+1~, OK+1~
DTOUT QTY+1~, QTY+16, VEND+1~, VEND+8, LOCNM+1~, LOCNM1+2, OK+1~, OK+8
DUOUT QTY+1~, QTY+18, VEND+1~, VEND+10, LOCNM+1~, OK+1~
RMPR11 QTY~
RMPR11("HCPCS" QTY+6
RMPR11("ITEM" QTY+7
RMPR11("STATI ON IEN" , QTY+5
RMPR5 QTY~, LOCNM~, LOCNM1+5!, LOCNM1+8
RMPR5("IEN" QTY+8, LOCNM+8*, LOCNM1+1, LOCNM1+10
RMPR5("STATIO N IEN" , LOCNM1+7*
RMPR5("STATION" LOCNM1+6*
RMPRERR QTY+1~, QTY+4*, QTY+10*, QTY+11*, QTYX, QM~, QM+1*, LOCNM+1~, LOCNM+3*
RMPREXC QTY~, QTY+3*, QTY+16*, QTY+17*, QTY+18*, QTY+20*, VEND~, VEND+2*, VEND+8*, VEND+9*
, VEND+10*, LOCNM~, LOCNM+2*, LOCNM1+1*, LOCNM1+2*, LOCNM1+3*, LOCNM1+4*, LOCNM1+8, LOCNM1+9, OK~
, OK+2*, OK+8*, OK+9*, OK+10*
RMPRQTY QTY~, QTY+2*, QTY+19*
RMPRSTK QTY+1~, QTY+10, QM+1
RMPRSTK("HCPCS" QTY+6*
RMPRSTK("ITEM" QTY+7*
RMPRSTK("LOCA TION IEN" , QTY+8*
RMPRSTK("QOH" QTY+11, QTY+12, QM+2, QM+3
RMPRSTK("STAT ION IEN" , QTY+5*
RMPRSTK("VEND OR IEN" , QTY+9*
RMPRSTN LOCNM~, LOCNM1+6, LOCNM1+7, LOCNM1+8
RMPRTDT LOCNM+1~
RMPRV VEND~
RMPRVNDR VEND~, VEND+11*
RMPRYN LOCNM+1~, OK~, OK+3*, OK+11*
X QTY+1~, QTY+18, VEND+1~, VEND+10, LOCNM+1~, LOCNM1+4, LOCNM1+8, OK+1~, OK+10
Y QTY+1~, QTY+19, VEND+1~, VEND+11, LOCNM+1~, OK+1~, OK+11
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables  | All