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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: RORREP02

Package: Clinical Case Registries

Routine: RORREP02


Information

RORREP02 ;HCIOFO/BH - VERSION COMPARISON REPORT (ICR) ; 7/11/03 1:22pm

Source Information

Source file <RORREP02.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 3 DD^%DT  NOW^%DTC  ^DIR  

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
Clinical Case Registries 1 RORREP01  

Entry Points

Name Comments DBIA/ICR reference
PRNT ;
HEDR ; Header of Report
EHEAD ;
ENDHEAD ;
EVID ; Heading for patients with no selection rules but with supporting
; Evidence.
ICNHEAD ;
LIST(TYPE,IMRHED) ; List patients missing data values
LEGEND ;
ICNERR ;
ISSUE ;
ERROR ;
PRTC ;press return to continue prompt

External References

Name Field # of Occurrence
DD^%DT PRNT+5
NOW^%DTC PRNT+3
^DIR PRTC+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: IMRDTE,?72,"Page ",IMRPG,!
  • Line Location: HEDR+3
Function Call: WRITE
  • Prompt: !," ",X,!
  • Line Location: HEDR+4
Function Call: WRITE
  • Prompt: " ",IMRHED
  • Line Location: HEDR+5
Function Call: WRITE
  • Prompt: !!
  • Line Location: HEDR+6
Function Call: WRITE
  • Prompt: " Last Earliest Cat.",!
  • Line Location: HEDR+8
Function Call: WRITE
  • Prompt: "Patient Four Date (v 2.1)",!
  • Line Location: HEDR+9
Function Call: WRITE
  • Prompt: "------- ---- -------------",!
  • Line Location: HEDR+10
Function Call: WRITE
  • Prompt: " ** Some of these patients are in a Pending state and need to be either **"
  • Line Location: HEDR+15
Function Call: WRITE
  • Prompt: !," ** validated into the ICR registry or deleted via the ICR GUI. Individual **"
  • Line Location: HEDR+16
Function Call: WRITE
  • Prompt: !," ** patient data for pending patients will not be sent to AAC until they are **"
  • Line Location: HEDR+17
Function Call: WRITE
  • Prompt: !," ** validated into the registry. **"
  • Line Location: HEDR+18
Function Call: WRITE
  • Prompt: !!
  • Line Location: HEDR+19
Function Call: WRITE
  • Prompt: "Patient Last Earliest Sel. Location Selection",!
  • Line Location: HEDR+22
Function Call: WRITE
  • Prompt: " Four Rule (ROR:ICR) Rule Found (ROR:ICR) Pending",!
  • Line Location: HEDR+23
Function Call: WRITE
  • Prompt: "------- ---- -------------- -------------------- -------",!
  • Line Location: HEDR+24
Function Call: WRITE
  • Prompt: " Last Earliest Sel. Location Selection Earliest Cat.",!
  • Line Location: HEDR+28
Function Call: WRITE
  • Prompt: "Patient Four Rule (ROR:ICR) Rule Found (ROR:ICR) Date (v 2.1)",!
  • Line Location: HEDR+29
Function Call: WRITE
  • Prompt: "------- ---- -------------- --------------------- -------------",!
  • Line Location: HEDR+30
Function Call: WRITE
  • Prompt: !,IMRDTE,?72,"Page ",IMRPG,!
  • Line Location: EHEAD+3
Function Call: WRITE
  • Prompt: !," Patients with Errors.",!!
  • Line Location: EHEAD+4
Function Call: WRITE
  • Prompt: " -----------------------",!!
  • Line Location: EHEAD+5
Function Call: WRITE
  • Prompt: IMRDTE,?72,"Page ",IMRPG,!
  • Line Location: ENDHEAD+3
Function Call: WRITE
  • Prompt: !," ",X,!!
  • Line Location: ENDHEAD+4
Function Call: WRITE
  • Prompt: !," Legend.",!
  • Line Location: ENDHEAD+6
Function Call: WRITE
  • Prompt: " -------",!!
  • Line Location: ENDHEAD+7
Function Call: WRITE
  • Prompt: " Code Description",!
  • Line Location: ENDHEAD+8
Function Call: WRITE
  • Prompt: " ---- -----------"
  • Line Location: ENDHEAD+9
Function Call: WRITE
  • Prompt: IMRDTE,?72,"Page ",IMRPG,!
  • Line Location: EVID+4
Function Call: WRITE
  • Prompt: !," ",X,!
  • Line Location: EVID+5
Function Call: WRITE
  • Prompt: !,"** The following patient(s) are in the ROR Local Registry file (#798) but **"
  • Line Location: EVID+6
