1 | LROW4 ;SLC/CJS - LAB ORDER ENTRY, WARD (CONT.) ;8/11/97
|
---|
2 | ;;5.2;LAB SERVICE;**100,121**;Sep 27, 1994
|
---|
3 | LREND ;from LROW,LROR3
|
---|
4 | D EN2^LRDPA($G(DFN),0,0)
|
---|
5 | K LROT,LRORDER,%,A,DFN,DIC,DL,DR,DX,I,J,K,LRBED,LRCCOM,LRCDT,LRCOL,LRCOM,LRCS,LRCSN,LRCSP,LRCSS,LRCSX,LRDAX,LRDFN,LRDPF,LRDTO,LREND,LREXP,LRLLOC,LRLWC,LRMAX,LRMOR,LRNN,LRODT,LRORD,LROUTINE,LRPR,LRPRAC,LRSAMP,LRSN,LRSNO,LRSPEC,LRPREV
|
---|
6 | K %H,%X,%Y,DIWL,DIWR,DO,DPF,LRADDTST,LRFLOG,LRGCOM,LRIOZERO,LRM,LRNCWL,LRORDR,LRORDTIM,LRORIFN,LRSSX,LRSTIK,LRSVSN,LRTSTNM,LRTXD,LRTXP,LRWPC,LRMAX1,LRTIME,TT,LRY,LROLLOC,LRTREA
|
---|
7 | K LRSES,LRSPCDSC,LRSSP,LRTEST,LRTN,LRTP,LRTSTN,LRTX,LRTY,LRUNQ,LRUR,LRUSI,LRUSNM,LRXS,LRYR,PNM,S,SSN,T,X,X1,X3,Y,Z,VA("BID"),VA("PID")
|
---|
8 | K LRACN,LRACN0,LRCAPLOC,LRDOC,LRI,LRIO,LRJ,LRLL,LROD0,LROD1,LROD3,LRODTSV,LROOS,LROS,LROSD,LRROD,LRSNSV,LRTSTS,LRURG,NOW,LRIFN,X4,A,E
|
---|
9 | K LRCOM,LRIDIV,DIR,LRNATURE,LRTCOM
|
---|
10 | Q
|
---|