IIf([CM_PRIMRY_DLVSEQ_1]>0,"2","") & IIf([CM_PRIMRY_DLVSEQ_2]>0,"3","") & IIf([CM_PRIMRY_DLVSEQ_3]>0,"4","") & IIf([CM_PRIMRY_DLVSEQ_4]>0,"5","")
& IIf([CM_PRIMRY_DLVSEQ_5]>0,"6","") & IIf([CM_PRIMRY_DLVSEQ_6]>0,"7","") & IIf([CM_PRIMRY_DLVSEQ_1]>0,"2","")
& IIf([CM_PRIMRY_DLVSEQ_2]>0,"3","") & IIf([CM_PRIMRY_DLVSEQ_3]>0,"4","") & IIf([CM_PRIMRY_DLVSEQ_4]>0,"5","")
& IIf([CM_PRIMRY_DLVSEQ_5]>0,"6","") & IIf([CM_PRIMRY_DLVSEQ_6]>0,"7","") AS DELDAZE,
Weekday(Now()) AS TODAY,
Switch([TODAY]<Left([DELDAZE],1),Left([DELDAZE],1),[TODAY]>=Left([DELDAZE],1)
And [TODAY]<Mid([DELDAZE],2,1),Mid([DELDAZE],2,1),[TODAY]>Left([DELDAZE],1)
And [TODAY]>=Mid([DELDAZE],2,1)
And [TODAY]<>Mid([DELDAZE],3,1),Mid([DELDAZE],3,1),[TODAY]>Left([DELDAZE],1)
And [TODAY]>Mid([DELDAZE],2,1)
And [TODAY]>=Mid([DELDAZE],3,1),Left([DELDAZE],1),[TODAY]=Mid([DELDAZE],4,1),Left([DELDAZE],1)) AS NOTHING,
IIf(([NOTHING]-[TODAY])<=0,([NOTHING]-[TODAY]+7),[NOTHING]-[TODAY]) AS [DAYS TIL NEXT],
[DELIVERY AFTER NEXT]-[NEXT DELIVERY] AS [DAYS TIL AFTER NEXT], Date()+[DAYS TIL NEXT] AS [NEXT DELIVERY],
Mid([DELDAZE],CDbl(InStr(1,[DELDAZE],[NOTHING]))+1,1) AS [AFTER NEXT],
[NEXT DELIVERY]+IIf(([AFTER NEXT]-[NOTHING])<=0,([AFTER NEXT]-[NOTHING]+7),[AFTER NEXT]-[NOTHING]) AS [DELIVERY AFTER NEXT]
SELECT
db2003_CUSMAS.CM_CUSTNO AS [Cust#],
db2003_CUSMAS.CM_STORNO AS [Store#],
[ORIGINAL ROUTES].FirstOfTH_ROUTNO AS [FIRST ROUTE],
db2003_CUSMAS.CM_CUSTMR_NAME AS Name,
db2003_CUSMAS.CM_PRIMRY_ROUTNO AS Route,
IIf([CM_PRIMRY_DLVSEQ_1]>0,"M",".") AS Mon,
IIf([CM_PRIMRY_DLVSEQ_2]>0,"T",".") AS Tue,
IIf([CM_PRIMRY_DLVSEQ_3]>0,"W",".") AS Wed,
IIf([CM_PRIMRY_DLVSEQ_4]>0,"Th",".") AS Thur,
IIf([CM_PRIMRY_DLVSEQ_5]>0,"F",".") AS Fri,
IIf([CM_PRIMRY_DLVSEQ_6]>0,"S",".") AS Sat,
[COOLER INFO].Notes,
[COOLER INFO].COOLER,
[COOLER INFO].DOORS,
[COOLER INFO].[Reset Date],
db2003_CUSMAS.CM_CUSTMR_NAME,
db2003_CUSMAS.CM_CUSTMR_ADDR_1,
db2003_CUSMAS.CM_CUSTMR_CITY,
db2003_CUSMAS.CM_CUSTMR_STAT,
db2003_CUSMAS.CM_CUSTMR_ZIPCOD,
db2003_CUSMAS.CM_PHNAREA,
db2003_CUSMAS.CM_PHNNBR,
db2003_CUSMAS.CM_SLSMAN,
IIf([CM_PRIMRY_DLVSEQ_1]>0,"2","") & IIf([CM_PRIMRY_DLVSEQ_2]>0,"3","") & IIf([CM_PRIMRY_DLVSEQ_3]>0,"4","") & IIf([CM_PRIMRY_DLVSEQ_4]>0,"5","") & IIf([CM_PRIMRY_DLVSEQ_5]>0,"6","") & IIf([CM_PRIMRY_DLVSEQ_6]>0,"7","") & IIf([CM_PRIMRY_DLVSEQ_1]>0,"2","") & IIf([CM_PRIMRY_DLVSEQ_2]>0,"3","") & IIf([CM_PRIMRY_DLVSEQ_3]>0,"4","") & IIf([CM_PRIMRY_DLVSEQ_4]>0,"5","") & IIf([CM_PRIMRY_DLVSEQ_5]>0,"6","") & IIf([CM_PRIMRY_DLVSEQ_6]>0,"7","") AS DELDAZE,
Weekday(Now()) AS TODAY,
Switch([TODAY]<Left([DELDAZE],1),Left([DELDAZE],1),[TODAY]>=Left([DELDAZE],1) And [TODAY]<Mid([DELDAZE],2,1),Mid([DELDAZE],2,1),[TODAY]>Left([DELDAZE],1) And [TODAY]>=Mid([DELDAZE],2,1) And [TODAY]<>Mid([DELDAZE],3,1),Mid([DELDAZE],3,1),[TODAY]>Left([DELDAZE],1) And [TODAY]>Mid([DELDAZE],2,1) And [TODAY]>=Mid([DELDAZE],3,1),Left([DELDAZE],1),[TODAY]=Mid([DELDAZE],4,1),Left([DELDAZE],1)) AS NOTHING, IIf(([NOTHING]-[TODAY])<=0,([NOTHING]-[TODAY]+7),[NOTHING]-[TODAY]) AS [DAYS TIL NEXT],
[DELIVERY AFTER NEXT]-[NEXT DELIVERY] AS [DAYS TIL AFTER NEXT], Date()+[DAYS TIL NEXT] AS [NEXT DELIVERY], Mid([DELDAZE],CDbl(InStr(1,[DELDAZE],[NOTHING]))+1,1) AS [AFTER NEXT], [NEXT DELIVERY]+IIf(([AFTER NEXT]-[NOTHING])<=0,([AFTER NEXT]-[NOTHING]+7),[AFTER NEXT]-[NOTHING]) AS [DELIVERY AFTER NEXT]
FROM
(db2003_CUSMAS INNER JOIN [ORIGINAL ROUTES] ON db2003_CUSMAS.CM_CUSTNO = [ORIGINAL ROUTES].CM_CUSTNO)
INNER JOIN [COOLER INFO] ON [ORIGINAL ROUTES].CM_CUSTNO = [COOLER INFO].[CUST#]
WHERE (((db2003_CUSMAS.CM_CHNID)="CV") AND ((db2003_CUSMAS.CM_ZONE)=3))
IIf([CM_PRIMRY_DLVSEQ_1]>0,"M",".") AS Mon,
IIf([CM_PRIMRY_DLVSEQ_2]>0,"T",".") AS Tue,
IIf([CM_PRIMRY_DLVSEQ_3]>0,"W",".") AS Wed,
IIf([CM_PRIMRY_DLVSEQ_4]>0,"Th",".") AS Thur,
IIf([CM_PRIMRY_DLVSEQ_5]>0,"F",".") AS Fri,
IIf([CM_PRIMRY_DLVSEQ_6]>0,"S",".") AS Sat,
CASE when CM_PRIMRY_DLVSEQ_1>0 then 'M' else '.' end AS Mon,
CASE when CM_PRIMRY_DLVSEQ_2>0 then 'T' else '.' end AS Tue,
CASE when CM_PRIMRY_DLVSEQ_3>0 then 'W' else '.' end AS Wed,
CASE when CM_PRIMRY_DLVSEQ_4>0 then 'TH' else '.' end AS Thur,
CASE when CM_PRIMRY_DLVSEQ_5>0 then 'F' else '.' end AS Fri,
CASE when CM_PRIMRY_DLVSEQ_6>0 then 'S' else '.' end AS Sat,
IIf([CM_PRIMRY_DLVSEQ_1]>0,"2","") & IIf([CM_PRIMRY_DLVSEQ_2]>0,"3","") & IIf([CM_PRIMRY_DLVSEQ_3]>0,"4","") & IIf([CM_PRIMRY_DLVSEQ_4]>0,"5","")
& IIf([CM_PRIMRY_DLVSEQ_5]>0,"6","") & IIf([CM_PRIMRY_DLVSEQ_6]>0,"7","") & IIf([CM_PRIMRY_DLVSEQ_1]>0,"2","")
& IIf([CM_PRIMRY_DLVSEQ_2]>0,"3","") & IIf([CM_PRIMRY_DLVSEQ_3]>0,"4","") & IIf([CM_PRIMRY_DLVSEQ_4]>0,"5","")
& IIf([CM_PRIMRY_DLVSEQ_5]>0,"6","") & IIf([CM_PRIMRY_DLVSEQ_6]>0,"7","") AS DELDAZE,
CASE when CM_PRIMRY_DLVSEQ_1>0 then '2' else ''
AND CM_PRIMRY_DLVSEQ_2>0 then '3' else ''
AND CM_PRIMRY_DLVSEQ_3>0 then '4' else '' END
Weekday(Now()) AS TODAY,
Switch([TODAY]<Left([DELDAZE],1),Left([DELDAZE],1),[TODAY]>=Left([DELDAZE],1)
And [TODAY]<Mid([DELDAZE],2,1),Mid([DELDAZE],2,1),[TODAY]>Left([DELDAZE],1)
And [TODAY]>=Mid([DELDAZE],2,1)
And [TODAY]<>Mid([DELDAZE],3,1),Mid([DELDAZE],3,1),[TODAY]>Left([DELDAZE],1)
And [TODAY]>Mid([DELDAZE],2,1)
And [TODAY]>=Mid([DELDAZE],3,1),Left([DELDAZE],1),[TODAY]=Mid([DELDAZE],4,1),Left([DELDAZE],1)) AS NOTHING,
to_char(sysdate,'D') as Today
CASE when CM_PRIMRY_DLVSEQ_1>0 then 'M' else '.' end AS Mon,
CASE when CM_PRIMRY_DLVSEQ_2>0 then 'T' else '.' end AS Tue,
CASE when CM_PRIMRY_DLVSEQ_3>0 then 'W' else '.' end AS Wed,
CASE when CM_PRIMRY_DLVSEQ_4>0 then 'TH' else '.' end AS Thur,
CASE when CM_PRIMRY_DLVSEQ_5>0 then 'F' else '.' end AS Fri,
CASE when CM_PRIMRY_DLVSEQ_6>0 then 'M' else '.' end AS Sat,
MON TUE WED THURS FRI SAT
--------------------------------------------
. T . TH . .
M . W . F .
. T . TH . S
M . . TH . .
. T . . F .
. T . . F .
. . W . F .
M . . TH . .
. T . . F .
. . W . . S
Mon Tue Wed Thur Fri Sat DELDAZE TODAY NOTHING DAYS TIL NEXT DAYS TIL AFTER NEXT NEXT DELIVERY AFTER NEXT DELIVERY AFTER NEXT
. T . Th . . 3535 4 5 1 5 10/4/2012 3 10/9/2012
M . W . F . 246246 4 6 2 3 10/5/2012 2 10/8/2012
M . W . F . 246246 4 6 2 3 10/5/2012 2 10/8/2012
. T . . F . 3636 4 6 2 4 10/5/2012 3 10/9/2012
. T . Th . S 357357 4 5 1 2 10/4/2012 7 10/6/2012
M . W . F . 246246 4 6 2 3 10/5/2012 2 10/8/2012
M . . Th . . 2525 4 5 1 4 10/4/2012 2 10/8/2012
M . . Th . . 2525 4 5 1 4 10/4/2012 2 10/8/2012
. T . . F . 3636 4 6 2 4 10/5/2012 3 10/9/2012
. . W . F . 4646 4 6 2 5 10/5/2012 4 10/10/2012
Switch([TODAY]<Left([DELDAZE],1),Left([DELDAZE],1),[TODAY]>=Left([DELDAZE],1)
And [TODAY]<Mid([DELDAZE],2,1),Mid([DELDAZE],2,1),[TODAY]>Left([DELDAZE],1)
And [TODAY]>=Mid([DELDAZE],2,1)
And [TODAY]<>Mid([DELDAZE],3,1),Mid([DELDAZE],3,1),[TODAY]>Left([DELDAZE],1)
And [TODAY]>Mid([DELDAZE],2,1)
And [TODAY]>=Mid([DELDAZE],3,1),Left([DELDAZE],1),[TODAY]=Mid([DELDAZE],4,1),Left([DELDAZE],1)) AS NOTHING,
CASE when CM_PRIMRY_DLVSEQ_1>0 then 'M' else '.' end AS Mon,
CASE when CM_PRIMRY_DLVSEQ_2>0 then 'T' else '.' end AS Tue,
CASE when CM_PRIMRY_DLVSEQ_3>0 then 'W' else '.' end AS Wed,
CASE when CM_PRIMRY_DLVSEQ_4>0 then 'TH' else '.' end AS Thur,
CASE when CM_PRIMRY_DLVSEQ_5>0 then 'F' else '.' end AS Fri,
CASE when CM_PRIMRY_DLVSEQ_6>0 then 'M' else '.' end AS Sat,
IIf([CM_PRIMRY_DLVSEQ_1]>0
To:
CASE when CM_PRIMRY_DLVSEQ_1>0 then 'M' else '.' end
Same for the rest.