LA7CORC ;VA/DALOI/JMC - LAB ORC Segment message builder ; 22-Oct-2013 09:22 ; MAW
Source file <LA7CORC.m>
Package | Total | Call Graph |
---|---|---|
Automated Lab Instruments | 5 | $$XCN^LA7CHLU9 $$CHKDT^LA7VHLU1 $$FACDNS^LA7VHLU2 $$CHKDATA^LA7VHLU3 ($$INST,$$XAD,$$XON)^LA7VHLU4 |
Kernel | 1 | $$FMTHL7^XLFDT |
VA Fileman | 1 | $$GET1^DIQ |
Package | Total | Caller Graph |
---|---|---|
Automated Lab Instruments | 3 | LA7COBR LA7CORU LA7CORUB |
Name | Comments | DBIA/ICR reference |
---|---|---|
ORC7(LA7DUR,LA7DURU,LA76205,LA7FS,LA7ECH) | ; Build ORC-7 sequence - Quantity/Timing
; Call with LA7DUR = collection duration ; LA7DURU = duration units (pointer to #64.061) ; LA76205 = test urgency ; LA7FS = HL field separator ; LA7ECH = HL encoding characters |
|
ORC5(LA7VAL,LA7FS,LA7ECH) | ; Build ORC-5 sequence - Order status
; Call with LA7VAL = order status ; LA7FS = HL field separator ; LA7ECH = HL encoding characters ; Returns ORC-5 sequence |
|
ORC3(LA7VAL,LA7FS,LA7ECH) | ; Build ORC-3 sequence - Filler order number
; Call with LA7VAL = accession number/UID ; LA7VAL("NMSP") = application namespace (optional) ; LA7VAL("SITE") = placer facility ; LA7FS = HL field separator ; LA7ECH = HL encoding characters ; |
|
ORC13(LA7J,LA7FS,LA7ECH) | ; Build ORC-13 sequence - Enterer's location
; Call with LA7J = variable pointer to file #4 or #44 ; LA7FS = HL field separator ; LA7ECH = HL encoding characters |
|
ORC4(LA7VAL,LA7FS,LA7ECH) | ; Build ORC-4 sequence - Placer group number
; Call with LA7VAL = LEDI - shipping manifest number ; LA7FS = HL field separator ; LA7ECH = HL encoding characters ; Returns ORD-4 sequence |
|
ORC21(LA74,LA7FS,LA7ECH) | ; Build ORC-21 sequence - Ordering facility name
; Call with LA74 = ien of institution in file #4 ; LA7FS = HL field separator ; LA7ECH = HL encoding characters |
|
ORC14(LA7DUZ,LA7DIV,FS,ECH) | ||
ORC9(LA7DT) | ; Build ORC-9 sequence - date/time of transaction
; Call with LA7DT = order date/time |
|
ORC31 | ;-- parent universal service identifier
|
|
ORC2(LA7VAL,LA7FS,LA7ECH) | ; Build ORC-2 sequence - Placer order number
; Call with LA7VAL = accession number/UID ; LA7VAL("NMSP") = application namespace (optional) ; LA7VAL("SITE") = placer facility ; LA7FS = HL field separator ; LA7ECH = HL encoding characters |
|
ORC1(LA7TYP) | ; Build ORC-1 sequence - Order control
; Call with LA7TYP = order type from table 0119 |
|
ORC22(LA74,LA7DT,LA7FS,LA7ECH) | ; Build ORC-22 sequence - Ordering facility address
; Call with LA74 = ien of institution in file #4 ; if null/undefined then use Kernel Site file. ; LA7DT = "as of" date in FileMan format ; LA7FS = HL field separator ; LA7ECH = HL encoding characters |
|
ORC23(LA74,LA7DT,LA7FS,LA7ECH) | ; Build ORC-23 sequence - Ordering facility phone number
; Call with LA74 = ien of institution in file #4 ; if null/undefined then use Kernel Site file. ; LA7DT = "as of" date in FileMan format ; LA7FS = HL field separator ; LA7ECH = HL encoding characters |
|
ORC12(LA7DUZ,LA7DIV,LA7FS,LA7ECH,LA7IDTYP) | ; Build ORC-12 sequence - Ordering provider
; Call with LA7DUZ = DUZ of ordering provider ; LA7DIV = Facility (division) of provider ; LA7FS = HL field separator ; LA7ECH = HL encoding characters ; LA7IDTYP = id type to return (0:DUZ 1:VPID 2:NPI) ; ; Returns ORC-12 sequence ; Also used to build OBR-16 sequence |
|
ORC17(LA74,LA7FS,LA7ECH) | ; Build ORC-17 sequence - Entering organization
; Call with LA74 = ien of institution in file #4 ; if null/undefined then use Kernel Site file. ; LA7FS = HL field separator ; LA7ECH = HL encoding characters |
|
ORC24(LA7200,LA7DT,LA7FS,LA7ECH) | ; Build ORC-24 sequence - Ordering provider address
; Call with LA7200 = ien of provider in file #200 ; LA7DT = "as of" date in FileMan format ; LA7FS = HL field separator ; LA7ECH = HL encoding characters |
Name | Field # of Occurrence |
---|---|
$$GET1^DIQ | ORC7+13, ORC7+17, ORC13+14, ORC13+21, ORC13+23, ORC24+12 |
$$XCN^LA7CHLU9 | ORC12+12 |
$$CHKDT^LA7VHLU1 | ORC9+5 |
$$FACDNS^LA7VHLU2 | ORC3+12, ORC13+28 |
$$CHKDATA^LA7VHLU3 | ORC2+13, ORC3+9, ORC4+8, ORC7+14, ORC7+18, ORC13+22 |
$$INST^LA7VHLU4 | ORC13+30, ORC17+8 |
$$XAD^LA7VHLU4 | ORC22+10, ORC24+14 |
$$XON^LA7VHLU4 | ORC21+7 |
$$FMTHL7^XLFDT | ORC9+6 |
FileNo | Call Tags |
---|---|
^SC - [#44] | GET1^DIQ |
^DIC(5 - [#5] | GET1^DIQ |
^LAB(62.05 - [#62.05] | GET1^DIQ |
^LAB(64.061 - [#64.061] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(4 - [#4] | ORC23+11, ORC23+12 |
^VA(200 - [#200] | ORC14+4, ORC14+5, ORC24+11 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CS | ORC14+1~, ORC14+2*, ORC14+6, ORC14+7, ORC23+9~, ORC23+10*, ORC23+14 |
ECH | ORC14~, ORC14+2, ORC14+3 |
FS | ORC14~ |
LA7200 | ORC24~, ORC24+11, ORC24+14 |
LA74 | ORC13+7~, ORC13+9*, ORC13+14*, ORC13+17*, ORC13+27, ORC13+28, ORC13+30, ORC17~, ORC17+8, ORC21~ , ORC21+7, ORC22~, ORC22+10, ORC23~, ORC23+11, ORC23+12 |
LA744 | ORC13+7~, ORC13+9*, ORC13+13*, ORC13+14, ORC13+20, ORC13+21, ORC13+23 |
LA76205 | ORC7~, ORC7+16, ORC7+17 |
>> LA7ADDON | ORC2+9, ORC2+10 |
LA7DIV | ORC12~, ORC12+12, ORC14~ |
LA7DT | ORC9~, ORC9+5*, ORC9+6, ORC22~, ORC22+10, ORC23~, ORC24~, ORC24+14 |
LA7DUR | ORC7~, ORC7+12, ORC7+14 |
LA7DURU | ORC7~, ORC7+12, ORC7+13 |
LA7DUZ | ORC12~, ORC12+12, ORC14~, ORC14+4, ORC14+5 |
LA7ECH | ORC2~, ORC2+13, ORC2+14, ORC2+19, ORC2+20, ORC3~, ORC3+9, ORC3+10, ORC3+12, ORC3+13 , ORC3+14, ORC4~, ORC4+8, ORC5~, ORC7~, ORC7+14, ORC7+18, ORC12~, ORC12+12, ORC13~ , ORC13+22, ORC13+24, ORC13+28, ORC13+29, ORC13+30, ORC13+31, ORC13+32, ORC17~, ORC17+8, ORC21~ , ORC21+7, ORC22~, ORC22+10, ORC22+11, ORC23~, ORC23+10, ORC24~, ORC24+12, ORC24+14, ORC24+15 |
LA7FS | ORC2~, ORC2+13, ORC3~, ORC3+9, ORC3+12, ORC4~, ORC4+8, ORC5~, ORC7~, ORC7+14 , ORC7+18, ORC12~, ORC12+12, ORC13~, ORC13+22, ORC13+28, ORC13+30, ORC17~, ORC17+8, ORC21~ , ORC21+7, ORC22~, ORC22+10, ORC23~, ORC24~, ORC24+14 |
LA7IDTYP | ORC12~, ORC12+11*, ORC12+12 |
>> LA7INPT | ORC2+7, ORC2+8, ORC2+9, ORC2+10, ORC2+19, ORC2+20, ORC3+13, ORC3+14 |
LA7J | ORC13~, ORC13+12, ORC13+13, ORC13+17 |
>> LA7OBRSN | ORC2+7, ORC2+8, ORC2+9, ORC2+10 |
LA7TYP | ORC1~, ORC1+3 |
LA7VAL | ORC2~, ORC2+13, ORC3~, ORC3+9, ORC4~, ORC4+8, ORC5~, ORC5+8 |
LA7VAL("NMSP" | ORC2+14, ORC3+10 |
LA7VAL("SITE" | ORC2+15, ORC3+11, ORC3+12 |
LA7X | ORC3+7~, ORC3+12*, ORC3+13, ORC3+14, ORC7+9~, ORC7+13*, ORC7+14, ORC7+17*, ORC7+18, ORC12+10~ , ORC12+12*, ORC12+13, ORC13+7~, ORC22+9~, ORC22+10*, ORC22+11*, ORC22+12, ORC24+10~, ORC24+11*, ORC24+12 , ORC24+14*, ORC24+15*, ORC24+16 |
LA7Y | ORC2+11~, ORC2+13*, ORC2+14*, ORC2+19*, ORC2+20*, ORC2+21, ORC3+7~, ORC3+9*, ORC3+10*, ORC3+13* , ORC3+14*, ORC3+16, ORC4+6~, ORC4+8*, ORC4+10, ORC5+6~, ORC5+8*, ORC5+10, ORC7+9~, ORC7+10* , ORC7+14*, ORC7+18*, ORC7+20, ORC13+7~, ORC13+9*, ORC13+22*, ORC13+24*, ORC13+29*, ORC13+32*, ORC13+34 , ORC23+9~, ORC23+14*, ORC23+16, ORC24+8~, ORC24+12*, ORC24+13, ORC24+18 |
LA7Z | ORC13+7~, ORC13+21*, ORC13+22, ORC13+23*, ORC13+24, ORC13+28*, ORC13+29, ORC13+30*, ORC13+31*, ORC13+32 |
LAXY | ORC2+11~ |
>> LRSS | ORC2+7, ORC2+8, ORC2+19, ORC2+20, ORC3+13, ORC3+14 |
ORC14 | ORC14+1~, ORC14+6*, ORC14+7*, ORC14+8 |
PH1 | ORC14+1~, ORC14+4*, ORC14+6, ORC23+9~, ORC23+11*, ORC23+14 |
>> PH2 | ORC14+5*, ORC14+7 |
RS | ORC14+1~, ORC14+3*, ORC14+7 |
RT | ORC23+9~, ORC23+12*, ORC23+14 |
U | ORC14+4, ORC14+5, ORC22+11, ORC23+11, ORC23+12, ORC24+12, ORC24+15 |