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

Package: Prosthetics

Routine: RMPRPCE1


Information

RMPRPCE1 ;HCIOFO/RVD - Prosthetics/PCE UPDATE UTILITY ;5/7/03 09:12

Source Information

Source file <RMPRPCE1.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 4 IX^DIC  FILE^DICN  UPDATE^DIE  GETS^DIQ  
Prosthetics 3 LINK^RMPRS  DIV4^RMPRSIT  GETPAT^RMPRUTIL  
Kernel 1 KILL^XUSCLEAN  

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

Package Total Caller Graph
Prosthetics 5 RMPR LINK 2319 TO SUSPENSE  RMPR9AUT  RMPREOS  RMPRPCEC  RMPRPCEL  

Entry Points

Name Comments DBIA/ICR reference
UP60(RMIE60,RMIE68,RMSUSTAT) ; update file #660.
UP60X ; exit point
UP68(RMIE60,RMIE68,RMAMIS) ; update file #668.
UNL68 ;L -^RMPR(668,RMIE68)
UP68X ; exit point
ERR0 ;error updating file #660
ERR8 ;error updating file #668
LINK ;link 2319 to suspense
EXIT ;quit
SCRS ;set consult request service.
NEWVAR

External References

Name Field # of Occurrence
IX^DIC LINK+15
FILE^DICN UP68+10, UP68+15
UPDATE^DIE UP60+60
GETS^DIQ SCRS+7
LINK^RMPRS LINK+21
DIV4^RMPRSIT LINK+2
GETPAT^RMPRUTIL LINK+6
KILL^XUSCLEAN EXIT+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Someone else is Editing this entry!!!",!
  • Line Location: UP60+5
Function Call: WRITE
  • Prompt: !,"Someone else is Editing this entry!!!",!
  • Line Location: UP68+6
Function Call: WRITE
  • Prompt: !,"*** Error updating file #660 in PCE module!!!",!
  • Line Location: ERR0+1
Function Call: WRITE
  • Prompt: !,"*** Error updating file #668 in PCE module!!!",!
  • Line Location: ERR8+1
Function Call: READ
  • Variable: CTR
  • Timeout: 15
  • Line Location: LINK+10
Function Call: WRITE
  • Prompt: !,?2,$C(7),">> NO patient unlinked items available to be posted to Suspense, hit return"
  • Line Location: LINK+10
Function Call: WRITE
  • Prompt: !
  • Line Location: LINK+11
Function Call: WRITE
  • Prompt: !
  • Line Location: LINK+14
Function Call: WRITE
  • Prompt: !,?5,$C(7),"Someone else is Editing this entry!"
  • Line Location: LINK+16
Function Call: WRITE
  • Prompt: !!,"Setting Consult Request Service in file #660....."
  • Line Location: SCRS+2
Function Call: WRITE
  • Prompt: !!,"Done setting Consult Request Service!!",!
  • Line Location: SCRS+9
Routine Call
  • DIC
  • Line Location:
    • LINK+15
