INSERT INTO Перечень ( ИДПеречень, Начальник, Примечание, Дата, Надбавка, ТСНпроцент, ИДПолучатель )
SELECT PROG_.NPRG_to, Switch(PROGCUST_SPEC.ID_PROJ= 12 , 6 ,PROGCUST_SPEC.ID_PROJ= 21 , 38 ,PROGCUST_SPEC.ID_PROJ= 22 , 28 ,PROGCUST_SPEC.ID_PROJ= 24 , 9 ,PROGCUST_SPEC.ID_PROJ In ( 4 , 5 , 7 , 8 , 10 , 11 , 13 , 14 , 15 , 25 , 27 , 28 , 29 , 30 , 31 , 32 ), 33 ,True,PROGCUST_SPEC.ID_PROJ) AS Проект, PROGCUST_SPEC.INF_PROG, DateAdd( "d" ,- 1 ,DateAdd( "m" , 1 ,DateSerial(Year(Date()),Month(Date()), 1 ))) AS Дата, IIf(PROGCUST_SPEC.TYPE_PRG= 2 ,- 1 , 1 ) AS Вид, PROGCUST_SPEC.PERC_TSN, IIf(IsNull(ОтделИх.ИДОтделИх),Switch(PROGCUST_SPEC.YS_FIL= 2 , 60446 ,PROGCUST_SPEC.YS_FIL= 3 , 60448 ,PROGCUST_SPEC.YS_FIL= 4 , 60447 ,PROGCUST_SPEC.YS_FIL= 5 , 60449 ),ERwin_Partners.ID_Old) AS Выражение3
FROM (((PROG_ INNER JOIN PROGCUST_SPEC ON PROG_.NPRG = PROGCUST_SPEC.NPRG) INNER JOIN (ERwin_Partners LEFT JOIN ОтделИх ON ERwin_Partners.ID_Old = ОтделИх.ИДПартнер) ON PROGCUST_SPEC.NKL_PAY = ERwin_Partners.ID_Part) INNER JOIN Applics_SPEC ON (PROG_.ID_Место = IIF(IsNull(Applics_SPEC.NUM_SPEC), 0 ,CInt(Applics_SPEC.NUM_SPEC))) AND (PROGCUST_SPEC.NPRG = Applics_SPEC.NPRG)) LEFT JOIN Перечень ON PROG_.NPRG_to = Перечень.ИДПеречень
WHERE (((Перечень.ИДПеречень) Is Null))
GROUP BY PROG_.NPRG_to, Switch(PROGCUST_SPEC.ID_PROJ= 12 , 6 ,PROGCUST_SPEC.ID_PROJ= 21 , 38 ,PROGCUST_SPEC.ID_PROJ= 22 , 28 ,PROGCUST_SPEC.ID_PROJ= 24 , 9 ,PROGCUST_SPEC.ID_PROJ In ( 4 , 5 , 7 , 8 , 10 , 11 , 13 , 14 , 15 , 25 , 27 , 28 , 29 , 30 , 31 , 32 ), 33 ,True,PROGCUST_SPEC.ID_PROJ), PROGCUST_SPEC.INF_PROG, DateAdd( "d" ,- 1 ,DateAdd( "m" , 1 ,DateSerial(Year(Date()),Month(Date()), 1 ))), IIf(PROGCUST_SPEC.TYPE_PRG= 2 ,- 1 , 1 ), PROGCUST_SPEC.PERC_TSN, IIf(IsNull(ОтделИх.ИДОтделИх),Switch(PROGCUST_SPEC.YS_FIL= 2 , 60446 ,PROGCUST_SPEC.YS_FIL= 3 , 60448 ,PROGCUST_SPEC.YS_FIL= 4 , 60447 ,PROGCUST_SPEC.YS_FIL= 5 , 60449 ),ERwin_Partners.ID_Old), PROG_.IsLoadHead, ОтделИх.ОТДЕЛ, IsNull([ОтделИх].[ОТДЕЛ])
HAVING (((PROG_.IsLoadHead)=- 1 ) AND ((ОтделИх.ОТДЕЛ)= "Все отделы" )) OR (((PROG_.IsLoadHead)=- 1 ) AND ((IsNull([ОтделИх].[ОТДЕЛ]))<>False));