Function Call: WRITE
  • Prompt: !,"** have no selection rules but do have supporting evidence for being **"
  • Line Location: EVID+7
Function Call: WRITE
  • Prompt: !,"** manually added to the Registry. Please consider adding HIV disease (042) **"
  • Line Location: EVID+8
Function Call: WRITE
  • Prompt: !,"** to the patient's problem list. **",!
  • Line Location: EVID+9
Function Call: WRITE
  • Prompt: IMRDTE,?72,"Page ",IMRPG,!
  • Line Location: ICNHEAD+3
Function Call: WRITE
  • Prompt: !," ",X,!!
  • Line Location: ICNHEAD+4
Function Call: WRITE
  • Prompt: "** The following Patients have local ICN's (Intergration Control Numbers) **"
  • Line Location: ICNHEAD+6
Function Call: WRITE
  • Prompt: !,"** and will not have data extracted and transmitted to the national ICR **"
  • Line Location: ICNHEAD+7
Function Call: WRITE
  • Prompt: !,"** database. Since your facility's VERA reimbursement is calculated from **"
  • Line Location: ICNHEAD+8
Function Call: WRITE
  • Prompt: !,"** the National database, it is important that these patient records be **"
  • Line Location: ICNHEAD+9
Function Call: WRITE
  • Prompt: !,"** updated by the sites IRM with National ICNs. **"
  • Line Location: ICNHEAD+10
Function Call: WRITE
  • Prompt: !!
  • Line Location: ICNHEAD+11
Function Call: WRITE
  • Prompt: " Name Last Four",!
  • Line Location: ICNHEAD+12
Function Call: WRITE
  • Prompt: " ---- ---------"
  • Line Location: ICNHEAD+13
Function Call: WRITE
  • Prompt: !!,"No patients found."
  • Line Location: LIST+3
Function Call: WRITE
  • Prompt: !,NEWNAME_SSN_" "_DATA
  • Line Location: LIST+15
Function Call: WRITE
  • Prompt: !,NEWNAME_SSN_" "_DATE3_LOC3_LOC4
  • Line Location: LIST+23
Function Call: WRITE
  • Prompt: !,NEWNAME_SSN_" "_BOTHDTE_BOTHLOC_DTE2
  • Line Location: LIST+32
Function Call: WRITE
  • Prompt: !,"Total Patients: "_RORTOTAL
  • Line Location: LIST+36
Function Call: WRITE
  • Prompt: !
  • Line Location: LEGEND+2
Function Call: WRITE
  • Prompt: !," VA HIV 2.1 CONVERSION Converted from ICR 2.1"
  • Line Location: LEGEND+3
Function Call: WRITE
  • Prompt: !," VA HIV LAB ICR Lab Results"
  • Line Location: LEGEND+4
Function Call: WRITE
  • Prompt: !," VA HIV PROBLEM ICR ICD-9 in the Problem List"
  • Line Location: LEGEND+5
Function Call: WRITE
  • Prompt: !," VA HIV PTF ICR ICD-9 in the Inpatient File (PTF)"
  • Line Location: LEGEND+6
Function Call: WRITE
  • Prompt: !," VA HIV VPOV ICR ICD-9 in the Outpatient File (V POV)"
  • Line Location: LEGEND+7
Function Call: WRITE
  • Prompt: !," ",$E(NAME_" ",1,27)_SSN
  • Line Location: ICNERR+10
Function Call: WRITE
  • Prompt: !,NME
  • Line Location: ISSUE+7
Function Call: WRITE
  • Prompt: "-"
  • Line Location: ERROR+8
Function Call: WRITE
  • Prompt: !
  • Line Location: ERROR+9
Function Call: WRITE
  • Prompt: BUF1,!
  • Line Location: ERROR+10
Function Call: WRITE
  • Prompt: !
  • Line Location: ERROR+11
Function Call: WRITE
  • Prompt: "-"
  • Line Location: ERROR+19
Function Call: WRITE
  • Prompt: !
  • Line Location: ERROR+20
Function Call: WRITE
  • Prompt: BUF1,!
  • Line Location: ERROR+21
Function Call: WRITE
  • Prompt: !
  • Line Location: ERROR+22
