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

Package: Clinical Case Registries

Routine: RORUPDUT


Information

RORUPDUT ;HCIOFO/SG - REGISTRY UPDATE UTILITIES ;15 Jun 2015 12:30 PM

Source Information

Source file <RORUPDUT.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Clinical Case Registries 4 ($$DBS,$$ERROR)^RORERR  ($$PRRIEN,ZW)^RORUTL01  $$REGIEN^RORUTL02  SETPROC^RORUTL20  
VA FileMan 3 FIND^DIC  FILE^DIE  GETS^DIQ  
Kernel 1 $$DT^XLFDT  
Lexicon Utility 1 $$IMPDATE^LEXU  

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

Package Total Caller Graph
Clinical Case Registries 9 RORUPD  RORUPD01  RORUPD04  RORUPD06  RORUPD07  RORUPD08  RORUPD09  RORUPEX  
RORUTL06  

Entry Points

Name Comments DBIA/ICR reference
APLRULES(FILE,IENS,MODE,DATE,LOCATION) ;
CLRDES(FILE) ;
CLREC ;
CLRVALS(FILE) ;
DATACODE(FILE,NAME) ;
DEBUG ;
GETDE(FILE,DATELMT,TYPE) ;
GETEC() ;
GETVAL(RULENAME,PFX) ;
INCEC(RC) ;
LOADFLDS(FILE,IENS) ;
SDF(NAME,COND) ;
SDL(NAME,COND) ;
SETVAL(RULENAME,VALUE) ;
SRDT(NAME,PFX,COND) ;
LAST2YRS(RORDFN) ;any admission or visit dates in the last 2 years?
; RORDFN = dfn
LASTADM(RORDFN) ;returns patient's last admission date
; RORDFN = DFN
LASTVSIT(RORDFN) ;returns patient's last visit date
; RORDFN = DFN
DELETE(RORIENS) ;set STATUS=5 (Deleted)

External References

Name Field # of Occurrence
FIND^DIC DATACODE+3
FILE^DIE DELETE+4
GETS^DIQ LOADFLDS+4
$$IMPDATE^LEXU APLRULES+3
$$DBS^RORERR DATACODE+5, LOADFLDS+6
$$ERROR^RORERR DATACODE+7, DATACODE+8, DELETE+7
$$PRRIEN^RORUTL01 LAST2YRS+11
ZW^RORUTL01 DEBUG+2, DEBUG+3, DEBUG+4, DEBUG+6, DEBUG+7
$$REGIEN^RORUTL02 LAST2YRS+10
SETPROC^RORUTL20 LOADFLDS+22
$$DT^XLFDT APLRULES+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Control Lists",!!
  • Line Location: DEBUG+5
Function Call: WRITE
  • Prompt: !,"Job number: ",$J,!
  • Line Location: DEBUG+8
Routine Call
  • DIC
  • Line Location:
    • DATACODE+3
Routine Call
  • DIE
  • Line Location:
    • DELETE+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
