Routine: APCLTONI

Information

APCLRX91 ; IHS/OHPRD/TMJ - RX'S DISPENSED BY DATE/TIME ; [ 08/28/00 1:42 PM ]

Source file <APCLTONI.m>

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	PROC+3
^PSRX - [#52]	V1+1, PROC+1, HRSTART+2
^PSRX("AL"	V+1, V1+1
^XTMP("APCLCV"	START+3!

Name	Field # of Occurrence
^(0	V1+1

Name	Field # of Occurrence
>> APCL1	START+1, TBEFORE+1
>> APCL10	START+1, T1600+1
>> APCL11	START+1, T1700+1
>> APCL12	START+1, T1800+1
>> APCL13	START+2, T1900+1
>> APCL14	START+2, T2000+1
>> APCL15	START+2, T2100+1
>> APCL16	START+2, T2200+1
>> APCL17	START+2, TAFTER+1
>> APCL2	START+1, T0800+1
>> APCL3	START+1, T0900+1
>> APCL4	START+1, T1000+1
>> APCL5	START+1, T1100+1
>> APCL6	START+1, T1200+1
>> APCL7	START+1, T1300+1
>> APCL8	START+1, T1400+1
>> APCL9	START+1, T1500+1
APCLAP	EOJ!
>> APCLBT	START+1*, START+3
APCLCLN	EOJ!
APCLDISC	EOJ!
APCLDPTR	EOJ!
>> APCLED	V+1
>> APCLET	XIT+2*
>> APCLG	START+1*
>> APCLGO	START+1*
>> APCLGTOT	START+2, DOCOUNT+2
>> APCLJOB	START+1*, START+3
>> APCLLOC	PROC+1
APCLLOCC	EOJ!
>> APCLRXHR	HRSTART+3*, DOCOUNT+1, DOCOUNT+3, DOCOUNT+4, DOCOUNT+5, DOCOUNT+6, DOCOUNT+7, DOCOUNT+8, DOCOUNT+9, DOCOUNT+10 , DOCOUNT+11, DOCOUNT+12, DOCOUNT+13, DOCOUNT+14, DOCOUNT+15, DOCOUNT+16, DOCOUNT+17, DOCOUNT+18, DOCOUNT+19
>> APCLRXTM	HRSTART+2*, HRSTART+3
>> APCLSD	V+1*, V1+1
APCLSKIP	EOJ!
>> APCLVIEN	V1+1*, PROC+1, HRSTART+2
APCLVLOC	EOJ!
APCLVREC	V1+1*, PROC+2, EOJ!
>> DFN	PROC+2*, PROC+3
U	PROC+1, PROC+2, PROC+3, HRSTART+2
X	EOJ+1!
X1	EOJ+1!
X2	EOJ+1!