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

Package: Prosthetics

Routine: RMPRPIYR


Information

RMPRPIYR ;HINCIO/ODJ - PIP EDIT - PROMPTS ;3/8/01

Source Information

Source file <RMPRPIYR.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Prosthetics 2 $$GET^RMPRPIX6  ($$ETOI,$$GET)^RMPRPIX7  
VA FileMan 1 ^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: 3

Package Total Caller Graph
Prosthetics 3 RMPRPIY6  RMPRPIYS  RMPRPIYT  

Entry Points

Name Comments DBIA/ICR reference
OK(RMPRYN,RMPREXC) ;
OKX
PVEN(RMPRSTN,RMPRLCN,RMPRHCPC,RMPRITM,RMPR6,RMPR7,RMPREXC) ;
PVENL1
PVENL2
PVENP
PVENG
PVENX
PVENE() ;
PVENH

External References

Name Field # of Occurrence
^DIR OK+7, PVENP+2
$$GET^RMPRPIX6 PVENL2+11, PVENG+6
$$ETOI^RMPRPIX7 PVENL1+5, PVENG+2
$$GET^RMPRPIX7 PVENL1+4, PVENG

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$J(RMPRLIN,2)," ",$E(RMPRS,4,5)_"/"_$E(RMPRS,6,7)_"/"_$E(RMPRS,2,3)
  • Line Location: PVENL2+3
Function Call: WRITE
  • Prompt: ?11,$J(RMPR7("QUANTITY"),5,0)
  • Line Location: PVENL2+4
Function Call: WRITE
  • Prompt: ?18,$J(RMPR7("VALUE")/RMPR7("QUANTITY"),8,2)
  • Line Location: PVENL2+6
Function Call: WRITE
  • Prompt: ?26,$J(RMPR7("VALUE"),10,2)
  • Line Location: PVENL2+8
Function Call: WRITE
  • Prompt: ?38,$E(RMPR6("VENDOR"),1,30)
  • Line Location: PVENL2+12
Function Call: WRITE
  • Prompt: ?69,$E(RMPR7("LOCATION"),1,10)
  • Line Location: PVENL2+13
Function Call: WRITE
  • Prompt: !,"Please select a current stock record"
  • Line Location: PVENP+9
Function Call: WRITE
  • Prompt: !,"by entering a line number in range 1 - "
  • Line Location: PVENP+10
Function Call: WRITE
  • Prompt: RMPRLIN
  • Line Location: PVENP+11
Function Call: WRITE
  • Prompt: !
  • Line Location: PVENH+0
Function Call: WRITE
  • Prompt: !,"Select a current stock record...",!
  • Line Location: PVENH+1
Function Call: WRITE
  • Prompt: ?3,"Date",?13,"Qty",?18,"Unit Cost",?31,"Value",?38,"Vendor"
  • Line Location: PVENH+2
Function Call: WRITE
  • Prompt: ?69,"Location"
  • Line Location: PVENH+3
Routine Call
  • DIR
  • Line Location:
    • OK+7
    • PVENP+2

Label References

Name Line Occurrences
$$PVENE PVEN+13, PVEN+16, PVENL1+1
OKX OK+8, OK+9, OK+10
PVENG PVEN+16
PVENH PVENL2+1, PVENP+5
PVENL1 PVENL1+6, PVENL2+16
PVENL2 PVENP+5
PVENP PVENL1+1, PVENL1+7, PVENP+8
PVENX PVEN+13, PVENL1+1, PVENP+3, PVENP+4, PVENP+6, PVENP+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA OK+1~, PVEN+1~
DIR OK+1~, PVEN+1~
DIR("A" OK+4*, PVENL1+8*, PVENP+1*, PVENP+5!
DIR("B" OK+5*
DIR(0 OK+6*, PVENP*
DIROUT OK+1~, OK+9, PVEN+1~, PVENP+4
DIRUT OK+1~, PVEN+1~
DTOUT OK+1~, OK+8, PVEN+1~, PVENP+3
DUOUT OK+1~, PVEN+1~, PVENP+7
RMPR6 PVEN~, PVEN+7!, PVENL2+11, PVENL2+15!, PVENG+6
RMPR6("DATE&TIME" PVENL2+9*, PVENG+4*
RMPR6("HCPCS" PVENL2+10*, PVENG+5*
RMPR6("VENDOR" PVENL2+12
RMPR7 PVEN~, PVEN+7!, PVENL1+2!, PVENL1+4, PVENL1+5, PVENL2+15!, PVENG, PVENG+2
RMPR7("IEN" PVEN+14*, PVENL1+3*, PVENL2+14, PVENP+13*
RMPR7("LOCATION" PVENL2+13
RMPR7("QUANTITY" PVENL2+4, PVENL2+5, PVENL2+6
RMPR7("VALUE" PVENL2+6, PVENL2+8
RMPR7I PVEN+2~, PVENL1+2!, PVENL1+5, PVENL2+15!, PVENG+1!, PVENG+2
RMPR7I("DATE&TIME" PVENL2+2, PVENL2+9, PVENG+4
RMPR7I("LOCATION" PVENL1+6, PVENG+3
RMPRA PVEN+1~
RMPRA( PVENL2+14*, PVENP+8, PVENP+13
RMPRERR PVEN+1~, PVEN+3*, PVENL1+4*, PVENL1+5*, PVENL2+11*, PVENG*, PVENG+2*, PVENG+6*
RMPREXC OK~, OK+2*, OK+8*, OK+9*, OK+10*, PVEN~, PVEN+4*, PVENP+3*, PVENP+4*, PVENP+6*
, PVENP+7*
RMPRGBL PVEN+2~, PVEN+12*, PVEN+14, PVEN+15*, PVEN+19*, PVENL1*, PVENL1+3, PVENE+1, PVENE+2, PVENE+3
, PVENE+4, PVENE+5
RMPRGBLR PVEN+1~, PVEN+11*, PVEN+12, PVEN+19
RMPRHCPC PVEN~, PVEN+11, PVENL2+10, PVENG+5, PVENE+4
RMPRITM PVEN~, PVEN+11, PVENE+5
RMPRLCN PVEN~, PVEN+8*, PVENL1+6, PVENG+3*, PVENH+3
RMPRLIN PVEN+2~, PVEN+6*, PVENL1+1, PVENL1+7, PVENL2*, PVENL2+1, PVENL2+3, PVENL2+14, PVENP+1, PVENP+11
RMPRMAX PVEN+2~, PVEN+5*, PVENL1+7
RMPRS PVEN+2~, PVENL2+2*, PVENL2+3
RMPRSTN PVEN~, PVEN+11, PVENE+3
RMPRYN OK~, OK+3*, OK+11*
X OK+1~, OK+10, PVEN+1~, PVENP+5, PVENP+6, PVENP+7, PVENP+8, PVENP+13
Y OK+1~, OK+11, PVEN+1~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables  | All