MEDITECH.CUST.RPTS^HILLCREST BAPTIST MEDICAL CENTER^HIB^LIVE.MIS^LB-JU^20090107^D^ @@VERSION:1 LAB.M.SPEC.zcus.baclink2.sub.r2 @@PROC LAB.M.SPEC.zcus.baclink2.sub.r2 LAB.M.SPECzcus.baclink2.sub.r2UYY@ReportY @@MACRO LAB.M.SPEC.zcus.baclink2.sub.r2.M.detail 0 ;set up detail 1 ;%LAB.U.zcus.utils.M.loc.at.coll(@patient,@collection.date,@collection.time)^LR, 2 ;LR|0^LOCATION, 3 ;LR|1^ROOM @@RPT Yzcus.baclink2.sub.r2 LAB.M.SPEC antibioticsBACLINK DOWNLOAD SUB REPORTNONE1220066666lab.m.spec.antibioticsNNNYNlab.m.spec.collect.date.index011Y AT 910525776 LB-JUE CI F1 patient's.namepatient's.name30L F2 patient's.unit.number patient's.10L F2CLEN 20 F3 patient's.acct.number patient's.ac12L F3CLEN 20 F4 patient's.sexp1L F5 xx.dobxx.dob F5CDAT DATE10 F5CJFY L F5CLEN 10 F5CVAL @patient's.birthdate F6 xx.order.facilityxx.order.facility F6CDAT FREE F6CJFY L F6CLEN 30 F6CVAL IF{@order.location^order.location,@MIS.FACILITY.name[@First(MIS.LOCN.DICT.facility)]} F6CLVAL1 34 F6CLVAL2 51 F7 order.location's.typeo1L F8 patient's.admit.datepatient'8L F9 xx.admit.timexx.a F9CDAT FREE F9CJFY L F9CLEN 4 F9CVAL @ADM.PAT.admit.time[@patient] F10 order.location order.loca10L F11 patient's.location patient's.10L F12 patient's.room.bedpatient's.room14L F13 patient's.service patient's.10L F14 subm.doctor subm.docto10L F15 idid17L F16 collection.datecollecti8L F16CDAT DATE10 F16CJFY L F16CLEN 10 F16SE7 GE/BDATE/BDATE F16SE8 LE/EDATE/EDATE F17 collection.timecoll4L F18 source's.name source's.name30L F19 proc's.mnemonicproc's.mnemonic15L F20 org.name.wo.idorg.name.wo.id30L F20CLEN 40 F21 xx.susc.proc xx.susc.pr F21CDAT FREE F21CJFY L F21CLEN 10 F21CVAL @sen.proc's.mnemonic F22 sen.proc's.sensi.typesen3L F23 antibiotic's.nameantibiotic's.name30L F23CLEN 30 F24 xx.interpxx.inter F24CDAT FREE F24CJFY L F24CLEN 8 F24CVAL IF{@mic.value @mic.value;@kb.zone.size} F25 xx.reactionxx. F25CDAT FREE F25CJFY L F25CLEN 3 F25CVAL @reaction F26 proc.result.date proc.resul8L F26CDAT DATE10 F26CJFY L F26CLEN 10 F27 xx.resqx F27CDAT PINT F27CJFY R F27CLEN 1 F27CVAL IF{@res.q=@verified.res.q 1;0} F27SE5 EQ"1""1" F28 xx.reactx F28CDAT PINT F28CJFY R F28CLEN 1 F28CVAL IF{@reaction 1;0} F28SE6 EQ"1""1" FS1 urn FS1SE1 EQ /R.FRAG.ARG1 /R.FRAG.ARG1 FS2 proc FS2SE2 EQ /R.FRAG.ARG2 /R.FRAG.ARG2 FS3 res.q FS3SE3 EQ /R.FRAG.ARG3 /R.FRAG.ARG3 FS4 org.id FS4SE4 EQ /R.FRAG.ARG4 /R.FRAG.ARG4 FS5 prefix FS5SE9 EQ/PREFIX/PREFIX FI10 301 FI131 202 FI152 203 FI174 14 FI176 105 FI187 306 FI1118 17 FI1120 88 FI1129 49 FI1134 1010 FI1145 1011 FI1156 1412 FI1171 1013 FI1182 1014 FI20 1715 FI218 1016 FI229 417 FI234 3018 FI265 1519 FI281 4020 FI2122 1021 FI2133 322 FI2137 3023 FI2168 824 FI2177 325 FI2181 1026 I1 coll.date.x L1 D L1CNL NO L2 D N1 FD 44 N2 SFF NO N3 EFF NO N4 RL 400 P1 patient's.name________________ patient's.__________ patient's.ac________ p xx.dob____ xx.order.facility_____________ o patient' xx.a order.loca patient's. patient's.room patient's. subm.docto P2 id_______________ collecti__ coll source's.name_________________ proc's.mnemonic org.name.wo.id__________________________ xx.susc.pr sen antibiotic's.name_____________ xx.inter xx. proc.resul T1 collection.dateNONENASC T2 prefixNONENASC T3 number.partNONENASC T4 urnNONENASC T5 procNONENASC T6 res.qNONENASC T7 org.idNONENASC T8 sen.procNONENASC T9 antibioticNONENASC U 910525838 LB-JULIVE.MIS U 910526038 LB-JULIVE.MIS U 910526039 LB-JULIVE.MIS U 910526040 LB-JULIVE.MIS U 910526041 LB-JULIVE.MIS U 910526042 LB-JULIVE.MIS U 910526379 LB-JULIVE.MIS U 910526380 LB-JULIVE.MIS U 910526381 LB-JULIVE.MIS U 910526382 LB-JULIVE.MIS @@SCRN Yzcus.baclink2.sub.r2 LAB.M.SPECLAB.M.SPEC.zcus.baclink2.sub.r22NN CS 4648 P1 BACLINK DOWNLOAD SUB REPORT %Z.on.device