source: WorldVistAEHR/trunk/r/PAID-PRS/PRSEKILL.m@ 949

Last change on this file since 949 was 613, checked in by George Lilly, 15 years ago

initial load of WorldVistAEHR

File size: 2.2 KB
Line 
1PRSEKILL ;HISC/DAD-CLEAN-UP ;11/23/94 12:32
2 ;;4.0;PAID;**5,46**;Sep 21, 1995
3 ;
4 K PCOUNT,C,CLASS,CLASSERV,CLASSIEN,CLASSNUM,CLASSTXT,COMPLIAN,CORGCODE
5 K CORGCOST,COSTCEN,COUNT,D,D0,D1,D2,DA,DAT,DATA,DATE,DATSEL,DC,DD,DDH
6 K DEF,DI,DIC,DIDEL,DIE,DIEL,DIFQ,DIFROM,DIK,DINUM,DIPE,DIR,DIROUT,DIRUT
7 K DIG,DIH,DIV
8 K DIU,DIZ,DK,DL,DLAYGO,DM,DO,DOUT,DP,DQ,DR,DR1,DROPDEAD,DTOUT,DUOUT,DUP
9 K DW,FOUND,FREQ,HDRCLAS,HDRDATE,HOLD,HOLD1,HOLD2,HOSP,I,IEN,II,III,IOP,J
10 K LAST,LASTDATE,LASTDAY,LNTH,MN,MONTH,N0,N1,N2,NAM,NCD,NCD1,NCLAS,NCNT
11 K NCTR,NDA,NDATA,NDUPSW,NI,NIC,NIC1,NLOC,NOD1,NOD2,NOUT,NPC,NPCT,NQ,NQT
12 K NSCT,NSORT,NSP,NSPC,NSW,NSW1,NSW2,NURSOUT,ONESERV,PAIDVER,PCNT,PDA
13 K PDATA,PDATE,PHD,PHRS,POP,POUT,PRCOD,PRDA,PRDAT,PRMI,PRS454,PRSCLAS
14 K PRSDA,PRSE,PRSE1,PRSE132,PRSE2,PRSE200,PRSEACC,PRSEACT,PRSEAQ,PRSEBAD
15 K PRSECAL,PRSECAT,PRSECD0,PRSECEU,PRSECHOF,PRSECHON,PRSECHR,PRSECLA
16 K PRSECLAS,PRSECLS,PRSECLS1,PRSECNT,PRSECOD,PRSECOM,PRSECORD,PRSED0
17 K PRSED1,PRSEDA,PRSEDA1,PRSEDAA,PRSEDAT,PRSEDATA,PRSEDATE,PRSEDCOS
18 K PRSEDEF,PRSEDONE,PRSEDT,PRSEDT1,PRSEDTAS,PRSEDUP,PRSEDUPL,PRSEED
19 K PRSEEDAT,PRSEEDT,PRSEEMP,PRSEEND,PRSEFIL,PRSEFILE,PRSEGD0,PRSEGD1
20 K PRSEGF,PRSEGLO,PRSEGOV,PRSEGRP,PRSEHOUR,PRSEI,PRSEICOS,PRSEIEN,PRSEII
21 K PRSELCL,PRSELEN,PRSELNG,PRSELOC,PRSEMAX,PRSEMI,PRSEMISC,PRSEN,PRSENAM
22 K PRSENAME,PRSEND,PRSENEW,PRSENM,PRSENODE,PRSENOW,PRSENTR,PRSENALL,PRSEORG
23 K PRSEOUT,PRSEPAGE,PRSEPD1,PRSEPOS,PRSEPREV,PRSEPRNT,PRSEPROG,PRSEPURP
24 K PRSEQUIT,PRSEQWIK,PRSERES,PRSEROU,PRSEROUT,PRSESAVX,PRSESEL,PRSESER,PRSESERV
25 K PRSESL,PRSESLF,PRSESOR,PRSESORT,PRSESP1,PRSESP2,PRSESRCE,PRSESRV
26 K PRSESSN,PRSESTRT,PRSESTUD,PRSESUP,PRSESVC,PRSESW,PRSESWP,PRSETAB
27 K PRSETL,PRSETRN,PRSETXT,PRSETYED,PRSETYP,PRSETYPE,PRSEUNDL,PRSEVER
28 K PRSEW,PRSEX,PRSEXMY,PRSEY,PRSEZ,PRSPCD0,PRSPDA,PRSVC,PRSW,PRSX,PRSXSW
29 K RCNT,RHRS,PRDATA,PRX,PSP,PSPC,PSV,PSVC,PTAB,PURDA,PURP,PYR,REGSW,SAVEDA,SCNT,SE1,SER
30 K VA450DA,SHRS,SSN,TMP,TOT,TYP,VA,VA200,VA200DA,W,WRITE,X,X1,X2,X3,XT1,XT2,XT3
31 K XT4,XX,XX1,XX2,XXX,Y,YEAR,YR,YRCHK,YREND,YRST,YY,YYY,Z,ZZ,ZZZ,ZTQUEUED,ZTREQ
32 ; *** Kernel variables
33 K %,%1,%2,%3,%DT,%TG,%W,%X,%XD1,%Y,%Y1,%ZIS
34 K XMDUZ,XMSUB,XMTEXT,XMY
35 K XQA,XQAMSG
36 K ZTDESC,ZTDTH,ZTIO,ZTRTN,ZTSAVE,ZTSK
37 Q
Note: See TracBrowser for help on using the repository browser.