1 | GMRCCLR ;SLC/DLT - Kill-off all variables used for consults tracking. ;5/20/98 14:20
|
---|
2 | ;;3.0;CONSULT/REQUEST TRACKING;**1**;DEC 27, 1997
|
---|
3 | CLRTRK ;SLC-IRMFO/DCM; Kill-off all variables used to display consults
|
---|
4 | K ^TMP("GMRCR",$J),^TMP("GMRCS",$J)
|
---|
5 | K ^TMP("GMRC",$J),^TMP("GMRCSLIST",$J)
|
---|
6 | K X,BLK,CDT,CNT,DA,DFN,D0,J1,NO,PL,TO,WP,FLG,LIN,POP,SEX,STS,TAB,BKLN,DATA,PROC,URG,WRD,LINE,LNCT,GMRC(0),GMRC(40),GMRCD,GMRCCT,GMRCD1,GMRCO,GMRCRB,GMRCSEX,GMRCDT,LASTA,LINE,ORIFN,GMRCDA,GMRCDG,GMRCDOB,GMRCLA,GMRCND,GMRCNO,GMRCSN
|
---|
7 | K DSPLINE,CTRLCOL,GMRCDGT,GMRCDT1,GMRCDT2,GMRCGRP,GMRCIFN,GMRCLA1,GMRCAGE,GMRCDGT,GMRCHDR,GMRCPNM,GMRCPRT,GMRCQUT,GMRCSSN,GMRCPTN,GMRCSVC,GMRCPRNM,GMRCPROC,GMRCSSNM,GMRCWARD,ORACTION
|
---|
8 | K GMRCA,GMRCFMDT,GMRCOR,GMRCWT,GMRCOPT,GMRCSS,GMRCACTM,GMRCWRD,GMRCNUL,GMRCVP,GMRCQIT,GMRCORNP,GMRCUSER,GMRCORVP,GMRCOER,GMRCXMF,GMRCSEL,GMRC
|
---|
9 | Q
|
---|