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

Package: Prosthetics

Routine: RMPRPIY1


Information

RMPRPIY1 ;HINCIO/ODJ - PIP Data Entry - Prompts;3/8/01

Source Information

Source file <RMPRPIY1.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Prosthetics 4 $$UPD^RMPRPIX1  HCPCS^RMPRPIY7  ITEM^RMPRPIYP  DIV4^RMPRSIT  
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: 15

Package Total Caller Graph
Prosthetics 12 RMPRPIXR  RMPRPIY6  RMPRPIY9  RMPRPIYA  RMPRPIYE  RMPRPIYG  RMPRPIYI  RMPRPIYL  
RMPRPIYN  RMPRPIYS  RMPRPIYT  RMPRPIYZ  
Prosthetics Vision 4 Sight II 3 RMPV0RMPRPIYE  RMPV0RMPRPIYI  RMPV0RMPRPIYS  

Entry Points

Name Comments DBIA/ICR reference
STN(RMPRSTN,RMPRESC) ;
STNX
ITED(RMPR11,RMPREXC) ;
ITED1
ITEDU
ITEDX
ITEDH2
ITEDO(RMPRYN,RMPREXC) ;
ITEDOX
MASIT(RMPR1,RMPREXC) ;
MASITX
HCPCS(RMPRSTN,RMPRHCPC,RMPR1,RMPR11,RMPREXC) ;
HCPCS1
HCPCS2
HCPCS3
  • ICR #7555
    • Status: Active
    • Usage: Controlled Subscription
    HCPCSX

    External References

    Name Field # of Occurrence
    ^DIC MASIT+7
    ^DIR ITED1, ITEDO+7
    $$UPD^RMPRPIX1 ITED1+20
    HCPCS^RMPRPIY7 HCPCS1
    ITEM^RMPRPIYP HCPCS2
    DIV4^RMPRSIT STN+6

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,"Item being edited by another user, cannot continue."
    • Line Location: ITED1+8
    Function Call: WRITE
    • Prompt: !
    • Line Location: ITED1+21
    Function Call: WRITE
    • Prompt: "Enter a description for this item which will be used locally by",!
    • Line Location: ITEDH2+0
    Function Call: WRITE
    • Prompt: "your Prosthetics Service.",!
    • Line Location: ITEDH2+1
    Function Call: WRITE
    • Prompt: "You may want to use the Item Master description with additional",!
    • Line Location: ITEDH2+2
    Function Call: WRITE
    • Prompt: "text specifying things like size, volume, etc."
    • Line Location: ITEDH2+3
    Function Call: WRITE
    • Prompt: !
    • Line Location: MASIT+6
    Function Call: WRITE
    • Prompt: !!,"HCPCS: "_$G(RMPR1("HCPCS"))_" "_$G(RMPR1("SHORT DESC"))
    • Line Location: HCPCS3+0
    Function Call: WRITE
    • Prompt: !!,"IFCAP Item: ",$G(RMPR11("ITEM MASTER"))
    • Line Location: HCPCS3+1
    Function Call: WRITE
    • Prompt: !!,"PIP Item desc.: ",$G(RMPR11("DESCRIPTION"))
    • Line Location: HCPCS3+2
    Routine Call
    • DIC
    • Line Location:
      • MASIT+7
    Routine Call
    • DIR
    • Line Location:
      • ITED1
      • ITEDO+7

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^RMPR(661.11 - [#661.11] ITED1+7, ITED1+17, ITEDU

    Label References

    Name Line Occurrences
    HCPCS1 HCPCS2+2
    HCPCSX HCPCS1+1, HCPCS1+2, HCPCS1+3, HCPCS2+1, HCPCS2+3
    ITED1 ITED1+15
    ITEDO ITED1+13
    ITEDOX ITEDO+8, ITEDO+9, ITEDO+10
    ITEDU ITED1+14
    ITEDX ITED1+1, ITED1+2, ITED1+3, ITED1+4, ITED1+6, ITED1+7
    MASITX MASIT+8, MASIT+9, MASIT+10
    STNX STN+4, STN+7, STN+8, STN+10

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    DA STN+1~, ITED+1~, ITEDO+1~, MASIT+1~
    DIC STN+1~, MASIT+1~, MASIT+3*
    DIC("A" MASIT+4*
    DIC("B" MASIT+5*
    DIC(0 MASIT+2*
    DIR ITED+1~, ITEDO+1~
    DIR("??" ITED+4*
    DIR("A" ITED+3*, ITEDO+6*
    DIR("B" ITED+5*, ITEDO+5*
    DIR(0 ITED+2*, ITEDO+4*
    DIROUT STN+1~, ITED+1~, ITED1+2, ITEDO+1~, ITEDO+9, MASIT+1~
    DIRUT STN+1~, ITED+1~, ITEDO+1~, MASIT+1~
    DTOUT STN+1~, ITED+1~, ITED1+1, ITEDO+1~, ITEDO+8, MASIT+1~, MASIT+8
    DUOUT STN+1~, ITED+1~, ITED1+3, ITEDO+1~, ITEDO+10, MASIT+1~, MASIT+9
    DUZ STN+4
    RMPR STN+1~
    RMPR("NAME" STN+11
    RMPR("STA" STN+9
    RMPR1 MASIT~, HCPCS~, HCPCS1
    RMPR1("HCPCS" HCPCS2, HCPCS3
    RMPR1("IEN" MASIT+12*
    RMPR1("ITEM M ASTER IEN" , MASIT+5
    RMPR1("SHORT DESC" , HCPCS3
    RMPR11 ITED~, HCPCS~, HCPCS1, HCPCS2
    RMPR11("DESCRIPTION" ITED+5, ITED1+6, ITED1+22*, HCPCS3+2
    RMPR11("IEN" ITED1+7, ITED1+17, ITED1+19, ITEDU, HCPCS1+3
    RMPR11("ITEM MASTER" , HCPCS3+1
    RMPR11("STATI ON IEN" , HCPCS2+5*
    RMPR11("STATION" HCPCS2+4*
    RMPR11N ITED+1~, ITED1+20
    RMPR11N("DESCRIPTION" ITED1+12*, ITED1+22
    RMPR11N("IEN" ITED1+19*
    RMPRERR STN+2*, STN+4*, STN+10*, STNX, ITED+1~, ITED1+20*
    RMPRESC STN~, STN+5*, STN+8*
    RMPREXC STN+7*, ITED~, ITED1+1*, ITED1+2*, ITED1+3*, ITED1+5*, ITED1+10*, ITED1+13, ITED1+14, ITED1+15
    , ITED1+16*, ITEDO~, ITEDO+3*, ITEDO+8*, ITEDO+9*, ITEDO+10*, MASIT~, MASIT+8*, MASIT+9*, MASIT+10*
    , MASIT+11*, HCPCS~, HCPCS1, HCPCS1+1, HCPCS1+2, HCPCS2, HCPCS2+1, HCPCS2+2, HCPCS2+3
    RMPRHCPC HCPCS~, HCPCS1
    RMPRSITE STN+1~
    RMPRSTN STN~, HCPCS~, HCPCS1, HCPCS2, HCPCS2+4, HCPCS2+5
    RMPRSTN("IEN" STN+3*, STN+9*, STN+10
    RMPRSTN("SITE NAME" , STN+11*
    RMPRYN ITED+1~, ITED1+13, ITED1+15, ITEDO~, ITEDO+2*, ITEDO+11*
    X STN+1~, STN+7, STN+8, ITED+1~, ITED1+3, ITED1+4, ITED1+6, ITED1+12, ITEDO+1~, ITEDO+10
    , MASIT+1~, MASIT+9
    Y STN+1~, ITED+1~, ITEDO+1~, ITEDO+11, MASIT+1~, MASIT+10, MASIT+12
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All