Routine Call
  • DIE
  • Line Location:
    • UP60+60

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GETS^DIQ
^RMPR(660 - [#660] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RMPR(660 - [#660] UP60+4, UP60+63, LINK+9, LINK+16, LINK+18, LINK+19, LINK+24, SCRS+3, SCRS+5, SCRS+8*
^RMPR(668 - [#668] UP60+6, UP60+7, UP60+8, UP60+39, UP68+7, UP68+12
^TMP($J LINK+3!, LINK+20*, LINK+22, EXIT+1!

Label References

Name Line Occurrences
ERR0 UP60+61
ERR8 UP68+4, UP68+11, UP68+16
EXIT LINK+6, LINK+10, LINK+15, LINK+16, LINK+23
NEWVAR UP60+1, UP68+1
UNL68 UP68+11, UP68+16
UP60X UP60+5
UP68X UP68+4, UP68+7, UP68+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CTR LINK+1~, LINK+7*, LINK+9*, LINK+10*
>> D LINK+11*
DA NEWVAR~
DA(1 UP68+8*, UP68+9, UP68+13*, UP68+14
DD UP68+8!, UP68+10!
>> DFN LINK+7, LINK+11
DIC UP68+9*, UP68+10!, UP68+14*, UP68+15!, LINK+11*, NEWVAR~
DIC("S" LINK+12*
DIC("W" LINK+13*
DIC(0 UP68+9*, UP68+14*, LINK+11*
DIE NEWVAR~
DLAYGO UP68+9*, UP68+10!, UP68+14*, NEWVAR+1~
DO UP68+8!, UP68+10!
DR NEWVAR+1~
I LINK+9*, NEWVAR~
IEN660 LINK+1~, LINK+7*, LINK+9
J NEWVAR~
R10 LINK+1~, LINK+9*
RI SCRS+3~*
RJ SCRS+3~*, SCRS+5, SCRS+8
RM680 UP60+6*, UP60+10, UP60+11, UP60+12, UP60+13, UP60+14, UP60+15, UP60+16, UP60+18, NEWVAR~
RM6810 UP60+8*, NEWVAR~
RM688 UP60+7*, UP60+21, UP60+22, NEWVAR~
RM68BA UP60+39*, UP60+41, UP60+42, UP60+43, UP60+44, UP60+45, UP60+46, UP60+47, UP60+48, NEWVAR+2~
RMAA SCRS+4!, NEWVAR+1~
RMAA(200 SCRS+7
RMAMIS UP68~, UP68+4, UP68+12, UP68+14, NEWVAR+1~
RMAO UP60+40~, UP60+42*, UP60+52
RMCBV UP60+40~, UP60+48*, UP60+58
RMCHK NEWVAR+1~
RMCODT UP60+11*, UP60+27, EXIT+3!
RMDAT NEWVAR+1~
RMDAT(660 UP60+24*, UP60+25*, UP60+26*, UP60+27*, UP60+28*, UP60+29*, UP60+30*, UP60+31*, UP60+32*, UP60+33*
, UP60+34*, UP60+35*, UP60+51*, UP60+52*, UP60+53*, UP60+54*, UP60+55*, UP60+56*, UP60+57*, UP60+58*
RMDATE UP60+10*, UP60+24, NEWVAR~
RMDFN NEWVAR~
RMDWRT UP60+14*, UP60+25, NEWVAR+2~
RMEC UP60+40~, UP60+45*, UP60+55
RMERR UP60+2*, UP60+5*, UP60+61*, UP60X+1, UP68+2*, UP68+4*, UP68+11*, UP68+16*, UP68X+1, NEWVAR+1~
RMERROR UP60+61, NEWVAR~
RMHNC UP60+40~, UP60+47*, UP60+57
RMI UP68+2*, NEWVAR~
RMICD UP60+40~, UP60+41*, UP60+51
RMICD9 UP60+22*, UP60+32, NEWVAR+2~
RMIE60 UP60~, UP60+4, UP60+24, UP60+25, UP60+26, UP60+27, UP60+28, UP60+29, UP60+30, UP60+31
, UP60+32, UP60+33, UP60+34, UP60+35, UP60+51, UP60+52, UP60+53, UP60+54, UP60+55, UP60+56
, UP60+57, UP60+58, UP60+63, UP68~, UP68+7, UP68+9
RMIE68 UP60~, UP60+6, UP60+7, UP60+8, UP60+39, UP68~, UP68+7, UP68+8, UP68+12, UP68+13
RMINDT UP60+12*, UP60+26, NEWVAR+2~
RMIR UP60+40~, UP60+43*, UP60+53
RMMST UP60+40~, UP60+46*, UP60+56
RMPR EXIT+2!
RMPR("STA" LINK+9
RMPRAMIS LINK+19~*, LINK+20
RMPRCO UP60+13*, UP60+33, NEWVAR+2~
>> RMPRDA LINK+17*, LINK+22*, LINK+23, LINK+24
>> RMPRDFN LINK+18*, LINK+20
RMPRDI UP60+21*, UP60+31, NEWVAR+2~
RMPRL UP60+39*, UP60+50, NEWVAR+2~
RMPRSTE EXIT+2!
RMPTR UP60+49~, UP60+50*, UP60+51, UP60+52, UP60+53, UP60+54, UP60+55, UP60+56, UP60+57, UP60+58
RMREQU UP60+18*, UP60+29, SCRS+5*, SCRS+7, NEWVAR+1~
RMSC UP60+40~, UP60+44*, UP60+54
RMSERV UP60+19*, UP60+30, SCRS+6*, SCRS+7*, SCRS+8, NEWVAR+1~
RMSTAT UP60+15*, UP60+34, NEWVAR+2~
RMSUSTAT UP60~, UP60+3*, UP60+35
RMTRES UP60+16*, UP60+17, NEWVAR+2~
RMTYRE UP60+17*, UP60+28, NEWVAR+2~
U UP60+10, UP60+11, UP60+12, UP60+13, UP60+14, UP60+15, UP60+16, UP60+18, UP60+21, UP60+22
, UP60+41, UP60+42, UP60+43, UP60+44, UP60+45, UP60+46, UP60+47, UP60+48, LINK+9, LINK+18
, LINK+19, SCRS+5, SCRS+8
X UP68+9*, UP68+10!, UP68+14*, LINK+2, LINK+6, LINK+11*, NEWVAR+1~
XIEN LINK+1~, LINK+7*, LINK+9*
>> Y UP68+11, UP68+16, LINK+15, LINK+16, LINK+17, LINK+18, LINK+19, LINK+20
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