All messages should be posted in plain text. HTML will be converted to
attachments. The meditech-l web site is MTUsers.com
======================================
I have created a task with Meditech to see if they can help me, but
usually the L is faster. Here's my problem:
LAB DTS 9604 explains how to create a custom lab site batch header
fragment. I did this by initializing from
LAB.C.SIB.std.batch.spec.hdr.2.
I am having trouble with one thing. The ordered tests are not
displaying. The line check is this: [EMAIL PROTECTED]""]
The field that should be displaying each ordered test is on the picture
as spec.ord.tests but this field doesn't exist. When I look at the
standard report there are 4 macros, one for each of lab, micro, bbk, and
path. Each one has a subroutine of GET.LAB.ORDERED.TESTS (for example
for lab). Each subroutine is building the list of ordered tests in a
data structure with the statement
DO{>(@LAB.L.SPEC.ordered.tests.display[X],T)^X [EMAIL PROTECTED]
What do I need to change on my report to get the list of tests from this
data structure? What should the line check be? What should the
computed field be that displays the values?
Shirley Schoberg, MT(ASCP)
Programmer/Analyst
Samaritan Health Services - IS
Albany, OR
Phone: 541-812-4866
Cell: 541-979-1129
Fax: 541-812-4300
Confidentiality Notice: This e-mail message, including any attachments, is
for the sole use of the intended recipient(s) and may contain confidential
and privileged information. Any unauthorized review, use, disclosure or
distribution is prohibited. If you are not the intended recipient, please
contact the sender by reply e-mail and destroy all copies of the original
message.
begin 666 winmail.dat
M>)\^(@P6`0:0" `$```````!``$``0>[EMAIL PROTECTED](````Y 0```````#H``$(@ <`
M& ```$E032Y-:6-R;[EMAIL PROTECTED];"Y.;W1E`#$(`0V ! `"[EMAIL PROTECTED]"``$$
M@ $`,0```$Y04B!H96QP("[EMAIL PROTECTED](&[EMAIL
PROTECTED])O;2!S=&%N9&%R9"!D871A
M('-T<G5C='5R90`B$0$%@ ,[EMAIL PROTECTED]'[EMAIL PROTECTED]/[EMAIL
PROTECTED])``0`1 $!(( #``X`
M``#6!P8`#P`/`#8`"P`$`$8!`0F `0`A````,[EMAIL PROTECTED],X,SA"1#A$-$8T,#DP
M.#1$-#%",4(Y.$)&[EMAIL PROTECTED] <!`Y &`(@0```P````"P`"``$````#`"8`````
M``L`*P```````P`V``````! `#D`#)OOG,[EMAIL PROTECTED]>`#T``0````$`````````
[EMAIL PROTECTED]'``$````\````8SU54SMA/2 [<#U386UA<[EMAIL
PROTECTED]&5A;'1H.VP]4TA3
M15A64S Q+3 V,#8Q-3(R-30P.5HM,38R-C$`'@!P``$````Q````3E!2(&AE
M;' @+2!'970@:6YF;R!F<F]M('-T86YD87)D(&1A=&$@<W1R=6-T=7)E````
M``(!<[EMAIL PROTECTED]'&D,Z<X4,F&P2%/4YPK2"N).;OG \``!X`&@P!````
M$0```%-H:7)[EMAIL PROTECTED];V)E<F<`````'@[EMAIL PROTECTED](&AE;' @
M+2!'970@:6YF;R!F<F]M('-T86YD87)D(&1A=&$@<W1R=6-T=7)E``````(!
M"1 !````^ H``/0*```G&@``3%I&=44),<4#``H`<F-P9S$R-7(R#&!C,0,P
M`0<+8&Z1#A P,S,/%F9E#Y)/`?<"I [EMAIL PROTECTED]: K <X1E= +1<')Q,@``DBH*
MH6YO$E @, '0A0'[EMAIL PROTECTED]@,#4P-!0A\P'0%! T?0=M`H,`4 /4^Q'_$PMB$^$4
M4!.R&/04T/,'$P*#,C<1CQ=?&6(3X1\!T!0P%!(4$!2R0F]O"&[EMAIL PROTECTED](P:7%U
M86D"@S,X&GXR'O(;[EMAIL PROTECTED]>I#D?'Q1 TR!/(55Y<@*#-!8Q&IQ<,386
M,2.?`X)'"=%KOR44#E EGRC1)[EMAIL PROTECTED](<'<E% _ */XW&F$J/P."*,A(96()
M<'<I)10C87\L3B _+E8'$ &@#> O-379+[\X-C#O(51"!T >4'YC)10T819L
M(!@'$R&F-/\:83;=(U<X523V(C$6;":(?SA4*"@4,#OO*?<X5"N&-?\6/RTH
M.%0NRPY!05\WW#);_C4L$3P--%<X5#7I#C OK_\@&!WJ(:8.,#,_(TA+K"3U
M_PXP&F\FB$NK*"@.,!\/*>C[2ZLKAC(FDC-O5*],037FJP*1".8["6\P6C]E
M3.'_6VI,XEQ/75A;5$SB6]]?KY]?;5[O71];;Q!@,CAE.O]F468/9QE;5&="
M9:]I?VD]]VB_9N]JM#D.4&X$;[EMAIL PROTECTED] *"<W1Y; >0:)4)X'0``'$#(6QI
M`4"'!1 !0 /P9&-T; JQ/0!@<PJP<J ;$'+B;G6";0(`86%U=&\`8!AD:G5P
MT 409VAT+W(!"@%QT H!:0&0<##_`S%!,@P!#U<0& C0"<!R8#EVHVYP=OEX
ME ,P<V[\97@;8 >P!; `P )S$Q!<8W,/D ,P=&!D=<[EMAIL PROTECTED]'[EMAIL PROTECTED]@
M4(T*P&$)P'7@:"!&`B&-<),Q30!QDF9I+0^0GCAU4GY3<APN\&1R"5#W?_(6
MH'_R=S,A+O!S``'0_WM1<P]T'W4F?E-USW;?=^_]>/YB@; )@ (@A/%YXWVP
MLWQP=2%T+7T0`V$Z--!";XJP4W5B:@60=,&*L$1A=&4Z?60T8/]][W[_@ ^!
M'X([EMAIL PROTECTED]'[EMAIL PROTECTED]&P"X .$H3Q##"%)
Y0A:_/AK^'SXC?B>=297O0&S'^("[0
MD; $D'UD4"",?XV/[EMAIL PROTECTED]@<I +@&5Q`+U[T&P!0)&_DL^3U#"C\&4(
MT&(*L'0XE&B%AC)_(V 0%J6QEF034!N@'?!F/Y:_E\^8UZ2 F? +4'DO[WT@
MGE +$9IE<WUD4V";7_^<;YU_GH^0OZ&/A$^%7Y7O_Z>OJ+^ISZK2BM**=(NI
M(C"_<9]RK["?=,^RY*0S.;,O'[0_M4^V7YC(OV!$;V/WO* )\ 5 3;+P>K:O
MDWN&_;^'8P! PRA[,[EMAIL PROTECTED]"(*<[EMAIL PROTECTED] !:!M<!-B10#
W0,04W#B`=!PDS(`
M4+I__[N/O)^]K[+OP$_!7\)OF(M[RG#)4"W)<@8`S>#(@'1="'!E66,3$%I0
M=@)1(%![56YK$U!W%=%]W\M2UE#+D*Y!`8!NBS `8&\)\'N Q("[EMAIL PROTECTED] )
M;^IY"?!<>@!P<2 `( N0_Q-0?$&N0,P0`.$", )@`(#<8F0,,!-1"K!C`1 %
ML(]\0 (!>G"3LF5<: 6PDGK8`F1G`,!R9PN!G=S@:-L3-$ !06=VW:GGW&'-
MX+)A-S `4-XQWR7<[EMAIL PROTECTED]&!WW[/@Y/^+0-D0`' +,[EMAIL PROTECTED]<.#(,
Y0TG8(
MD'=K"X!D(V#BXO\$\ = $&$!0 X`KA)Q,,UPN^1%`A!OSA#,[EMAIL PROTECTED]@_Z#1
MUU+EU\X``,#-,,P0IN'_VH#.`,UQ"3+-H*#P`E '0/\+D.CA`E'C,<K0Y>#C
MT<N0_0)@=^FC`E$`( G RM#7@/QR:]N!QF(;41+RB\#)`$/8<1. 0SI<7(H`
M;[U\P6U]$ ,0!Y#M($T-X.<#8,[EMAIL PROTECTED] @[EMAIL
PROTECTED]>#<0%Y<[M8/D]CPR7(NF*!T
M_]:@&T#+D*KPSG)Z``% U]&_Y^ $D-Q [EMAIL PROTECTED],Q/P>_#4?!1CU>$3`@"
M!9!L_'9L`%#,L04`S.#T<0&[EMAIL PROTECTED]/+C,<3!`<'T81L0#W#/``#,L S0`9 @
M+M4T]':_#E#U$MG!]7_VC_>?; _ W\RP!8'Y3_I?^V]L(V#,L._J$/D?_=_^
MY"GWW$T`_*_[`8_^Q&([EMAIL PROTECTED]&+P<_]-!0( B"]5__">\*
M__?<4V (CPX/#Q\0+__TT"(P#0\2GQ.O%+0<$>4P_^3PS\"^8,K RJ_+O\S/
MS=\_SN_/_]$/TAM9D<;622#_/([EMAIL PROTECTED]"+P*KP3%#H`-9S2] \$'1]`$U:
M8!Z -XM0?0`<\"#),.S@:69[)$#DL'DCH"?QY+ ;8"#1Q+ L(&(<X"[EMAIL PROTECTED]
MYFRJ8"82($PEX#&0'+!S<-"K4"[EMAIL PROTECTED]'R([EMAIL
PROTECTED]@.S@,9!M)E"G$>A0[(#H
[EMAIL PROTECTED]&8(@&70:/QM/CQQ?'6^^E2*93$%">_"05%,@.?,@-"[EMAIL PROTECTED]/$E
M<B.T)"'$D'#0[5!@(!]P%!!S)2$G,(NP_R51Y+*K4"B ?*'$LBCQ(T#O>Y"J
M\"3 *&%B)E"^8'NA^>H`:7J3\2L0([EMAIL PROTECTED],N4TDY8!: '&0N-$,Y
MT,@P8RYH^:XP+C(H\2JU*K\KSRS?_RWO+O\P#"- [9$C83<R/]#_H) J8224
M?3#LX#8A'Y H\?TW>E0W>[EMAIL PROTECTED]"K020!B\#_%H H<[EMAIL PROTECTED] W>MKP\+
BF?,U
MT>6Q87DW>I/Q-WHH\=Y4*!&@[EMAIL PROTECTED] H88,V(HJP3$,]*T [EMAIL
PROTECTED]&!2Y&
[EMAIL PROTECTED]" 2/1;(B+^74L4K$"A,#8"B[ [EMAIL PROTECTED] JO!B[.!(Y3<RFH
E4>]&"BA2
M?3 G\W#N0-3B)"#_*'!-!DW#-E$G438C3S28H'GM\&XGQ.!Z`"[EMAIL PROTECTED])7_^2P
M&B C0%G06%%/L2@"%H'_U^"JTEI0R1#J\"824T)&\?\QD-1 [E(G($."VV%1
M)28`FS.Q)R!M[D(G(6)K)R#?XA$J((NP.F [EMAIL PROTECTED]([EMAIL PROTECTED]
ML$.16L$01T54+CE"3U)$`$52140N5$53]3$Q*%HS>.V0[*!:%#.Q[BE<AEVI
M-D)U\&"3XB?S_SSP4B%:P48,&A$S(%?P_Q'_/\'X\%,C)*-7=>QQQ,)(&H!$
M3UQ[/BA [EMAIL PROTECTED]:<[EMAIL PROTECTED]/ Y>3/=4)&I@(S%37?U(
M&ES5,DA(5G%/L9B@(S'_>?!&4C*1_G)[EMAIL PROTECTED]@%81O\ED'! 5U1C9D:$.#,V
M(V4<OC]N#T_'8R1+EU!0/[EMAIL PROTECTED]/$_0"0!3S1044^32.6K3#+LX';J`'7M
M\#\[QO](*3O+&=;*;SV//I\_KQY?_Q]O('\ACXP03S/;L$]@)0(_]#*&<3(!
MQ.!(([EMAIL PROTECTED](P@("+4+B(\(!BQWX9QR% 1L/0AI+$R
M#.#'$'[EMAIL PROTECTED] F05,72\ J4*M09R<@350HX$%30U I.[>%\8MC
M']^PB]^,Z>U%Q+!R+T'OR(%Z$,[EMAIL PROTECTED]@FG$1L"304ZM0XN#;
M0$\H<)G0B* [Q4%LF&!N[GDG(%\`.T90W&"9$+F `#4T,2TX,3(M4#0X-C8[
M-T.A,&SQEX0Y-SFL8)?POV [Q>A&87B7B3.C\'PO&A__?H]_GX"O@;^"SX/?
MA.\9;_^='[EMAIL PROTECTED]'L"7OY?0"O8!X`-1 !````1P```#PT038R
M149$,[EMAIL PROTECTED],R,4(S,[EMAIL PROTECTED](4T585E,P
M,2YI;G0N<V%M:&5A;'1H+FYE=#X```,[EMAIL PROTECTED]"P#R$ $````?`/,0`0``
M`&H```!.`% [EMAIL PROTECTED]@`&@`90!L`' `( `M`" `1P!E`'0`( !I`&[EMAIL
PROTECTED]" `
[EMAIL PROTECTED]&\`;[EMAIL PROTECTED]',`= !A`&X`9 !A`'(`9 [EMAIL
PROTECTED]&0`80!T`&$`( !S`'0`<@!U
M`&,`= !U`'(`90`N`$4`30!,```````+`/80`````$ `!S"R..V<SI#&`4 `
M"#!*W!2>SI#&`0,`WC^O;P```P#Q/PD$```>`/@_`0```!$```!3:&ER;&5Y
M(%-C:&]B97)G``````(!^3\!````70````````#<IT#(P$(0&K2Y" `K+^&"
[EMAIL PROTECTED]((%-%4E9)0T53+T]5/4%,0D%.
M62]#3CU214-)4$E%3E13+T-./5-30TA/0D52`````!X`^C\!````%0```%-Y
M<W1E;2!!9&UI;FES=')A=&]R``````(!^S\!````'@````````#<IT#(P$(0
M&K2Y" `K+^&"`0`````````N`````P`90 `````#`!I `````!X`,$ !````
M"0```%-30TA/0D52`````!X`,4 !````"0```%-30TA/0D52`````!X`.$ !
M````"0```%-30TA/0D52`````!X`.4 [EMAIL PROTECTED]"X````#`'9 _____P,`
M"5D#````"P"[EMAIL PROTECTED]@@[EMAIL PROTECTED]
```````$8`````#H4````````#`.F!"" &
M``````# [EMAIL PROTECTED](( 8``````, ```````!&
[EMAIL PROTECTED]@@[EMAIL PROTECTED] ```````$8`````$84````````#
M`/B!"" &``````# [EMAIL PROTECTED],`_X$(( 8``````, `
M``````!&`````!B%````````"P`@@@@@[EMAIL PROTECTED] ```````$8`````!H4`
M```````+`"D```````L`(P```````P`&$#Y8WGD#``<0K0,```,`$! `````
M`P`1$ `````>[EMAIL PROTECTED]&4```!)2$%614-214%4141!5$%32U=)5$A-141)
M5$5#2%1/4T5%24942$590T%.2$5,4$U%+$)55%5354%,3%E42$5,25-&05-4
M15)(15)%4TU94%)/0DQ%33I,04)$5%,Y-C T15A0``````(!?P`!````1P``
M`#PT038R149$,[EMAIL PROTECTED],R,4(S,[EMAIL PROTECTED](
>4T585E,P,2YI;G0N<V%M:&5A;'1H+FYE=#X``&2_
`
end
_______________________________________________
meditech-l mailing list
[email protected]
http://mtusers.com/mailman/listinfo/meditech-l