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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: RMPRED6

Package: Prosthetics

Routine: RMPRED6


Information

RMPRED6 ;PHX/RFM,RVD-EDIT ISSUE FROM STOCK ;9/29/1994

Source Information

Source file <RMPRED6.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
Prosthetics 8 ($$COST,$$SOURCE,$$VEND)^RMPR5NU1  CPT^RMPRCPTU  (,DEL1,EXIT,POST)^RMPRED4  CHK^RMPRED5  DIV4^RMPRSIT  ^RMPRST2  LIST^RMPRSTE  (INACT,LOWBA,MESSI,MESSO,NODE2)^RMPRSTI  
VA FileMan 5 DD^%DT  %XY^%RCR  ^DIC  MIX^DIC1  ^DIR  
Kernel 1 HOME^%ZIS  
Registration 1 DEM^VADPT  

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 RMPRED4  

Entry Points

Name Comments DBIA/ICR reference
EN ;EDIT STOCK ISSUES
INVSE
CO ;DISPLAYS STOCK ISSUE
EDX ;POST
DEL ;
EDT ;edit patient 2319
EDU
2
LOC ;ask for location
HCPCS ;HCPCS code
CPT ;ask for CPT Modifier
ITEM ;ask for PSAS Item to to edit.
VEN0 ;process vendor
CP
SET ;set the original variables.

External References

Name Field # of Occurrence
DD^%DT SET+8
%XY^%RCR INVSE
HOME^%ZIS EN+1
^DIC EN+3, 2+1, HCPCS+5, ITEM+5, VEN0+3
MIX^DIC1 LOC+6
^DIR EDX+3, DEL+2, EDU+2, EDU+3, EDU+5, CPT+7
$$COST^RMPR5NU1 ITEM+18
$$SOURCE^RMPR5NU1 ITEM+12
$$VEND^RMPR5NU1 VEN0+2
CPT^RMPRCPTU CPT+5, CPT+8
^RMPRED4 CP
DEL1^RMPRED4 EDX+3, DEL+4
EXIT^RMPRED4 EN+1, EN+3, EN+5, EDX+5, DEL+2
POST^RMPRED4 EDX+3
CHK^RMPRED5 CO+1, CPT+3
DIV4^RMPRSIT EN+1
^RMPRST2 CO+3, SET+9
LIST^RMPRSTE CPT+5
INACT^RMPRSTI HCPCS+8
LOWBA^RMPRSTI ITEM+10
MESSI^RMPRSTI ITEM+19
MESSO^RMPRSTI ITEM+13
NODE2^RMPRSTI CO+2, ITEM+23
DEM^VADPT INVSE+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?5,$C(7),"Someone else is Editing this entry!"
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: @IOF,!?30,RMPRNAM,!
  • Line Location: EDT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EDU+1
Function Call: WRITE
  • Prompt: !!,?5,$C(7),"This is a required response. Enter '^' to exit",!
  • Line Location: 2+4
Function Call: WRITE
  • Prompt: !,"This is a mandatory field!!!",!
  • Line Location: LOC+8
Function Call: WRITE
  • Prompt: !,"This is a mandatory field!!!",!
  • Line Location: HCPCS+6
Function Call: WRITE
  • Prompt: !,"NEW CPT MODIFIER: ",$G(RMCPT)
  • Line Location: CPT+8
Function Call: WRITE
  • Prompt: !,"This is a mandatory field!!!",!
  • Line Location: ITEM+6
Function Call: WRITE
  • Prompt: !,"PSAS Item was not selected!!"
  • Line Location: ITEM+17
Routine Call
  • DIC
  • Line Location:
    • EN+3
    • 2+1
    • HCPCS+5
    • ITEM+5
    • VEN0+3
Routine Call
  • DIR
  • Line Location:
    • EDX+3
    • DEL+2
    • EDU+2
    • EDU+3
    • EDU+5
    • CPT+7