Routine Call
  • DIR
  • Line Location:
    • PRTC+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("RORREP01" LIST+2, LIST+8, LIST+10, ICNERR+1, ICNERR+5, ICNERR+7, ICNERR+9, ISSUE+1, ISSUE+4, ISSUE+6
, ERROR+1, ERROR+4, ERROR+6, ERROR+15, ERROR+17

Label References

Name Line Occurrences
EHEAD ERROR+2, ERROR+5, ERROR+16
ENDHEAD LEGEND+1
ERROR PRNT+16
EVID ISSUE+2, ISSUE+5
HEDR LIST+1, LIST+9, LIST+35
ICNERR PRNT+18
ICNHEAD ICNERR+2, ICNERR+8
ISSUE PRNT+14
LEGEND PRNT+12
LIST PRNT+6, PRNT+8, PRNT+10
PRTC LIST+3, LIST+9, LIST+35, LIST+38, LEGEND+8, ICNERR+8, ISSUE+5, ISSUE+8, ERROR+5, ERROR+16
, ERROR+23

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PRNT+3
BOTHDTE LIST+4~, LIST+29*, LIST+32
BOTHLOC LIST+4~, LIST+30*, LIST+32
BUF ERROR+3~, ERROR+7*, ERROR+8, ERROR+18*, ERROR+19
BUF1 ERROR+3~, ERROR+7*, ERROR+8, ERROR+10, ERROR+11, ERROR+18*, ERROR+19, ERROR+21, ERROR+22
BUFP ERROR+3~, ERROR+6*, ERROR+7, ERROR+17*, ERROR+18
CNT ERROR+3~, ERROR+14*, ERROR+15*, ERROR+17
DATA LIST+4~, LIST+10*, LIST+13, LIST+14*, LIST+15, LIST+19, LIST+20, LIST+21, LIST+22, LIST+27
, LIST+29, LIST+30, LIST+31
DATE3 LIST+4~, LIST+20*, LIST+23
DFN ICNERR+3~, ICNERR+6*, ICNERR+7*, ICNERR+9
DIR PRTC+2!
DIR(0 PRTC+2*
DTE2 LIST+4~, LIST+31*, LIST+32
DTE3 LIST+4~
EIEN ISSUE+3~*, ISSUE+4*, ISSUE+6, ERROR+3~*, ERROR+4*, ERROR+6
IMRDONE PRNT+4!, PRNT+7, PRNT+9, PRNT+11, PRNT+13, PRNT+15, PRNT+17, PRNT+19!, LIST+3, LIST+6
, LIST+8, LIST+9, LIST+35, ICNERR+8, ISSUE+5, ERROR+5, ERROR+16, PRTC+2*
>> IMRDTE PRNT+3*, PRNT+5*, HEDR+3, EHEAD+3, ENDHEAD+3, EVID+4, ICNHEAD+3
IMRHED HEDR+5, LIST~
>> IMRPG PRNT+3*, HEDR+2*, HEDR+3, EHEAD+2*, EHEAD+3, ENDHEAD+2*, ENDHEAD+3, EVID+3*, EVID+4, ICNHEAD+2*
, ICNHEAD+3
IO("S" PRTC+1
IOF HEDR+2, EHEAD+2, ENDHEAD+2, EVID+3, ICNHEAD+2
IOSL LIST+9, LIST+35, ICNERR+8, ISSUE+5, ERROR+5, ERROR+16
IOST PRTC+1
LOC3 LIST+4~, LIST+21*, LIST+23
LOC4 LIST+4~, LIST+22*, LIST+23
NAME LIST+4~, LIST+7*, LIST+8*, LIST+10, LIST+11, ICNERR+3~, ICNERR+4*, ICNERR+5*, ICNERR+7, ICNERR+9
, ICNERR+10
NEWNAME LIST+4~, LIST+11*, LIST+15, LIST+23, LIST+28*, LIST+32
NME ISSUE+3~, ISSUE+6*, ISSUE+7
RORTOTAL LIST+5~, LIST+7*, LIST+16*, LIST+24*, LIST+33*, LIST+36
SSN LIST+4~, LIST+13*, LIST+15, LIST+19*, LIST+23, LIST+27*, LIST+32, ICNERR+3~, ICNERR+9*, ICNERR+10
THREEH PRNT+1~, PRNT+2*, HEDR+13, HEDR+21*
TMP PRNT+19!, ERROR+13*, ERROR+15, ERROR+17
TWODATE LIST+4~
TWOLOC LIST+4~
TYPE HEDR+7, HEDR+12, HEDR+27, LIST~, LIST+2, LIST+8, LIST+10, LIST+12, LIST+18, LIST+26
>> X HEDR+1*, HEDR+4, EHEAD+1*, ENDHEAD+1*, ENDHEAD+4, EVID+2*, EVID+5, ICNHEAD+1*, ICNHEAD+4
>> Y PRNT+5*, PRTC+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All