Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: QAMAUTO8

QAMAUTO8.m

Go to the documentation of this file.
QAMAUTO8 ;HISC/DAD-AUTO ENROLL CLEAN UP ;6/29/93  08:24
 ;;1.0;Clinical Monitoring System;;09/13/1993
 F QA=1:1 S X="C"_QA Q:$D(@X)[0  K @X
 K %,%DT,%H,%T,%ZIS,COND,D,D0,DA,DD,DIC,DIE,DIK,DINUM,DIQ,DIR,DLAYGO,DO,DR,DUPLICAT,ELEM,I,LEAPYEAR,LP,LP0,MAX,PAGE,PERCENT,POP,PROBLEM,QA,QA1,QA2,QADA,QAM,QAM1,QAMARUN,QAMAXDAY,QAMBULL,QAMC0,QAMC1,QAMCCODE,QAMCCOND,QAMCND,QAMCOND,QAMD0
 K QAMD1,QAMDA,QAMDATA,QAMDATE,QAMDAYS,QAMDD,QAMDENOM,QAMDFN,QAMDOM,QAMDT,QAMDT0,QAME0,QAME1,QAME2,QAMELEM,QAMEND,QAMEVENT,QAMFALL,QAMFALL0,QAMFG,QAMFLD,QAMFRAME,QAMGROUP,QAMHANG,QAMHD,QAMHD1,QAMHILO,QAMHISD0,QAMHIST,QAMLEVL,QAMMET,QAMNUMER
 K QAMONE,QAMONTH1,QAMONTH2,QAMONTHS,QAMPARAM,QAMPG,QAMPRG,QAMQBEG,QAMQEND,QAMQTIME,QAMQUIT,QAMRELAT,QAMSAMPL,QAMSSN,QAMST,QAMSTART,QAMTHRES,QAMTODAY,QAMWEEK,QAMWHEN,QAMZ,QAMZERO,QAQ2HED,QAQQUIT,QAQTART,TODAY,UNDL,X,X1,X2,XMB,XMDUZ,XMY,Y
 K ZTDESC,ZTDTH,ZTIO,ZTRTN,ZTSAVE,ZTSK
 K ^UTILITY($J,"QAM"),^("QAM CONDITION"),^("QAM FALL OUT"),^("QAM SAMPLE"),^("QAM TEMP")
 Q