HDISDSRL ;BPFO/DTG - HDI MAILMAN SERVER COLLECT ITEMS FOR LABORATORY; Apr 07, 2018@12:42
Source file <HDISDSRL.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 |
---|---|---|
Health Data and Informatics | 1 | HDISDSR |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; Display found orderable items for Lab
|
|
EN1 | ;
|
|
L1 | ||
L1E | ; end of flip from XML
|
|
DONE | ; final quit point
|
|
EXPORT | ; output as export file
; basic repeats |
|
E1 | ||
E2 | ||
E3 | ||
E4 | ||
EOUT | ;
|
|
EHEAD | ; export header
|
|
GETORD | ||
GETLPI | ; get primary lab item
|
|
GETLTI | ; get lab test item
|
|
GETLTS | ; get lab specimen and mltf item
|
|
CHAR(A) | ; check for ctrl chars, <, >, &
|
|
N(K) | ;get value
|
|
SETDATA | ; Set data into report structure
|
|
PSEND | ; SEND IF FILE TO BIG
|
Name | Field # of Occurrence |
---|---|
$$EN^HDISDOC | EN1+8 |
$$UUBEGFN^HDISDSR1 | L1E+54, PSEND+25 |
$$UUEN^HDISDSR1 | EOUT+2, PSEND+2 |
CLEAN^HDISDSR1 | DONE+3 |
DISER^HDISDSR1 | L1E+51 |
ENCODE^HDISDSR1 | SETDATA+2 |
INIT^HDISDSR1 | L1E+2 |
MAILSEND^HDISDSR1 | DONE+2, PSEND+8 |
$$FMTE^XLFDT | L1E+5 |
$$FMTHL7^XLFDT | L1E+37, L1E+38 |
$$HTE^XLFDT | DONE+1, PSEND+7 |
$$NOW^XLFDT | L1E+5, L1E+37, L1E+38 |
$$REPEAT^XLFSTR | L1E+43, PSEND+22 |
Name | Line Occurrences |
---|---|
$$CHAR | L1+13, L1+14, L1+19, L1+26, L1+31, L1+39, L1+40, L1+46, L1+47, L1+51 , L1+52, L1+54, L1+55, L1+56 |
$$N | L1+4, L1+5, L1+6, L1+7, L1+12, L1+13, L1+14, L1+15, L1+16, L1+19 , L1+25, L1+26, L1+27, L1+30, L1+31, L1+32, L1+33, L1+34, L1+35, L1+36 , L1+38, L1+39, L1+40, L1+41, L1+42, L1+45, L1+46, L1+47, L1+48, L1+49 , L1+50, L1+51, L1+52, L1+53, L1+54, L1+55, L1+56 |
DONE | EOUT+5 |
E1 | E2 |
E2 | E3 |
E3 | E4 |
E4 | E4+20 |
EHEAD | L1E+56 |
EOUT | E1 |
EXPORT | L1E+58 |
GETLPI | E2 |
GETLTI | E3 |
GETLTS | E4 |
GETORD | E1 |
L1 | L1+2, L1+3, L1+4, L1+5, L1+6, L1+7, L1+8, L1+9 |
L1E | L1, L1+1 |
PSEND | E4+19 |
SETDATA | E4+3, E4+5, E4+7, E4+8, E4+11, E4+14, E4+18, EHEAD+2, EHEAD+4, EHEAD+6 , EHEAD+8, EHEAD+10, EHEAD+12, EHEAD+14, EHEAD+16, EHEAD+18, EHEAD+20 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
A | EN1+9*, L1*, L1+1, L1+2, L1+11*, L1+17*, L1+21*, L1+24*, L1+28*, L1+37* , L1E+5*, L1E+6, L1E+7*, L1E+8, L1E+9*, L1E+10, L1E+11*, L1E+12, L1E+13*, L1E+14 , L1E+17*, L1E+18, L1E+19*, L1E+20, L1E+21*, L1E+22, L1E+23*, L1E+24, L1E+25*, L1E+26 , L1E+27*, L1E+28, L1E+29*, L1E+30, L1E+31*, L1E+32, L1E+33*, L1E+34, L1E+35*, L1E+36 , L1E+41*, L1E+42, L1E+46, E4+7*, E4+9*, E4+10, E4+12*, E4+13, E4+15*, E4+16 , CHAR~, CHAR+2, CHAR+3, CHAR+4, CHAR+5, CHAR+6*, CHAR+7, CHAR+8, CHAR+9*, CHAR+10 , CHAR+11, CHAR+12*, CHAR+13, CHAR+14, CHAR+15*, CHAR+16, PSEND+12*, PSEND+13, PSEND+14*, PSEND+15* , PSEND+16, PSEND+17*, PSEND+18 |
B | L1+1*, L1+2, L1+3, L1+4, L1+5, L1+6, L1+7, L1+8, L1+9, L1+11* , L1+12, L1+13, L1+14, L1+15, L1+16, L1+17*, L1+18, L1+19, L1+20, L1+21 , L1+22, L1+24*, L1+25, L1+26, L1+27, L1+28*, L1+30, L1+31, L1+32, L1+33 , L1+34, L1+35, L1+36, L1+37*, L1+38, L1+39, L1+40, L1+41, L1+42, L1+43 , L1+44, L1+45, L1+46, L1+47, L1+48, L1+49, L1+50, L1+51, L1+52, L1+53 , L1+54, L1+55, L1+56, E4+7*, GETORD+1*, GETLPI+2*, GETLTI+2*, GETLTI+3, GETLTS+2*, GETLTS+3 , GETLTS+4*, GETLTS+5, GETLTS+6*, GETLTS+7*, CHAR+1~, CHAR+5*, CHAR+6, CHAR+8*, CHAR+9, CHAR+11* , CHAR+12, CHAR+14*, CHAR+15 |
C | L1+10*, L1+13*, L1+14*, L1+19*, L1+23*, L1+28*, L1+31*, L1+37*, L1+39*, L1+40* , L1+46*, L1+47*, L1+51*, L1+52*, L1+54*, L1+55*, L1+56*, CHAR+1~ |
D | EN1+4~, L1+19*, DONE+8!, CHAR+1~, CHAR+3* |
F | N+1~, N+2*, N+3 |
HD | EN1+3~, DONE+7! |
HD1 | EN1+3~, DONE+7! |
HD2 | EN1+3~, DONE+7! |
HDFILEN1 | EN1+6~, L1E+37*, L1E+40, DONE+9!, PSEND+20 |
HDFILENM | EN1+6~, L1E+40*, L1E+41, L1E+54, DONE+9!, PSEND+12, PSEND+20*, PSEND+21, PSEND+25 |
HDIA | EN1+4~, DONE+8!, EXPORT+2*, E4+2 |
>> HDICRLF | E4+17, EHEAD+19 |
HDIFAC | EN1+4~, DONE+8!, EXPORT+2*, E4+2 |
HDIFER | EN1+6~, L1E+38*, L1E+48, DONE+9! |
HDIFILN | EN1+6~, L1E+39*, L1E+40, DONE+9!, PSEND+7, PSEND+10*, PSEND+20 |
>> HDIMAX | E4+19 |
>> HDINODE | L1E+44*, L1E+45*, L1E+46*, L1E+48, L1E+49*, L1E+50*, L1E+52*, L1E+53*, L1E+54, EOUT+1* , EOUT+2*, EOUT+3, EOUT+4, SETDATA+1*, PSEND+1*, PSEND+2*, PSEND+3, PSEND+4, PSEND+23*, PSEND+24* , PSEND+25 |
HDIOI | EN1+4~, L1+10*, L1+12*, L1+13*, L1+14*, L1+15*, L1+16*, DONE+8! |
HDIORD | EN1+1~, EN1+4~, L1+10*, L1+16, L1+19, L1+23, L1+27, L1+28, L1+36, L1+37 , L1+42, L1+48, L1+52, L1+56, DONE+5!, DONE+8! |
>> HDIST | DONE+1, PSEND+7 |
>> HDISTN | L1E+5, L1E+37, L1E+38, DONE+1, PSEND+7 |
>> HDISTR | E4+2*, E4+4*, E4+7*, E4+8, E4+10*, E4+13*, E4+16*, E4+17*, EOUT+2, EHEAD+1* , EHEAD+3*, EHEAD+5*, EHEAD+7*, EHEAD+9*, EHEAD+11*, EHEAD+13*, EHEAD+15*, EHEAD+17*, EHEAD+19*, SETDATA+2 , PSEND+2, PSEND+5* |
>> HDISUB | L1E+7, L1E+37, L1E+38, L1E+48 |
HDISUBJ | EN1+6~, DONE+1*, DONE+2, DONE+9!, PSEND+7*, PSEND+8 |
>> HDISV | L1E+6, L1E+8, L1E+10, L1E+12, L1E+14, L1E+18, L1E+20, L1E+22, L1E+24, L1E+26 , L1E+28, L1E+30, L1E+32, L1E+34, L1E+36, L1E+43, L1E+44, L1E+45, L1E+46, L1E+48 , L1E+50, L1E+52, L1E+53, L1E+54, EOUT+1, EOUT+2, EOUT+3, EOUT+4, SETDATA+1, PSEND+1 , PSEND+2, PSEND+3, PSEND+4, PSEND+11, PSEND+13, PSEND+14, PSEND+16, PSEND+18, PSEND+19, PSEND+21 , PSEND+22, PSEND+23, PSEND+24, PSEND+25 |
HDIV | EN1+3~, EN1+7*, L1+2, L1+8, L1+10, L1+16, L1+19, L1+23, L1+27, L1+28 , L1+36, L1+37, L1+42, L1+48, L1+52, L1+56, DONE+4, DONE+7!, EXPORT+2, GETORD , GETORD+1, GETORD+2, GETLPI+1, GETLPI+2, GETLTI+1, GETLTI+2, GETLTS+1, GETLTS+2, GETLTS+4, GETLTS+6 , GETLTS+7 |
I | E4+7*, CHAR+1~ |
K | N~, N+2 |
L | CHAR+1~ |
LPI | EN1+1~, L1+23*, L1+27, L1+28, L1+36, L1+37, L1+42, L1+48, L1+52, L1+56 , DONE+5!, E1+1*, E2, GETLPI+1*, GETLPI+2, GETLTI+1, GETLTI+2, GETLTS+1, GETLTS+2, GETLTS+4 , GETLTS+6, GETLTS+7 |
LPIEN | EN1+1~, DONE+5!, E1+1*, E4+10, GETLPI+2* |
LPNM | EN1+1~, DONE+5!, E1+1*, E4+10, GETLPI+2* |
LPO1 | EN1+1~, L1+23*, L1+25*, L1+26*, L1+27*, DONE+5! |
LPPN | EN1+1~, DONE+5!, E1+1*, E4+10, GETLPI+2* |
LT | EN1+6~, EN1+9*, L1E+6*, L1E+8*, L1E+10*, L1E+12*, L1E+14*, L1E+18*, L1E+20*, L1E+22* , L1E+24*, L1E+26*, L1E+28*, L1E+30*, L1E+32*, L1E+34*, L1E+36*, L1E+42*, L1E+43*, DONE+9! , E4+19, PSEND+10*, PSEND+12*, PSEND+14*, PSEND+15*, PSEND+17*, PSEND+22* |
LTI | EN1+1~, L1+28*, L1+36, L1+37, L1+42, L1+48, L1+52, L1+56, DONE+5!, E2+1* , E3, GETLTI+1*, GETLTI+2, GETLTS+1, GETLTS+2, GETLTS+4, GETLTS+6, GETLTS+7 |
LTI1 | EN1+1~, L1+28*, L1+30*, L1+31*, L1+32*, L1+33*, L1+34*, L1+35*, L1+36*, DONE+5! |
LTIDA | EN1+1~, DONE+5!, E2+1*, E4+10, GETLTI+3* |
LTIDAP | EN1+1~, DONE+5!, E2+1*, E4+10, GETLTI+3* |
LTIDT | EN1+1~, DONE+5!, E2+1*, E4+10, GETLTI+3* |
LTIEN | EN1+1~, DONE+5!, E2+1*, E4+9, E4+10, GETLTI+2* |
LTINM | EN1+1~, DONE+5!, E2+1*, E4+9, E4+10, GETLTI+2* |
LTIST | EN1+2~, DONE+6!, E2+1*, E4+9, GETLTI+3* |
LTITYP | EN1+2~, DONE+6!, E2+1*, E4+10, GETLTI+2* |
LTMANM | EN1+2~, DONE+6!, E3+1*, E4+13, GETLTS+4* |
LTMCOM | EN1+2~, DONE+6!, E3+1*, E4+16, GETLTS+6* |
LTMDT | EN1+2~, DONE+6!, E4+13, GETLTS+5* |
LTMIEN | EN1+2~, DONE+6!, E3+1*, E4+13, E4+15, GETLTS+4* |
LTMLON | EN1+2~, DONE+6!, E3+1*, E4+16, GETLTS+6* |
LTMMET | EN1+2~, DONE+6!, E3+1*, E4+16, GETLTS+7* |
LTMNM | EN1+2~, DONE+6!, E3+1*, E4+13, E4+15, GETLTS+4* |
LTMPRO | EN1+2~, DONE+6!, E3+1*, E4+16, GETLTS+6* |
LTMSCA | EN1+2~, DONE+6!, E3+1*, E4+16, GETLTS+7* |
LTMSPC | EN1+2~, DONE+6!, E3+1*, E4+16, GETLTS+7* |
LTMST | EN1+3~, DONE+7!, E3+1*, E4+15, GETLTS+6* |
LTMTIM | EN1+3~, DONE+7!, E3+1*, E4+16, GETLTS+7* |
LTS | EN1+1~, L1+37*, L1+42, L1+48, L1+52, L1+56, DONE+5!, E3+1*, E4, GETLTS+1* , GETLTS+2, GETLTS+4, GETLTS+6, GETLTS+7 |
LTS1 | EN1+3~, L1+37*, L1+38*, L1+39*, L1+40*, L1+41*, L1+42*, DONE+7! |
LTS2 | EN1+3~, L1+37*, L1+45*, L1+46*, L1+47*, L1+48*, DONE+7! |
LTS3 | EN1+3~, L1+37*, L1+49*, L1+50*, L1+51*, L1+52*, DONE+7! |
LTS4 | EN1+3~, L1+37*, L1+53*, L1+54*, L1+55*, L1+56*, DONE+7! |
LTSDT | EN1+3~, DONE+7!, E3+1*, E4+13, GETLTS+3* |
LTSIEN | EN1+3~, DONE+7!, E3+1*, E4+12, E4+13, GETLTS+2* |
LTSNM | EN1+3~, DONE+7!, E3+1*, E4+12, E4+13, GETLTS+2* |
LTSST | EN1+3~, DONE+7!, E3+1*, E4+12, GETLTS+3* |
LTSUN | EN1+3~, DONE+7!, E3+1*, E4+13, GETLTS+2* |
M | EN1+3~, L1+3*, L1+4*, L1+5*, L1+6*, L1+7*, L1+8, DONE+7!, CHAR+1~ |
N | CHAR+1~ |
O10143 | EN1+4~, DONE+8!, EXPORT+4*, E1, GETORD*, GETORD+1, GETORD+2, GETLPI+1, GETLPI+2, GETLTI+1 , GETLTI+2, GETLTS+1, GETLTS+2, GETLTS+4, GETLTS+6, GETLTS+7 |
OIDT | EN1+4~, DONE+8!, EXPORT+4*, E4+4, GETORD+1* |
OIEN | EN1+4~, DONE+8!, EXPORT+4*, E4+4, GETORD+1* |
OIMEN | EN1+4~, DONE+8!, EXPORT+4*, E4+4, GETORD+1* |
OINM | EN1+4~, DONE+8!, EXPORT+4*, E4+4, GETORD+1* |
OIST | EN1+4~, DONE+8!, EXPORT+4*, E4+4, GETORD+1* |
OISYN | EN1+4~, DONE+8!, GETORD+2!* |
OISYN( | E4+7 |
OISYN(0 | E4+7 |
OK | EN1+4~, L1+10*, L1+23*, DONE+8! |
OK1 | EN1+4~, L1+10*, L1+17, L1+21*, L1+23*, DONE+8! |
QUIT | EN1+4~, EN1+9*, DONE+8! |
R | EN1+4~, L1+26*, DONE+8! |
RCOUNT | EN1+6~, EN1+7*, L1E+11, L1E+13, L1E+17, L1E+19, L1E+21, L1E+23, L1E+25, L1E+27 , L1E+29, L1E+31, L1E+33, L1E+35, DONE+9! |
RERRARY | EN1+5~, EN1+7* |
RERROR | EN1+5~, EN1+7*, EN1+8*, L1E+47, L1E+51 |
RET1 | EN1+5~, EN1+7*, EN1+8, L1, L1+1, L1+11, L1+17, L1+24, L1+28, L1+37 , DONE+4! |
TAB | EN1+1~, EN1+9*, DONE+5!, E4+2, E4+4, E4+10, E4+13, E4+16, EHEAD+1, EHEAD+3 , EHEAD+5, EHEAD+7, EHEAD+9, EHEAD+11, EHEAD+13, EHEAD+15, EHEAD+17, EHEAD+19 |
U | L1+4, L1+5, L1+6, L1+7, L1+12, L1+13, L1+14, L1+15, L1+16, L1+26 , L1+27, L1+31, L1+32, L1+33, L1+34, L1+35, L1+36, L1+39, L1+40, L1+41 , L1+42, L1+46, L1+47, L1+48, L1+50, L1+51, L1+52, L1+54, L1+55, L1+56 , L1E+11, L1E+13, L1E+17, L1E+19, L1E+21, L1E+23, L1E+25, L1E+27, L1E+29, L1E+31 , L1E+33, L1E+35, E4+2, GETORD+1, GETLPI+2, GETLTI+2, GETLTI+3, GETLTS+2, GETLTS+3, GETLTS+4 , GETLTS+5, GETLTS+6, GETLTS+7 |