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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: RMPR5NAE

Package: Prosthetics

Routine: RMPR5NAE


Information

RMPR5NAE ;HIN/RVD-PROS INVENTORY ADD UTILITY ;2/11/98

Source Information

Source file <RMPR5NAE.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA FileMan 7 ^%DT  ^DIC  MIX^DIC1  FILE^DICN  ^DIE  IX1^DIK  ^DIR  
Prosthetics 2 BAL^RMPR5NU1  DIV4^RMPRSIT  
Kernel 1 KILL^XUSCLEAN  

Entry Points

Name Comments DBIA/ICR reference
LOC ;add location.
LIST ;list current HCPCS @ this Location
ITEM ;ask for PSAS Item to add
UPD ;updates item in 661.3
STAT ;create an item statistics for this event.
EXIT ;MAIN EXIT POINT

External References

Name Field # of Occurrence
^%DT RMPR5NAE+8
^DIC LIST+4, ITEM+5
MIX^DIC1 LOC+4
FILE^DICN ITEM+20, ITEM+29, STAT+4
^DIE ITEM+7, UPD+2, UPD+4
IX1^DIK LOC+9, STAT+8
^DIR LIST+2
BAL^RMPR5NU1 STAT+2
DIV4^RMPRSIT RMPR5NAE+7
KILL^XUSCLEAN EXIT+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!,"Adding Item to a Location.....",!
  • Line Location: LOC+1
Function Call: WRITE
  • Prompt: !,"Record in use. Try again later..."
  • Line Location: LOC+7
Function Call: WRITE
  • Prompt: !,"** No HCPCS Selected or Unable to Select Inactive HCPCS..."
  • Line Location: LIST+6
Function Call: WRITE
  • Prompt: !!,"Record in use. Try again later..."
  • Line Location: ITEM+33
Function Call: WRITE
  • Prompt: !!,"** Item ",RMITEM," was ",RMMESF," @ Location ",RMLOC
  • Line Location: STAT+9
Routine Call
  • DIC
  • Line Location:
    • LIST+4
    • ITEM+5
Routine Call
  • DIE
  • Line Location:
    • ITEM+7
    • UPD+2
    • UPD+4