Routine Call
  • %ZIS
  • Line Location:
    • EN+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRC(440 - [#440] Classic Fileman Calls
^RMPR(660 - [#660] Classic Fileman Calls
^RMPR(661.3 - [#661.3] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRCP(445 - [#445] INVSE+10
^RMPR(660 - [#660] EN+5, EN+6, EN+7, INVSE+10
^RMPR(661 - [#661] 2, SET+8
^RMPR(661.1 - [#661.1] HCPCS+8, HCPCS+9, HCPCS+10, ITEM+21
^RMPR(661.2 - [#661.2] INVSE+8
^RMPR(661.3 - [#661.3] LOC+10, HCPCS+7, ITEM+7

Label References

Name Line Occurrences
2 EDU+4, EDU+5, 2+4
CO EDU+2, EDU+3, EDU+5, 2+2, 2+3, LOC+7, ITEM+16, VEN0+3, SET+8
DEL SET+9
EDT EDX+4, DEL+3
HCPCS HCPCS+6, HCPCS+8
ITEM ITEM+6
LOC LOC+8, LOC+10, HCPCS+5, ITEM+5, ITEM+10, ITEM+13, ITEM+17, ITEM+19
SET INVSE+12
VEN0 VEN0+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %X INVSE*
>> %Y INVSE*
>> D LOC+3*
>> DA(1 HCPCS+1*, HCPCS+3, ITEM+1*, ITEM+4
>> DA(2 ITEM+1*, ITEM+4
>> DFN EN+6*
DIC EN+3*, INVSE, INVSE+11!, 2*, 2+5!, LOC+2!, LOC+5*, HCPCS+1!, HCPCS+3*, CPT+1!
, ITEM+1!, ITEM+4*, ITEM+24!, VEN0+1!, VEN0+3*, VEN0+5!
DIC("A" EN+3*, 2*, LOC+6*, HCPCS+1*, ITEM+2*
DIC("B" 2*, LOC+4*, HCPCS+2*, ITEM+3*, ITEM+9!, VEN0+2*
DIC("S" EN+2*, 2+1!, LOC+3*, ITEM+9!
DIC("W" EN+3*, HCPCS+4*
DIC(0 EN+3*, 2*, LOC+5*, HCPCS+3*, ITEM+2*, VEN0+3*
DIR EDX+3!, EDU+1!, EDU+5!, CPT+9!, VEN0+1!, VEN0+5!
DIR("?" EDX+2*, DEL+2*
DIR("A" EDX+2*, DEL+2*, CPT+7*
DIR("B" EDX+2*, DEL+1*, EDU+1*, EDU+3*, EDU+5*, CPT+7*
DIR(0 EDX+1*, DEL+1*, EDU+1*, EDU+3*, EDU+5*, CPT+7*
>> DIRUT EDX+5, DEL+2, EDU+2, EDU+3, EDU+5
DTOUT EDX+5, EDU+5, 2+3, LOC+2!, LOC+7, HCPCS+5, CPT+5, CPT+7, ITEM+5, VEN0+3
DUOUT EDX+5, EDU+5, 2+2, 2+3, LOC+2!, LOC+7, HCPCS+5, CPT+5, CPT+7, CPT+8
, ITEM+5, ITEM+16, VEN0+3
>> DZ LOC+3*
IOF EDT+1
>> R1("AM" EDU+3*, EDU+4*, EDU+5, EDU+6*, SET+3, SET+4
>> R1(0 INVSE+5, INVSE+9, EDU, EDU+2*, 2, 2+5*, CPT+2, ITEM+14*, ITEM+20*, ITEM+21*
, VEN0+5*, SET+1, SET+2, SET+5, SET+6, SET+7, SET+8
>> R1(1 INVSE+4, INVSE+7, HCPCS+2, CPT+4, CPT+5*, CPT+8*, ITEM+16, ITEM+21*, SET+5
>> R1(2 INVSE+1*
>> R12(0 INVSE+9*
>> R3("D" INVSE+11*, EDU+2*, 2+2, 2+5*, ITEM+15*, ITEM+20*, VEN0+5*, SET+1*, SET+2*, SET+8*
>> R4("D" INVSE+11*, EDU+3*, EDU+4*, EDU+5, EDU+6*, SET+3*, SET+4*
>> R6612 INVSE+8*
>> RDA CPT+2*, CPT+5, CPT+8
>> RDES HCPCS+10*
>> REDIT INVSE+4*, CPT+4, CPT+5, CPT+6, ITEM+20
>> RIPOLD INVSE+10*
>> RITOLD SET+8*
>> RMAV LOC+1*
>> RMAVA LOC+1*
>> RMBAL LOC+1*
>> RMCO LOC+1*
>> RMCPT CPT+3, CPT+5, CPT+8
>> RMDAHC HCPCS+7*, HCPCS+8, HCPCS+9, HCPCS+10, CPT+2, CPT+5, CPT+6, ITEM+3, ITEM+21, ITEM+22
>> RMDES ITEM+9*
>> RMDFN EN+6*
>> RMF HCPCS+1*
>> RMHCDA LOC+1*, HCPCS+9*, ITEM+1, ITEM+7, ITEM+12, ITEM+17, ITEM+18, VEN0+2
>> RMHCFLG LOC+1*
>> RMHCNEW INVSE+4*, HCPCS+7*, ITEM+22*
>> RMHCOLD INVSE+4*, CPT+5, CPT+6, ITEM+3, SET+5*
>> RMHCPC INVSE+4*, HCPCS+9*
>> RMIT INVSE+8*, ITEM+3, ITEM+9*
>> RMITDA LOC+1*, ITEM+7*, ITEM+12, ITEM+17, ITEM+18, VEN0+2
>> RMITFLG LOC+1*
>> RMITNEW INVSE+6*, INVSE+8*, ITEM+9*, ITEM+10
>> RMITOLD INVSE+6*, INVSE+8*, ITEM+10
>> RMLOC INVSE+8*, LOC+9*, LOC+10, HCPCS+1, HCPCS+2, HCPCS+7, ITEM+1, ITEM+7, ITEM+12, ITEM+17
, ITEM+18, ITEM+22, VEN0+2
>> RMLOCNEW INVSE+6*, INVSE+8*, ITEM+22*
>> RMLOCOLD INVSE+6*, INVSE+8*, LOC+4, HCPCS+2
>> RMPRF EN+7*
>> RMPRIEN EN+4*, INVSE+10
>> RMPRIP INVSE+10*
>> RMPRNAM INVSE+3*, EDT+1
>> RMPRPF SET+5*
>> RMPRREL INVSE+9*
>> RMPRSITE EN+2
>> RMPRSSN INVSE+3*
>> RMPRUCST INVSE+4*, ITEM+18*, ITEM+19, ITEM+20, SET+7*
>> RMQNEW INVSE+5*
>> RMQOLD INVSE+5*, SET+5*, SET+7, SET+8*
RMR HCPCS+1!
>> RMSO ITEM+12*, ITEM+13, ITEM+14, ITEM+15, SET+6*
>> RMSTOCK INVSE+7*, INVSE+8
>> RMTY EDU*, EDU+1
RMU3 ITEM+1!, ITEM+7*, ITEM+8, ITEM+9
RMUBA ITEM+1!, ITEM+8*, ITEM+10
RMX HCPCS+1!
RQUIT LOC+2!, HCPCS+1!, CPT+1!, ITEM+1!
U EN+6, EN+7, INVSE+3, INVSE+4, INVSE+5, INVSE+7, INVSE+8, INVSE+9, INVSE+10, EDU
, EDU+2, EDU+3, EDU+4, EDU+5, EDU+6, 2, 2+2, 2+5, HCPCS+2, HCPCS+7
, HCPCS+8, HCPCS+9, HCPCS+10, CPT+2, CPT+4, CPT+5, CPT+8, ITEM+8, ITEM+9, ITEM+14
, ITEM+15, ITEM+16, ITEM+20, ITEM+21, VEN0+5, SET+1, SET+2, SET+3, SET+4, SET+5
, SET+6, SET+7, SET+8
>> VADM(1 INVSE+3
>> VADM(2 INVSE+3
X EN+1, EDU+5, 2+5!, LOC+2!, LOC+8, HCPCS+6, ITEM+6
Y EN+3, EN+4, EN+5, EN+6, EN+7, INVSE, EDX+3, EDX+4, DEL+3, DEL+4
, EDU+2, EDU+3, EDU+4, EDU+5, EDU+6, 2+4, 2+5!, LOC+2!, LOC+9, HCPCS+7
, HCPCS+9, CPT+1!, CPT+8, ITEM+7, VEN0+4, VEN0+5, SET+8*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All