RORREP01 ;HOIFO/BH - REGISTRY COMPARISON REPORT ; 12/21/05 11:55am
Source file <RORREP01.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Clinical Case Registries | 1 | RORICR VERSION COMPARISON |
Name | Comments | DBIA/ICR reference |
---|---|---|
BEGIN | ;
|
|
DEV | ||
REP | ; Get Data
|
|
CLOSE | ||
KILL | ||
EN1 | ;
|
|
VTHREE | ; Make array of version 3 patients
|
|
VTWO | ; Make array of version 2.1 patients
|
|
VTWO1(PAT,ENCODE) | ;
|
|
INTWO | ; Patients in version 2.1 and not in three or in both
|
|
INTHREE | ; Patients in version 3.0 and not in two OR in both
|
|
DATE21(ENCODE) | ; Get date added to ICR 2.1
|
|
PEND(IEN) | ;
|
|
RULE(IEN) | ; Get earliest selction rule
|
Name | Field # of Occurrence |
---|---|
DD^%DT | DATE21+12, RULE+30 |
HOME^%ZIS | KILL+3 |
^%ZISC | CLOSE, KILL |
^%ZTLOAD | DEV+6 |
$$VFILE^DILFD | BEGIN+1 |
$$GET1^DIQ | VTWO+20, VTWO1+2, VTWO1+12, INTWO+3, INTWO+4, INTHREE+3, INTHREE+4, RULE+13, RULE+20 |
IMRDEV^IMREDIT | DEV |
ACESSERR^IMRERR | BEGIN+3 |
$$GETICN^MPIF001 | VTHREE+8, VTWO1+9 |
$$NEXTPAT^RORAPI01 | VTHREE+5 |
$$PATITER^RORAPI01 | VTHREE+3 |
PRNT^RORREP02 | REP+5 |
$$XOR^RORUTL03 | VTWO+8 |
H^XUS | BEGIN+3 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
^RORDATA(798 - [#798] | GET1^DIQ |
^ROR(798.2 - [#798.2] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | VTHREE+10, VTWO+13, VTWO+15, VTWO1+11 |
^IMR(158 | VTWO+3, VTWO+4, DATE21+3, DATE21+4 |
^RORDATA(798 - [#798] | PEND+3, PEND+4, RULE+3, RULE+10, RULE+11, RULE+22 |
^TMP("RORREP01" | KILL+1!, EN1+1!, VTHREE+7*, VTHREE+11*, VTWO+7*, VTWO+11*, VTWO+17, VTWO+18*, VTWO+22*, VTWO+26 , VTWO+28, VTWO+29, VTWO+32!, VTWO1+4*, VTWO1+6*, VTWO1+7*, VTWO1+13*, INTWO+2, INTWO+5, INTWO+6 , INTWO+7*, INTWO+9*, INTHREE+2, INTHREE+5*, INTHREE+8, INTHREE+10*, INTHREE+11, INTHREE+12*, RULE+6*, RULE+25* , RULE+27* |
^XUSEC("IMRA" | BEGIN+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%I | KILL+2! |
%ZIS | CLOSE! |
A | KILL+2! |
BUFF | RULE+19~, RULE+24*, RULE+25 |
CNT | REP+3!, EN1+2*, VTWO+6*, VTWO+7, VTWO+10*, VTWO+11, VTWO+21*, VTWO+22, VTWO1+3*, VTWO1+4 , INTHREE+5*, RULE+5*, RULE+6, RULE+18* |
D | KILL+2! |
DATA | RULE+8~, RULE+11*, RULE+12, RULE+14 |
DATE1 | RULE+8~, RULE+28*, RULE+29, RULE+30*, RULE+31 |
DATE21 | INTWO+1~, INTWO+5*, INTWO+7, INTWO+9, INTHREE+1~, INTHREE+11*, INTHREE+12 |
DIRUT | KILL+2! |
DISYS | KILL+2! |
DTOUT | KILL+2! |
DUZ | BEGIN+3 |
ENC | VTWO+27~, VTWO+29*, VTWO+30 |
ENCODE | VTWO+1~, VTWO+4*, VTWO+5, VTWO+8, VTWO+11, VTWO+18, VTWO+24, VTWO1~, VTWO1+4, VTWO1+7 , VTWO1+8, DATE21~, DATE21+3 |
EVID | RULE+19~, RULE+22*, RULE+23, RULE+26 |
I | KILL+2! |
ICN | VTHREE+1~, VTHREE+8*, VTHREE+9, VTWO1+1~, VTWO1+9*, VTWO1+10 |
IDSC | VTHREE+1~, VTHREE+3, VTHREE+5 |
IEN | INTWO+1~*, INTWO+2*, INTWO+3, INTWO+4, INTWO+5, INTWO+6, INTWO+8, INTHREE+1~*, INTHREE+2*, INTHREE+3 , INTHREE+4, INTHREE+5, INTHREE+7, INTHREE+8, INTHREE+9, INTHREE+11, PEND~, PEND+3, RULE~, RULE+3 , RULE+6, RULE+25, RULE+27 |
IMRARR | DATE21+1~, DATE21+9 |
IMRARR( | DATE21+5*, DATE21+6*, DATE21+7*, DATE21+8*, DATE21+11 |
IMRCAT1 | DATE21+1~, DATE21+5* |
IMRCAT2 | DATE21+1~, DATE21+6* |
IMRCAT3 | DATE21+1~, DATE21+7* |
IMRCAT4 | DATE21+1~, DATE21+8* |
IMRDTE | KILL+2!, DATE21+1~, DATE21+10*, DATE21+11*, DATE21+12*, DATE21+13 |
IMRFLG | KILL+2! |
IMRHED | KILL+2! |
IMRIEN | VTWO+1~, VTWO+2*, VTWO+3*, VTWO+4, VTWO+7, DATE21+1~, DATE21+2*, DATE21+3*, DATE21+4 |
IMRLOC | BEGIN+3*! |
IMRNODE | DATE21+1~, DATE21+4*, DATE21+5, DATE21+6, DATE21+7, DATE21+8 |
IMRPG | KILL+2! |
IMRRPG | KILL+2! |
IO | REP+1 |
IO("Q" | DEV+2, DEV+3 |
IOF | DEV+2 |
IOM | DEV+5 |
ION | DEV+5 |
IOP | CLOSE! |
IOSL | DEV+5 |
J | KILL+2! |
NAME | VTHREE+1~, VTHREE+10*, VTHREE+11, VTWO1+11*, VTWO1+13, INTWO+1~, INTWO+3*, INTWO+7, INTWO+9, INTHREE+1~ , INTHREE+3*, INTHREE+5, INTHREE+10, INTHREE+12 |
NEWIEN | VTWO+14~, VTWO+15*, VTWO+16, VTWO+17, VTWO+18 |
NME | RULE+19~, RULE+20*, RULE+24, RULE+27 |
PAT | VTHREE+1~, VTHREE+6*, VTHREE+7, VTHREE+8, VTHREE+10, VTHREE+11, VTWO+1~, VTWO+8*, VTWO+9, VTWO+13 , VTWO+15, VTWO+20, VTWO+22, VTWO+24, VTWO1~, VTWO1+2, VTWO1+6, VTWO1+7, VTWO1+8, VTWO1+9 , VTWO1+11, VTWO1+12, VTWO1+13 |
PEND | PEND+1~, PEND+2*, PEND+5*, PEND+6 |
PENDING | INTHREE+1~, INTHREE+9*, INTHREE+10 |
POP | DEV+1, KILL+2! |
RC | VTHREE+1~, VTHREE+3*, VTHREE+4, VTHREE+5*, VTHREE+6 |
>> RES | PEND+4*, PEND+5 |
RORIEN | PEND+1~, PEND+2*, PEND+3*, PEND+4, RULE+1~, RULE+2*, RULE+3*, RULE+4, RULE+10, RULE+11 , RULE+20, RULE+22 |
RORSRIEN | RULE+8~, RULE+9*, RULE+10*, RULE+11 |
RULE | INTWO+1~, INTWO+8*, INTWO+9, INTHREE+1~, INTHREE+7*, INTHREE+10, INTHREE+12, RULE+8~, RULE+12*, RULE+13* , RULE+15 |
RULE1 | RULE+8~, RULE+29*, RULE+31 |
SELARR | RULE+8~, RULE+17 |
SELARR( | RULE+15*, RULE+28, RULE+29 |
SELDATE | RULE+8~, RULE+14*, RULE+15 |
SSN | VTWO1+1~, VTWO1+12*, VTWO1+13, INTWO+1~, INTWO+4*, INTWO+7, INTWO+9, INTHREE+1~, INTHREE+4*, INTHREE+10 , INTHREE+12 |
SUB4 | VTWO+27~*, VTWO+28*, VTWO+29, VTWO+30 |
U | VTWO+4, RULE+22 |
VAERR | KILL+2! |
VAROOT | KILL+2! |
VTHREE | VTHREE+2! |
X | KILL+2! |
X0 | KILL+2! |
X1 | KILL+2! |
Y | KILL+2!, DATE21+12*, RULE+30* |
Z | KILL+2! |
ZTDESC | DEV+4*, DEV+6! |
>> ZTIO | DEV+5* |
>> ZTQUEUED | CLOSE+1 |
>> ZTREQ | CLOSE+1* |
ZTRTN | DEV+4*, DEV+6! |
ZTSAVE | DEV+6! |
ZTSAVE("*" | DEV+5* |
ZTSK | DEV+6! |