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

Package: Prosthetics

Routine: RMPRPCED


Information

RMPRPCED ;Hines OIFO/RVD - Prosthetics/660/668/PCE DELETE ;7/30/02 09:39

Source Information

Source file <RMPRPCED.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 3 ^DIC  FILE^DIE  ^DIK  
PCE Patient Care Encounter 2 01^PXAIUPRV  $$DELVFILE^PXAPI  
Kernel 1 $$GET^XUA4A72  

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

Package Total Caller Graph
Prosthetics 4 RMPR4M  RMPRED4  RMPROP  RMPRPIFD  

Entry Points

Name Comments DBIA/ICR reference
DEL(RMIE60) ;delete PCE visit.
DELVF ; Remove all workload data from the PCE visit file & related V files.
; check if the visit is already in PCE and remove workload,
; (sending RMPKG and RMSRC to ensure that only data that originally
; came from PROSTHETICS will be removed).
DELVF1
DEL68 ; delete PCE info in file #668.
DEL60 ; delete PCE info in file #660.
; lock file #660
DELX
ERR68 ; print error if unable to delete/update file #668.
ERR60 ; print error if unable to delete/update file #660.
CHECK ;check for return error from PCE
PRV ;PROVIDER VALIDATION PRIOR TO PCE INTERFACE CALL
PRVX
NEWVAR ; new variables

External References

Name Field # of Occurrence
^DIC DEL+6
FILE^DIE DEL60+5
^DIK DELVF1+5, DEL68+5, DEL68+14
01^PXAIUPRV PRV+14
$$DELVFILE^PXAPI DELVF1
$$GET^XUA4A72 PRV+24

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"*** Error in deleting PCE visit !!",!
  • Line Location: DELVF1+8
Function Call: WRITE
  • Prompt: !!,"*** File #668 is locked, IEN = ",RMIE68,", PLEASE contact your IRM!!",!!
  • Line Location: ERR68+1
Function Call: WRITE
  • Prompt: !!,"*** File #660 is locked, IEN = ",RMIE60,", PLEASE contact your IRM!!",!!
  • Line Location: ERR60+1
Routine Call
  • DIC
  • Line Location:
    • DEL+6
Routine Call
  • DIE
  • Line Location:
    • DEL60+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(9.4 - [#9.4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVSIT - [#9000010] DEL+14, DELVF1+2, DELVF1+7
^RMPR(660 - [#660] DEL+4, DEL+12, DEL68+1, DEL68+9, DEL60+2, DEL60+6
^RMPR(668 - [#668] DEL68+2, DEL68+3, DEL68+4, DEL68+6, DEL68+8, DEL68+15, ERR68+2
^TMP("RMPRPCE1" PRV+2
^VEJD(19610.5 DELVF1+3

Label References

Name Line Occurrences
DEL60 DEL68+2
DEL68 DEL+3, DEL+4, DEL+14
DELVF1 DELVF1+1
DELX DEL+7, DEL+9, DEL+13, DELVF1+8, DEL68+3, DEL60+2
ERR60 DEL60+2
ERR68 DEL68+3
NEWVAR DEL+1
PRVX PRV+5, PRV+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CLASS PRV+23~, PRV+24*
DA DELVF1+5*, DELVF1+6!, DEL68+4*, DEL68+12*, NEWVAR+2~
DA(1 DEL68+5*, DEL68+13*
DIC DEL+6*, NEWVAR+2~
DIE NEWVAR+2~
DIK DELVF1+5*, DELVF1+6!, DEL68+5*, DEL68+13*, NEWVAR+2~
I DEL68+8*, DEL68+9, NEWVAR+2~
PXAA PRV+1!, PRVX+3!
PXAA("NAME" PRV+2*, PRV+5, PRV+10, PRV+14, PRV+19, PRV+24, PRV+29
PXADI PRV+1!, PRVX+3!
PXADI("DIALOG" PRV+8*, PRV+17*, PRV+27*
PXAERR PRV+1!, PRVX+3!
PXAERR(11 PRV+10*, PRV+19*, PRV+20, PRV+29*
PXAERR(12 PRV+11*, PRV+20*, PRV+30*, PRVX+2
PXAERR(9 PRV+9*, PRV+18*, PRV+28*
PXAERRF PRV+1~, PRV+7*, PRV+16*, PRV+26*, PRVX+3!
PXAIVAL PRV+14!
PXAVDATE PRV+1~, PRV+2*, PRV+24
>> PXCA("ERROR" PRV+14!
>> R1 CHECK+4*, CHECK+5, CHECK+6
>> R2 CHECK+3*, CHECK+4*, CHECK+5, CHECK+6
>> R3 CHECK+3*, CHECK+4*, CHECK+5, CHECK+6
>> R4 CHECK+5*, CHECK+6
REDO DELVF+5~, DELVF+6*, DELVF1+1, DELVF1+2, DELVF1+7*
RMAMIEN DEL68+6*, DEL68+11, DEL68+12, NEWVAR+2~
RMAMIS DEL68+1*, DEL68+6, DEL68+9, NEWVAR+2~
RMAMIS68 DEL68+9*, NEWVAR+2~
RMARR NEWVAR+2~
RMARR(660 DEL60+3*, DEL60+4*
RMCHK DELVF1*, DELVF1+1, DELVF1+8, NEWVAR+2~
RMCNT DEL68+7*, DEL68+9*, DEL68+11, NEWVAR+2~
>> RMERR DEL+2*, DEL+7*, DEL+9*, DEL+13*, DELVF1+8*, DELX, ERR68+3*, ERR60+2*, PRVX+1*
RMIE60 DEL~, DEL+4, DEL+12, DEL68+1, DEL68+2, DEL68+4, DEL60+2, DEL60+3, DEL60+4, DEL60+6
, ERR60+1
>> RMIE68 DEL68+2*, DEL68+3, DEL68+4, DEL68+5, DEL68+6, DEL68+8, DEL68+13, DEL68+15, ERR68+1, ERR68+2
RMKI NEWVAR+2~
>> RMLOCK DEL+2*
>> RMMESS CHECK+3*, CHECK+6*, CHECK+7, CHECK+8
RMPCE DEL+12*, DEL+13, DEL+14, DELVF1, DELVF1+2, DELVF1+3, DELVF1+7, PRVX+1!
>> RMPKG DEL+8*, DEL+9, DELVF1
RMPR DELVF+5~
>> RMPRCPER CHECK+8*
>> RMPROB( CHECK+2, CHECK+4, CHECK+5, CHECK+6, PRVX+2*
>> RMSRC DEL+5*, DELVF1
RMSUB NEWVAR+2~
>> STOP PRV+5, PRV+6*, PRV+14, PRV+15*, PRV+25*, PRVX
U DEL+4, DEL+12, DELVF1+2, DELVF1+7
VEJD DELVF+5~, DELVF1+3*, DELVF1+5
>> X DEL+6*
Y DEL+7, DEL+8, NEWVAR+1~
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