Routine Call
  • DIR
  • Line Location:
    • LIST+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RMPR(661.2 - [#661.2] Classic Fileman Calls
^RMPR(661.3 - [#661.3] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RMPR(661.1 - [#661.1] LIST+7, ITEM+2, ITEM+4*, ITEM+8, ITEM+9, ITEM+11*, ITEM+12
^RMPR(661.2 - [#661.2] STAT+8*
^RMPR(661.3 - [#661.3] LOC+6, LOC+8, LOC+9, LOC+10, ITEM+17, ITEM+18*, ITEM+21, ITEM+27, ITEM+28*, ITEM+30
, ITEM+32, ITEM+34, UPD+5, UPD+14*, UPD+15*, UPD+16*, STAT+3
^VA(200 - [#200] STAT+6

Label References

Name Line Occurrences
EXIT LOC+5, ITEM+22, ITEM+31
LIST LIST+6, ITEM+6, ITEM+8, ITEM+9, STAT+10
LOC LOC+7, LIST+2, LIST+4, LIST+5, ITEM+33, UPD+7, STAT+1, STAT+5

Naked Globals

Name Field # of Occurrence
^(0 LOC+9*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> D LOC+2*, LOC+4*
>> DA LOC+5*, LOC+9, ITEM+6*, ITEM+30*, STAT+5*, STAT+8
>> DA(1 LIST+9*, ITEM+3, ITEM+4, ITEM+16*, ITEM+19, ITEM+25*, ITEM+26
>> DA(2 ITEM+25*, ITEM+26
DD ITEM+19!, ITEM+29!, STAT+4!
>> DIC LOC+3*, LOC+8, LIST+4*, ITEM+3*, ITEM+7, ITEM+19*, ITEM+26*, STAT+4*, STAT+8
>> DIC("A" LOC+4*, ITEM+1*, ITEM+16!
>> DIC("B" RMPR5NAE+7!, LOC+1!, ITEM+2*, ITEM+6!
>> DIC("S" LOC+2*, LIST+1!, LIST+3*, LIST+9!
>> DIC(0 LOC+3*, LIST+3*, LIST+4*, LIST+9*, ITEM+5*, ITEM+19*, ITEM+29*, STAT+4*
>> DIE ITEM+7*, UPD+2*
>> DIE("NO^" UPD+2*
>> DIK LOC+8*, STAT+8*
DIR LIST+1!, LIST+2*
DIR("?" LIST+1*
DIR("A" LIST+1*
DIR(0 LIST+1*
DLAYGO LOC+3*, ITEM+5*, ITEM+6!, ITEM+19*, ITEM+29*, STAT+4*
DO ITEM+19!, ITEM+29!, STAT+4!
>> DR ITEM+7*, UPD+2*, UPD+3*, UPD+4*
DT STAT+4, STAT+8
DTOUT LOC+1!, LOC+5, LIST+2, LIST+4, ITEM+6, STAT+5
DUOUT LOC+1!, LOC+5, LIST+2, LIST+4, ITEM+6
DUZ STAT+6, STAT+8
>> DZ LOC+2*
IOF LOC+1
>> RDIC1 ITEM+3*
>> RDIC3 ITEM+26*, UPD+2
>> RM1 ITEM+9*, ITEM+10
>> RM3 ITEM+34*, ITEM+35
>> RM3A UPD+5*, UPD+6
>> RMAV LIST+8*, ITEM+10*
>> RMAVA LIST+8*, UPD+1*, UPD+6*, UPD+8*, UPD+11, UPD+12*, UPD+13*, UPD+16, STAT+8
>> RMBAL LIST+8*
>> RMCO LIST+8*, ITEM+35*, UPD+9, STAT+1
>> RMCOA UPD+6*, UPD+7, UPD+8, UPD+9, UPD+11*, UPD+12, UPD+13, UPD+14, STAT+1
>> RMCOD UPD+1*, UPD+9*, UPD+11, UPD+12, UPD+13
>> RMDAHC LIST+7*, LIST+9, ITEM+2, ITEM+8, ITEM+9, ITEM+11, ITEM+12, ITEM+13, ITEM+17, ITEM+21
, STAT+8
>> RMDAIT ITEM+6*, ITEM+8, ITEM+9, ITEM+12, ITEM+13
>> RMHC ITEM+13*
>> RMHCDA LIST+8*, ITEM+21*, ITEM+22, ITEM+25, ITEM+27, ITEM+28, ITEM+30, ITEM+32, ITEM+34, UPD+5
, UPD+14, UPD+15, UPD+16, STAT+3
>> RMHCFLG LIST+8*
>> RMHCPC LIST+7*, ITEM+13
>> RMIT ITEM+13*, ITEM+27, ITEM+30, STAT+8
>> RMITDA LIST+8*, ITEM+30*, ITEM+31, ITEM+32, ITEM+34, UPD+5, UPD+14, UPD+15, UPD+16, STAT+3
>> RMITEM ITEM+12*, UPD+15, STAT+9
>> RMITFLG LIST+8*
>> RMLOC LOC+8*, STAT+9
>> RMLODA LOC+5*, LOC+10, ITEM+16, ITEM+17, ITEM+18, ITEM+21, ITEM+25, ITEM+27, ITEM+28, ITEM+30
, ITEM+32, ITEM+34, UPD+5, UPD+14, UPD+15, UPD+16, STAT+3, STAT+8
>> RMMESF STAT+6*, STAT+7*, STAT+8, STAT+9
RMPR EXIT+1~
RMPR("STA" LOC+9, STAT+8
RMPRSITE EXIT+1~
>> RMQU ITEM+35*, UPD+10, STAT+1
>> RMQUA UPD+6*, UPD+8, UPD+10, UPD+11, UPD+12, UPD+13, STAT+1
>> RMQUD UPD+1*, UPD+10*, UPD+11, UPD+12, UPD+13, STAT+7, STAT+8
>> RMSO UPD+6*, UPD+7, UPD+8
>> RMTOBA ITEM+10*, STAT+8
>> RMTOCO ITEM+10*, STAT+8
U LOC+8, LOC+9, LIST+7, ITEM+4, ITEM+10, ITEM+11, ITEM+12, ITEM+18, ITEM+28, ITEM+35
, UPD+6, UPD+14, UPD+15, UPD+16, STAT+6
>> X RMPR5NAE+8*, ITEM+17*, ITEM+27*, STAT+4*
>> Y RMPR5NAE+7, LOC+5, LOC+6, LOC+8, LIST+2, LIST+5, LIST+6, LIST+7, ITEM+6, ITEM+20
, ITEM+29, STAT+5
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All