799.22 FIND^DIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVSIT("AA" LASTVSIT+4
^DGPT("AAD" LASTADM+3

Label References

Name Line Occurrences
$$DELETE LAST2YRS+13
$$GETVAL APLRULES+25, APLRULES+30
$$LASTADM LAST2YRS+7
$$LASTVSIT LAST2YRS+8
SETVAL APLRULES+36

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADMDT LOADFLDS+18~
COND SDF~, SDF+1, SDL~, SDL+1, SRDT~, SRDT+1
DATE APLRULES~, APLRULES+2*, APLRULES+10, APLRULES+11, APLRULES+12, SDF+2~, SDF+3*, SDF+4, SDF+6, SDF+7
, SDL+2~, SDL+3*, SDL+4, SDL+5, SRDT+2~, SRDT+3*, SRDT+4
DATELMT GETDE~, GETDE+1
DE LOADFLDS+1~, LOADFLDS+8*, LOADFLDS+9*, LOADFLDS+10, LOADFLDS+12, LOADFLDS+13, LOADFLDS+14*, LOADFLDS+15*, LOADFLDS+17, LOADFLDS+22
DIERR DATACODE+1~, DATACODE+4, LOADFLDS+5, DELETE+1~, DELETE+5, DELETE+6
DT LAST2YRS+6
EXPR APLRULES+1~
FILE APLRULES~, APLRULES+6, APLRULES+7, CLRDES~, CLRDES+1, CLRDES+2, CLRVALS~, CLRVALS+4, CLRVALS+5, DATACODE~
, DATACODE+2, GETDE~, GETDE+1, LOADFLDS~, LOADFLDS+1, LOADFLDS+2, LOADFLDS+4, LOADFLDS+6, LOADFLDS+9, LOADFLDS+10
, LOADFLDS+12, LOADFLDS+13, LOADFLDS+15, LOADFLDS+17, LOADFLDS+18~
FLD LOADFLDS+1~, LOADFLDS+2*, LOADFLDS+4, LOADFLDS+10*, LOADFLDS+13
HDR APLRULES+1~, APLRULES+14*, APLRULES+18, APLRULES+24, APLRULES+31
I DEBUG+1~, DEBUG+6*
IEN LOADFLDS+18~
IENS APLRULES~, DATACODE+1~, DATACODE+2*, DATACODE+3, DATACODE+5, LOADFLDS~, LOADFLDS+4, LOADFLDS+6, LOADFLDS+13, LOADFLDS+22
LM APLRULES+1~, APLRULES+38*, APLRULES+42
LOCATION APLRULES~, APLRULES+13
MODE APLRULES~, APLRULES+6, APLRULES+7, CLRVALS+1~, CLRVALS+2*, CLRVALS+4, CLRVALS+5
NAME DATACODE~, DATACODE+3, DATACODE+7, DATACODE+8, SDF~, SDF+5, SDF+6, SDF+7, SDL~, SDL+5
, SRDT~, SRDT+3
PATIEN APLRULES+1~, APLRULES+25*, APLRULES+31
PFX GETVAL~, GETVAL+1, SRDT~, SRDT+3
RC APLRULES+1~, APLRULES+5*, APLRULES+6, APLRULES+24, APLRULES+36, APLRULES+37*, APLRULES+42, DATACODE+1~, DATACODE+4, DATACODE+5*
, DATACODE+6*, DATACODE+7, DATACODE+8, INCEC~, INCEC+1*, LOADFLDS+1~, LOADFLDS+5, LOADFLDS+6*, LAST2YRS+5~, LAST2YRS+6*
, LAST2YRS+9*, LAST2YRS+12*, LAST2YRS+13*, LAST2YRS+14, DELETE+1~, DELETE+2*, DELETE+5*, DELETE+7*, DELETE+8
REGIEN APLRULES+1~, APLRULES+20*, APLRULES+21, APLRULES+25*, APLRULES+26*, APLRULES+28, APLRULES+31, APLRULES+33
RI APLRULES+1~, APLRULES+5*, APLRULES+6*, APLRULES+7, CLRVALS+1~, CLRVALS+3*, CLRVALS+4*, CLRVALS+5
ROR2YRS LAST2YRS+5~, LAST2YRS+6*, LAST2YRS+9
RORADATE LAST2YRS+5~, LAST2YRS+7*, LAST2YRS+9
RORBUF DATACODE+1~
RORBUF("DILIST" DATACODE+6, DATACODE+9
RORCSYS APLRULES+1~, APLRULES+9*, APLRULES+10, APLRULES+11
RORDATE LASTVSIT+2~, LASTVSIT+4*, LASTVSIT+5*, LASTVSIT+6
RORDFN LAST2YRS~, LAST2YRS+7, LAST2YRS+8, LAST2YRS+11, LASTADM~, LASTADM+2*, LASTADM+3, LASTVSIT~, LASTVSIT+3*, LASTVSIT+4
RORFDA LOADFLDS+1~, DELETE+1~
RORFDA( LOADFLDS+13
RORFDA(798 DELETE+3*
RORIENS LAST2YRS+5~, LAST2YRS+11*, LAST2YRS+12, LAST2YRS+13, DELETE~, DELETE+3, DELETE+7
RORMSG DATACODE+1~, LOADFLDS+1~, DELETE+1~
RORREGI LAST2YRS+5~, LAST2YRS+10*, LAST2YRS+11
>> RORUPD LOADFLDS+22
>> RORUPD( DEBUG+6
>> RORUPD("ERRCNT" CLREC+1!, GETEC+1, INCEC+1*
>> RORUPD("FLAGS" DEBUG+2
>> RORUPD("IMPDATE" APLRULES+3*, APLRULES+10, APLRULES+11
>> RORUPD("LM" APLRULES+18, APLRULES+33!, APLRULES+35!, APLRULES+38, APLRULES+42
>> RORUPD("LM2" APLRULES+28
>> RORUPD("SR" APLRULES+6, APLRULES+7, CLRVALS+4, CLRVALS+5, DEBUG+3, LOADFLDS+2, LOADFLDS+9, LOADFLDS+10, LOADFLDS+12, LOADFLDS+15
, LOADFLDS+17
>> RORUPD("UPD" DEBUG+4
>> RORUPDPI APLRULES+31
>> RORVALS LOADFLDS+22
>> RORVALS("DV" CLRDES+1!, GETDE+1, LOADFLDS+1!, LOADFLDS+13*
>> RORVALS("PPTF" CLRDES+2!, LOADFLDS+1!
>> RORVALS("SV" APLRULES+12*, APLRULES+13*, CLRVALS+6!, GETVAL+1, SDF+3, SDF+5, SDF+6*, SDF+7*, SDL+3, SDL+5*
, SETVAL+1*, SETVAL+2*, SETVAL+3*, SETVAL+4*, SETVAL+6*, SETVAL+7*, SETVAL+9*, SETVAL+10*, SRDT+3, SRDT+4*
RORVDATE LAST2YRS+5~, LAST2YRS+8*, LAST2YRS+9
RULENAME APLRULES+1~, APLRULES+14*, APLRULES+18, APLRULES+35, APLRULES+36, CLRVALS+1~, CLRVALS+5*, CLRVALS+6, GETVAL~, GETVAL+1
, SETVAL~, SETVAL+1, SETVAL+2, SETVAL+3, SETVAL+4, SETVAL+6, SETVAL+7, SETVAL+9, SETVAL+10
RULENODE APLRULES+1~, APLRULES+7*, APLRULES+9, APLRULES+14, APLRULES+20, APLRULES+23, APLRULES+26
TMP APLRULES+1~, APLRULES+30*, APLRULES+31
TYPE GETDE~, GETDE+1
U APLRULES+14, APLRULES+18, APLRULES+24, APLRULES+30, APLRULES+31, CLRVALS+5
VALUE SETVAL~, SETVAL+1, SETVAL+3, SETVAL+6, SETVAL+7, SETVAL+9, SETVAL+10
VT LOADFLDS+1~, LOADFLDS+11*, LOADFLDS+12*, LOADFLDS+13, LOADFLDS+16*, LOADFLDS+17*, LOADFLDS+18~
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