All messages should be posted in plain text. HTML will be converted to
attachments. The meditech-l web site is MTUsers.com
======================================
Meditech came through and pointed me to KB 17924 which solved my
problem.
-----Original Message-----
From: Shirley Schoberg
Sent: Thursday, June 15, 2006 3:54 PM
To: Meditech-L (E-mail)
Subject: NPR help - Get info from standard data
structure
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>)\^(BL/`0:0" `$```````!``$``0>[EMAIL PROTECTED](````Y 0```````#H``$(@ <`
M& ```$E032Y-:6-R;[EMAIL PROTECTED];"Y.;W1E`#$(`0V ! `"[EMAIL PROTECTED]"``$$
M@ $`-0```%)%.B!.4%(@:&5L<" M($=E="!I;F9O(&9R;VT@<W1A;F1A<F0@
M9&%T82!S=')U8W1U<F4`$Q(!!8 #``X```#6!P8`$ `(`"[EMAIL PROTECTED]"
M`P`.````U@<&`! `" `L`"H`!0!6`0$)@ $`(0```#!&,C<Q-#1"[EMAIL PROTECTED]@Y
M-#9",3,Q,[EMAIL PROTECTED],D,[EMAIL PROTECTED]/<&[EMAIL PROTECTED] ``,@[EMAIL
PROTECTED]
M```````#`"X```````(!,0`!````30$``%!#1$9%0C Y``$``@"'````````
M`#BANQ %Y1 :H;L(`"LJ5L(``$5-4TU$0BY$3$P``````````!M5^B"J9A'-
[EMAIL PROTECTED]@`OQ%H,````4TA315A64S Q`"]O/5-A;6%R:71A;B!(96%L=&@@4V5R
M=FEC97,O;W4]06QB86YY+V-N/5)E8VEP:65N=',O8VX]<W-C:&]B97([EMAIL PROTECTED]
M```````3<^Q9Y/:>1:SW.?Y,RF 4`0`]W^,$H[G4$:/%``-'",I,```(1S7E
[EMAIL PROTECTED]<^Q9Y/:>1:SW.?Y,RF 4`0`]W^,$H[G4$:/%``-'
M",I,```(1S7F```0````#R<[EMAIL PROTECTED]:Q,3ABR&B<[EMAIL PROTECTED](&AE
M;' @+2!'970@:6YF;R!F<F]M('-T86YD87)D(&1A=&$@<W1R=6-T=7)E````
M``,[EMAIL PROTECTED] `Y`-# NLA;D<8!'@`]``$````%````4D4Z( `````"`4<`
M`0```#P```!C/553.V$](#MP/5-A;6%R:71A;B!(96%L=&@[;#U32%-%6%93
M,#$M,#8P-C$V,[EMAIL PROTECTED]@`>`' ``0```#$```!.4%(@:&5L<" M
M($=E="!I;F9O(&9R;VT@<W1A;F1A<[EMAIL PROTECTED]&%T82!S=')U8W1U<[EMAIL PROTECTED]
M``$````;`````<:0SISA0R8;!(4]3G"M(*XDYN^<#P`C/G*0`!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 !````X0P``-T,``!B(@``3%I&=7QG?\(#``H`<F-P9S$R-?(R#&!C,0,P
M`0(`4 $!10M@;@X0,#,S#Q9F/F4/D@'W`J0#8P([EMAIL PROTECTED]"L!S970"T7!R<4HR
M```J"J%N;Q)0(!8P`= !T#8/H# U,,XT%"$!T!00-'T';0*#[P!0`]01_Q,+
M8A/A%% 3LL\8]!30!Q,"@S(W$8\77W\98A/A`= 4,!02%! 4LD(@;V]K($$"
M,&EQ)'5A`H,S-AI^,C.*.!N$( =M($-%'J1/&F\9<2!/(55Y<AZD.;D:?C$V
M%C$CGP."1PG1[FL"@Q10)8\V#E FSP-SWE0(<"AT%C$EK3<B,2H_(0."*$AE
[EMAIL PROTECTED]'0J`2Q.(#\N5@<0`: -X'<O-0_ */XX'P$Q#P."0OL'0!Y08RAT
M(V$6;" 8!Q-Y(:8T-3:_(U<X523U-/\B,19L)[EMAIL PROTECTED]"@I,-$\#BH&_SA4*X<E
M<3P-+3<X5"[+%##O04\PQT+E,FHU%C\T2#A4_S7I#C(?+S#6'>[EMAIL PROTECTED],S__
M(TA+K"3U#C Y,26O3D],0?\H* XP'P\IZ$NK*X8.,"5_7S1([EMAIL PROTECTED]".8[
M"6\P_5H_95 !6VI0`EQ/75A;5/]0`EO?7Z]?;5[O71];;[EMAIL PROTECTED](X93IF468/
M9QE;5&="OV6O:7]I/6B_9N]JM#D.4!]N!&]A9X-O8 *"<W1YJFP'D&@)X'0`
M`'$#(3QL:0% !1 !0 /P9&/L=&P*L0!@<PJP<J ;$!%RXFYU;0(`86%UQ'1O
M`&!D:G5PT 40>&=H='(!"@%QT H!:?D!D' P`S%'[EMAIL PROTECTED]<0&,\(T G <F!V
MHVYP=OEXE.$#,'-N97@;8 >P!;#G`, "<Q,08W,/D ,P='7 :[EMAIL PROTECTED]
M$'00:38`(% *P&$)P'7@:&[EMAIL PROTECTED]@(A<),Q.3!QDF;T:2T/D#AU4GY3<APN\+QD
M<@E0?_(6H'_R=SDA_R[P<P`!T'M1<P]T'W4F?E/O=<]VWW?O>/YB@; )@ (@
MGX3Q>>-]L'QP=2%T+7T0%0-A.C30;XJP4W5B"FH%D'2*L$1A=&7^.GUD4V!]
M[W[_@ ^!'X(O_X,_A$QQ()&P"X .$H3Q##!_A20.4(6OAK^'SXC?B>=2]F5[
MT!LQ("[0D; $D'UD_R(PC'[EMAIL PROTECTED]@<I#M"X!E<0![T&P!0)&_DL\M
MD]0PH_ (T&(*L'0X^Y1HA88R(V 0%J6QEF034/L;H!WP9I:_E\^8UZ2 F?!Y
M"[EMAIL PROTECTED] +$9IE<_]]9##0FU^<;YU_GH^0OZ&/_X1/A5^5[Z>OJ+^ISZK2
MBM+_BG2+J5: <9]RK["?=,^RY/VD,SFS+[0_M4^V7YC(OV"X1&]CO* )\ 5
M3;+P_W"3# &L#ZT?KB^O/[Q/O5__LF^_S\#?P>_"_WGRR4&*#_V+'#'%- !0
MQ;_&S\??R.__R?_+#Z*?D^^4_\Y?SV_0?__1BIG\T\4.4-1?U6_6?]>/_Y^?
[EMAIL PROTECTED]/%#\#C3__D7^5OYG_8G^E_S!_-
M+]W/_^^?\*_QO[C/TZ5Z\NV@>UG]^S=C#O#^V'[EMAIL PROTECTED] :6Q3
M<.+MH/_%-'W$NK_WS_C?O>_[+_P_S_U/[EMAIL PROTECTED]([EMAIL PROTECTED]
M`@<V`J__`[._800_!4-]D%I0\D$%BBXV66,<`%I0=EH!('O(56YK[N!W;EEA
M!X+'%U 'P/9!9G1NBS ((*]:T'N Q([EMAIL PROTECTED]'0)<.IY6M!<>@!P<2!9\%"0
[EMAIL PROTECTED]'V0 A &2!DQ-!;$+INPT!D[*#NX A!8WP0'[EMAIL PROTECTED]
#4'IAVY)E7&@E
M>F!Z&0)D9WJ <F=[OF =T6@<$S1 *- =X';/'JD=80H0^F$W,#T`'S&Y("4Y
M."-@'G(=8'<@L_\AY(M &A!0@ UP&0$%\ 4`J2H`=FDO$&N^8&0VH#DCXG-C
M"& ,T2C0<&??]A)Q,'MP)44<8&\*0 A _?)[EMAIL PROTECTED],$84B;7"C!Z@'\)8 A
M[M$;@ HP":%:`5S_"=#HX%H`"&!0D"[EMAIL PROTECTED],=\'`";@)-$'P%L0=RJC6@'/
M6?!K0 <`&(!R:QR!`S+M<5 P%E(!P&WR0(NQ.*"H.EQ<T=!O?,%M?1#W!<!Q
M$"[EMAIL PROTECTED]@4% %,[EMAIL PROTECTED]"!/9O1 '$ N("_6##/K&?
%HBZ8H'07H.(@!\#_JO *
MHGH`1" [EMAIL PROTECTED] =0.<QXNBR#4(S-D0@,>-\%!YC%N$680C@,>%L=FS_/0`(
MX2]0"1 U<;ZP6? U\OLD,<3!-P.Q". \@ P0?8#M".!T>A!,4"X6-#5V2?#?
M-A(:[EMAIL PROTECTED] &2 Z7SMO/'_ML [EMAIL PROTECTED]<85 ]
MKT*/\3_$8B H29%#KS6C4V#_05]&'T<O2#\UT)LP28(V7_]*[TO_.-QK($F/
M3P]0'U$O_S70NE!.#U.?5*]5M"5 JM'_)4 [EMAIL PROTECTED] &WP?O"/\*#W\+'PPO
M#3\.2WV $;(3(TT_96"^H-,@?0`DT,2P('07&[EMAIL PROTECTED]@(",1('!O"]'Q:" @
M9/)O($M"SB";(&[EMAIL PROTECTED]:#" ?0!_!3 UP&[EMAIL PROTECTED] N] T*6H(@6G1;
M/UQ/75__7F^^E6.9:-]IXEAR:D]K7_]L;U\$6')[EMAIL PROTECTED]&)K;6M7
[EMAIL PROTECTED]< !H6%]:3!CD0-A[4_3[:'NY2 M>3)/(#,%8>ED0'-S?+!E>3-O
M"UK6_YL?]-#TD/4?]B_W/^>/Z)__^8]]4NK_[ _M'^XO[S]B^_<#\=)$+6!A
M51!W!-+09V!U?J!E%4!39*!H</- 9_X@;OQ[J*OO?5]^;W]_@([EMAIL PROTECTED]
M80^(CV,GA<!W/WUX35/$P2X0BMB9CWAZ5 )H$2!S9&%Y+"!L2G6WL&;@-9Z@
M`[ PD1'@,SHU`I!036\&_YD?G/^>`=*PFZ^A;WC49$;L+4Q5(!!4*: ?H]^:
MN0_2]:,/J ]XU$Y04B"G);!Q('D@($<M`""^8/D<8"!F`5%GH+ZP&.#RPO^>
M<$ 1;-$V,!$2C*];&'!?_Y'_DP]SCY4_ED^77XE?IKCK`F(#TTFLH&$#(5<@
M\Q#G9B) (+ZP<[EMAIL PROTECTED]>(@XC!I>1!E((O17R306R"LL\2PGJ!B
MLW @7;/@=;)P%3&]L2"F$&G.<[EMAIL PROTECTED] !P'(NC(#B4/$S(7)Q=2: XC# `&@H
M$CIO!4Q!9M!$5%/\(#DT( *0&@%:\L `(?'W9H*[1+NQ8[/AK=&V(%40_G-D
M<;[ &8!DH26R\T"MH?]Z4&[EMAIL PROTECTED] @;K0$C `X&4@/;_Q8A5 7T 20;)P:7H'
MV]&MI,*Q+D,N4TESR;!7@&0NQA/*( 4`8^0N:)[EMAIL PROTECTED] @6\%;P7_NM ND;KQ
MR0)LX(&@:(&\)/[EMAIL PROTECTED]&4"V]' @[EMAIL PROTECTED] <T.*!_V8Q`<!7@,
`LA#B,(@`+[!_
M$C FL9Z SGB!TF3 );!C#[P0O_''\@& 3$,]*W9 RM//%2[/DC& T(1;^"(B
M7<ZT]$""0,?2&8#_9Z =8!R0`.",0-!IPW [EMAIL PROTECTED]<[EMAIL PROTECTED]<#" $1+_
M99# `-,6T]/((;[AQ_/51//@@"[P;B<OL.$`O_#'4NY7);!;(+K0;(A O!#5
MP?^_DJX'%0$<T-UCV5+0`0*0_QX`+U*>H,X2'&'7-7D0Q8']GJ!M+T*^L76P
MGJ!EHQF ^\JPC(!%UU.>X;[EMAIL PROTECTED]@&5!`P">X7D!1T54`B[)DD]21$52
M1:!$+E1%4\,[EMAIL PROTECTED]/) X"[EMAIL PROTECTED]<@2=07 [EMAIL PROTECTED]/
M'%L10""NG+PDW84M<[EMAIL PROTECTED]&03UQ[/BA R9*R3,[EMAIL
PROTECTED])T--J<[EMAIL PROTECTED]
[EMAIL PROTECTED] Y>TP?:-.^P(S%37?Y<=N#<@=7!_T"ZP?^PSV+_Q&%#0L[Q6R!H(=Y6
M9J!Z8+_=9.EVSY2ML\?SKIP_\=5_U?7I--&GC$#W;[LA`6!P_[-P9C'51-9A
MU:/4-=)"O[#J=K)P=2[P/\NL>TT&I_^Q+[(_LT^T7[5OMG^WCV+K_]5#$J#5
M<&12%E((0</[EMAIL PROTECTED]@05543^606#A43$GEL&[EMAIL PROTECTED]
@(OT07B)I,%5!"$$4
M<%*PF0/\9C)\0'4P.;"JOYJJBYT!GJ!-5"A!4T-0?BFYF0TDJI]X:RY%9/!R
MO"]!>='\8"^P;P53+I!_`) [EMAIL PROTECTED] `\+Q1FU!R/R/@'$# `*T`"G!O!4%L
MW<80;IZ1Y1!N]E =8('[EMAIL PROTECTED] [EMAIL PROTECTED],[EMAIL
PROTECTED]"0&P]&50Y9P".
MD!G ;N=&8?IX&5DSA0#]O["/`!\!+_\"/P-/!%\%;P9_F-):;Q[O_Q__(0\B
M'R,O)#\E3P;?=3HG,L%V26\&?0`S$ ```!X`-1 !````1P```#PT038R149$
M,[EMAIL PROTECTED],R,4(S,[EMAIL PROTECTED](4T585E,P,2YI
M;G0N<V%M:&5A;'1H+FYE=#X``!X`0A !````1P```#PT038R149$,[EMAIL PROTECTED]
M130V0D4Q-S,R,4(S,[EMAIL PROTECTED](4T585E,P,2YI;G0N<V%M
M:&5A;'1H+FYE=#X```,[EMAIL PROTECTED]'P#S$ [EMAIL PROTECTED]"4`,P!!`" `
[EMAIL PROTECTED](`( !H`&4`; !P`" [EMAIL PROTECTED]<`90!T`" `:0!N`&8`;[EMAIL
PROTECTED]&8`<@!O
M`&T`( !S`'0`80!N`&0`80!R`&0`( !D`&$`= !A`" `<P!T`'(`=0!C`'0`
M=0!R`&[EMAIL PROTECTED] ``````"P#V$ ````! ``<[EMAIL PROTECTED] [EMAIL
PROTECTED]&
[EMAIL PROTECTED],`\3\)! ``'@#X/P$````1````4VAI<FQE>2!38VAO
M8F5R9P`````"`?D_`0```%T`````````W*= R,!"[EMAIL PROTECTED]@@$`````
M````+T\]4T%-05))5$%.($A%04Q42"!315)624-%4R]/53U!3$)!3EDO0TX]
M4D5#25!)14Y44R]#3CU34T-(3T)[EMAIL PROTECTED]>`/H_`0```!4```!3>7-T96T@
M061M:6YI<W1R871O<@`````"`?L_`0```!X`````````W*= R,!"[EMAIL PROTECTED]
M*R_A@@[EMAIL PROTECTED],`_3_D! ```P`90 `````#`!I `````!X`,$ !
M````"0```%-30TA/0D52`````!X`,4 !````"0```%-30TA/0D52`````!X`
M.$ !````"0```%-30TA/0D52`````!X`.4 [EMAIL PROTECTED]"X````#`'9 ____
M_P,`"5D#````"P"[EMAIL PROTECTED]@@[EMAIL PROTECTED]
```````$8`````#H4````````#`.F!
M"" &``````# [EMAIL PROTECTED](( 8``````, `````
M``!&[EMAIL PROTECTED]@@[EMAIL PROTECTED] ```````$8`````$84`````
M```#`/B!"" &``````# [EMAIL PROTECTED],`_X$(( 8`````
M`, ```````!&`````!B%````````"P`@@@@@[EMAIL PROTECTED] ```````$8`````
M!H4````````+`"D``0````L`(P```````P`&[EMAIL PROTECTED]: #``<0>@0```,`$! `
M`````P`1$ `````>[EMAIL PROTECTED]&4```!-141)5$5#2$-!34542%)/54=(04Y$
M4$])3E1%1$U%5$]+0C$W.3(T5TA)0TA33TQ6141-65!23T),14TM+2TM+4]2
M24=)3D%,34534T%'12TM+2TM1E)/33I32$E23$594T-(``````(!?P`!````
M1P```#PT038R149$,[EMAIL PROTECTED],R,4(S,[EMAIL PROTECTED]
A0%-(4T585E,P,2YI;G0N<V%M:&5A;'1H+FYE=#X``(8J
`
end
_______________________________________________
meditech-l mailing list
[email protected]
http://mtusers.com/mailman/listinfo/meditech-l
