LRXREF1 ;SLC/RWA,ALB/TMK - CONTINUE BUILD X-REF FOR RE-INDEX ;09/15/2010 10:42:09
Source file <LRXREF1.m>
Package | Total | Call Graph |
---|---|---|
Lab Service | 2 | ^LREXPD ($$ACTV61,$$ACTV62)^LRJUTL3 |
VA FileMan | 1 | EN^DDIOL |
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 |
---|---|---|
Lab Service | 5 | ^LRD(65 ACCESSION NUMBER DATE RE-ENTERED SPECIMEN # TEST |
Name | Comments | DBIA/ICR reference |
---|---|---|
AT | ;^LRO(69,"AT" CROSS REFERENCE
|
|
AT1 | ||
ATD | ;KILL FOR ^LRO(69,"AT" CROSS REFERENCE
|
|
AC | ;BUILD "AC" CROSS-REFERENCE IN FILE 68
|
|
END | ||
SET | ||
AC1 | ;KILL "AC" CROSS-REFERENCE IN FILE 68
|
|
KILL | ||
A65 | ;Rebuild "A" x-ref in file 65 for 65.15,.08 for Re-index utility
|
|
A658 | ;build "A" x-ref in file 65 for 65,.05 for Re-index utility
|
|
C | ;build "C" x-ref in file 69
|
|
A6599 | ;Rebuild Archive "A" x-ref in file 65.9999 for 65.999915,.08 for Re-index utility
|
|
A65899 | ;build Archive "A" x-ref in file 65.9999 for 65.9999,.05 for Re-index utility
|
|
IT600101(DA,DINUM,X) | ;
; Input Transform for Sub-File #60.01 field #.01 SITE/SPECIMEN ; Expects X (#61 IEN of SITE/SPECIMEN being added to the test) and DA array -- DA(1)=^LAB(60,DA(1)) DA=^LAB(60,DA(1),1,DA) ; Kills X if invalid selection ; Sets DINUM if valid selection |
|
IT600301(DA,X) | ;
; Input Transform for Sub-File #60.03 field #.01 COLLECTION SAMPLE ; Expects X (#62 IEN of COLLECTION SAMPLE being added to the test) and DA array -- DA(1)=^LAB(60,DA(1)) DA=^LAB(60,DA(1),1,DA) ; Kills X if invalid selection |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^LAB(60 - [#60] | SET, KILL, IT600101+6, IT600101+8, IT600101+9, IT600301+4 |
^LAB(61 - [#61] | IT600101+11 |
^LAB(62 - [#62] | IT600301+6 |
^LRD(65 - [#65] | A65+1*, A658+1* |
^LRD(65.9999 | A6599+1*, A65899+1* |
^LRO(68 - [#68] | AC+2, SET*, AC1+2, KILL! |
^LRO(69 - [#69] | AT+1, AT1, AT1+1*, ATD+1, ATD+2!, C+1*, C+2* |
^TMP("LR" | END!, AC1+4! |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ATX | AT1*, AT1+1, AT1+2!, ATD+1*, ATD+2, ATD+3! |
ATX(1 | AT1*, AT1+1, ATD+1*, ATD+2 |
ATX(2 | AT1*, AT1+1, ATD+1*, ATD+2 |
ATX(3 | AT1+1*, ATD+2* |
DA | AT+1, AT1, ATD+1, AC+2, SET, AC1+2, KILL, A65+1, C+1, C+2 , A6599+1, IT600101~, IT600301~ |
DA(1 | AT+1, AT1, AT1+1, ATD+1, ATD+2, AC+2, SET, AC1+2, KILL, A658+1 , C+1, C+2, A65899+1, IT600101+6, IT600101+9, IT600301+4 |
DA(2 | AT+1, AT1, AT1+1, ATD+1, ATD+2, AC+2, SET, AC1+2, KILL |
DINUM | IT600101~, IT600101+12* |
>> DIU(0 | C+1, C+2 |
DT | IT600101+11, IT600301+6 |
>> I | AC+2*, AC+3*, AC1+2*, AC1+3* |
>> LR | A65+1*, A658+1*, A6599+1*, A65899+1* |
>> LR(1 | A65+1*, A6599+1* |
LRA | IT600101+5~, IT600101+6*, IT600101+7, IT600101+8*, IT600101+9 |
LRGTN | AC+2*, AC+3*, END!, SET, AC1+2*, AC1+3*, AC1+4!, KILL |
>> LRORD | AC+3, SET+1, AC1+3 |
>> LRORD( | AC+3, AC1+3 |
LRTEST | AC+1*, AC+2*, END!, AC1+1*, AC1+2*, AC1+4! |
LRTN | AC+1*, AC+2*, END!, AC1+1*, AC1+2*, AC1+4! |
LRTSTS | AC+3, END!, AC1+3, AC1+4! |
U | SET, KILL, IT600101+6, IT600101+9, IT600101+11, IT600301+4, IT600301+6 |
X | C+1, C+2, IT600101~, IT600101+7!, IT600101+9!, IT600101+11!, IT600101+12, IT600301~, IT600301+4!, IT600301+6! |