ORY153 ;SLC/JLI Hep-C Post Init ; Feb 04, 2003@11:44:15
Source file <ORY153.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PRE | ;Pre-init
|
|
LOAD | ; load data into ^TMP (expects ROOT to be defined)
|
|
SCHRPT | ;
|
|
ARS | ; -- Add Patient subscript to xref for test sites
|
|
XX2 | ||
UDRPTS | ;
|
|
CSLTRPT | ;
|
|
UDABS | ;Update abnormal result start date PKG level to installation date
|
|
QUE | ; -- Task xref job
|
|
POST | ;Post-init
|
|
MAIN | ; main (initial) parameter transport routine
|
|
DATA | ; parameter data
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^OR(100 - [#100] | ARS+2, ARS+4!, ARS+5, ARS+6, ARS+7* |
^ORD(100.98 - [#100.98] | CSLTRPT+6, SCHRPT+5 |
^ORD(102.21 - [#102.21] | UDABS+5, UDABS+6, UDABS+15, UDABS+16, UDABS+17*, UDABS+18*, UDABS+19!, UDABS+20*, CSLTRPT+3, CSLTRPT+4 , CSLTRPT+7*, CSLTRPT+8!*, SCHRPT+2, SCHRPT+3, SCHRPT+6*, SCHRPT+7!* |
^TMP($J | MAIN+1!, MAIN+3, XX2+1, XX2+3, XX2+4, XX2+6! |
Name | Line Occurrences |
---|---|
MAIN | POST+4 |
QUE | POST+8 |
UDABS | POST+6 |
UDRPTS | POST+7 |
Name | Field # of Occurrence |
---|---|
^( | CSLTRPT+5, SCHRPT+4 |
^("KEY" | XX2+3 |
^(0 | ARS+6 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ABSID | UDABS+3~, UDABS+4*, UDABS+5*, UDABS+15, UDABS+16, UDABS+17, UDABS+18, UDABS+19, UDABS+20 |
CTGVL | CSLTRPT+1~, CSLTRPT+2*, CSLTRPT+6*, CSLTRPT+7, CSLTRPT+8, SCHRPT+1*, SCHRPT+5*, SCHRPT+6, SCHRPT+7 |
DIFF | UDABS+3~, UDABS+4*, UDABS+9*, UDABS+10*, UDABS+11 |
DRANGEID | UDABS+3~, UDABS+6*, UDABS+16 |
ENT | MAIN+2~, XX2*, XX2+5 |
ERR | XX2+2~, XX2+5 |
I | MAIN+2~, LOAD+1*, LOAD+2* |
IDX | MAIN+2~, XX2*, XX2+1*, XX2+3, XX2+4 |
INST | XX2+2~, XX2+3*, XX2+5 |
IX | UDABS+3~, UDABS+4*, UDABS+15*, UDABS+16, UDABS+17, UDABS+18, UDABS+19, UDABS+20, CSLTRPT+1~, CSLTRPT+2* , CSLTRPT+4*, CSLTRPT+5, CSLTRPT+7, CSLTRPT+8, SCHRPT+1*, SCHRPT+3*, SCHRPT+4, SCHRPT+6, SCHRPT+7 |
JX | UDABS+4*, UDABS+15, UDABS+20*, CSLTRPT+1~, CSLTRPT+2*, CSLTRPT+4, CSLTRPT+8*, SCHRPT+1*, SCHRPT+3 |
OLDVAL | POST+1~, POST+2*, POST+3*, POST+5 |
ORDT | ARS+1~, ARS+6*, ARS+7 |
ORFIRST | ARS+1~, ARS+3*, ARS+4 |
ORIDX | ARS+1~, ARS+2*, ARS+3* |
ORIFN | ARS+1~, ARS+3*, ARS+4*, ARS+5*, ARS+6, ARS+7 |
ORVP | ARS+1~, ARS+6*, ARS+7 |
PAR | XX2+2~, XX2+3*, XX2+5 |
REF | MAIN+2~, LOAD+1*, LOAD+2*, LOAD+3 |
ROOT | MAIN+2~, MAIN+3*, LOAD+3 |
RPTID | CSLTRPT+1~, CSLTRPT+2*, CSLTRPT+3*, CSLTRPT+4, CSLTRPT+7, CSLTRPT+8, SCHRPT+1*, SCHRPT+2*, SCHRPT+3, SCHRPT+6 , SCHRPT+7 |
SD | UDABS+3~, UDABS+4*, UDABS+12*, UDABS+14 |
STDT | UDABS+3~, UDABS+4*, UDABS+7*, UDABS+9, UDABS+11*, UDABS+12, UDABS+18, UDABS+20 |
TD | UDABS+3~, UDABS+8*, UDABS+9, UDABS+13*, UDABS+14 |
>> TX | UDABS+4* |
TXTC | UDABS+3~, UDABS+4*, UDABS+14*, UDABS+17 |
U | XX2+3, UDABS+16, UDABS+17, CSLTRPT+5, SCHRPT+4, ARS+6 |
VAL | MAIN+2~, LOAD+1*, LOAD+2*, LOAD+3, XX2+2~, XX2+4*, XX2+5 |
>> X | QUE+4* |
ZTDESC | QUE+1~, QUE+2* |
ZTDTH | QUE+1~, QUE+2* |
ZTIO | QUE+1~, QUE+2* |
ZTRTN | QUE+1~, QUE+3* |
ZTSAVE | QUE+1~ |
ZTSK | QUE+1~, QUE+4 |
Name | Field # of Occurrence |
---|---|
$T(DATA+I | LOAD+1 |
$T(DATA+I+1 | LOAD+1 |