//====================================================================== Функция CREATE_VIEW_ManufactureTechTasks() ТекстЗапроса=" |IF OBJECT_ID('dbo.ManufactureTechTasks') IS NOT NULL | select 1 |else | select 0 |"; ЕстьПредставление=RecordSet_CurrentBase.ВыполнитьСкалярный(ТекстЗапроса); Если ЕстьПредставление=0 Тогда ТекстЗапроса=" |CREATE VIEW DBO.ManufactureTechTasks |AS( |SELECT | ManufactureTechTask.IDDOC IDDOC | ,cast(rtrim(ltrim( | (STUFF | ((SELECT '+' + RTRIM(Colaborators.DESCR) | FROM dbo."+MetaDataWork.ИмяТаблицыТабличнойЧасти("ТехЗаданиеНаПроизводство")+" AS ManufactureTechTaskLines WITH (NOLOCK) | INNER JOIN dbo."+MetaDataWork.ИмяТаблицыСправочника("Сотрудники")+" AS Colaborators WITH (NOLOCK) | ON ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","Менеджер")+" = Colaborators.ID | WHERE (ManufactureTechTask.IDDOC = ManufactureTechTaskLines.IDDOC) | AND(ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","TABLEID")+" = 'ПараметрыЗаказчиков') | GROUP BY Colaborators.DESCR | FOR XML PATH('')), 1, 1, '') | ) | )) as char(256)) AS Managers | ,( | SELECT TOP 1 Colaborators.ID | FROM dbo."+MetaDataWork.ИмяТаблицыТабличнойЧасти("ТехЗаданиеНаПроизводство")+" AS ManufactureTechTaskLines WITH (NOLOCK) | INNER JOIN dbo."+MetaDataWork.ИмяТаблицыСправочника("Сотрудники")+" AS Colaborators WITH (NOLOCK) | ON ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","Менеджер")+" = Colaborators.ID | WHERE (ManufactureTechTask.IDDOC = ManufactureTechTaskLines.IDDOC) | AND(ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","TABLEID")+" = 'ПараметрыЗаказчиков') | ORDER BY ManufactureTechTaskLines.LINENO_ | ) | AS Manager1 | ,cast(rtrim(ltrim( | (STUFF | ((SELECT '+' + RTRIM(Журнал.DOCNO) | FROM dbo."+MetaDataWork.ИмяТаблицыТабличнойЧасти("ТехЗаданиеНаПроизводство")+" AS ManufactureTechTaskLines WITH (NOLOCK) | INNER JOIN _1SJOURN AS Журнал WITH (NOLOCK) ON ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","Заказ")+" = Журнал.IDDOC | WHERE (ManufactureTechTask.IDDOC = ManufactureTechTaskLines.IDDOC) | AND(ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","TABLEID")+" = 'ПараметрыЗаказчиков') | GROUP BY Журнал.DOCNO | FOR XML PATH('')), 1, 1, '') | ))) as char(256)) | AS Orders | ,( | SELECT TOP 1 Заказы.IDDOC | FROM dbo."+MetaDataWork.ИмяТаблицыТабличнойЧасти("ТехЗаданиеНаПроизводство")+" AS ManufactureTechTaskLines WITH (NOLOCK) | INNER JOIN dbo."+MetaDataWork.ИмяТаблицыШапки("ЗаказВакиля")+" AS Заказы WITH (NOLOCK) | ON ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","Заказ")+" = Заказы.IDDOC | WHERE ManufactureTechTask.IDDOC = ManufactureTechTaskLines.IDDOC | AND(ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","TABLEID")+" = 'ПараметрыЗаказчиков') | ORDER BY ManufactureTechTaskLines.LINENO_ | ) | AS Order1 | ,cast(rtrim(ltrim( | (STUFF | ((SELECT '+' + RTRIM(Counterparts.DESCR) | FROM dbo."+MetaDataWork.ИмяТаблицыТабличнойЧасти("ТехЗаданиеНаПроизводство")+" AS ManufactureTechTaskLines WITH (NOLOCK) | INNER JOIN dbo."+MetaDataWork.ИмяТаблицыСправочника("Контрагенты")+" AS Counterparts WITH (NOLOCK) | ON ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","Заказчик")+" = Counterparts.ID | WHERE (ManufactureTechTask.IDDOC = ManufactureTechTaskLines.IDDOC) | AND(ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","TABLEID")+" = 'ПараметрыЗаказчиков') | GROUP BY Counterparts.DESCR | FOR XML PATH('')), 1, 1, '') | ) | )) as char(256)) AS Customers | ,( | SELECT TOP 1 Counterparts.ID | FROM dbo."+MetaDataWork.ИмяТаблицыТабличнойЧасти("ТехЗаданиеНаПроизводство")+" AS ManufactureTechTaskLines WITH (NOLOCK) | INNER JOIN dbo."+MetaDataWork.ИмяТаблицыСправочника("Контрагенты")+" AS Counterparts WITH (NOLOCK) | ON ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","Заказчик")+" = Counterparts.ID | WHERE (ManufactureTechTask.IDDOC = ManufactureTechTaskLines.IDDOC) | AND(ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","TABLEID")+" = 'ПараметрыЗаказчиков') | ORDER BY ManufactureTechTaskLines.LINENO_ | ) | AS Customer1 | ,cast(rtrim(ltrim( | (STUFF | ((SELECT '+' + RTRIM(Nomenclatures.DESCR) | FROM dbo."+MetaDataWork.ИмяТаблицыТабличнойЧасти("ТехЗаданиеНаПроизводство")+" AS ManufactureTechTaskLines WITH (NOLOCK) | INNER JOIN dbo."+MetaDataWork.ИмяТаблицыСправочника("ТМЦ")+" AS Nomenclatures WITH (NOLOCK) | ON ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","ТМЦ")+" = Nomenclatures.ID | WHERE (ManufactureTechTask.IDDOC = ManufactureTechTaskLines.IDDOC) | AND(ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","TABLEID")+" = 'ПараметрыДизайнов') | GROUP BY Nomenclatures.DESCR | FOR XML PATH('')), 1, 1, '') | ) | )) as char(256)) AS Designs | ,( | SELECT TOP 1 Nomenclatures.ID | FROM dbo."+MetaDataWork.ИмяТаблицыТабличнойЧасти("ТехЗаданиеНаПроизводство")+" AS ManufactureTechTaskLines WITH (NOLOCK) | INNER JOIN dbo."+MetaDataWork.ИмяТаблицыСправочника("ТМЦ")+" AS Nomenclatures WITH (NOLOCK) | ON ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","ТМЦ")+" = Nomenclatures.ID | WHERE (ManufactureTechTask.IDDOC = ManufactureTechTaskLines.IDDOC) | AND(ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","TABLEID")+" = 'ПараметрыДизайнов') | ORDER BY ManufactureTechTaskLines.LINENO_ | ) | AS Design1 | ,cast(rtrim(ltrim( | (STUFF | ((SELECT '+' + RTRIM(MaterialTypes.DESCR) | FROM dbo."+MetaDataWork.ИмяТаблицыТабличнойЧасти("ТехЗаданиеНаПроизводство")+" AS ManufactureTechTaskLines WITH (NOLOCK) | INNER JOIN dbo."+MetaDataWork.ИмяТаблицыСправочника("ВидыСырья")+" AS MaterialTypes WITH (NOLOCK) | ON ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","ВидМатериала")+" = MaterialTypes.ID | WHERE (ManufactureTechTask.IDDOC = ManufactureTechTaskLines.IDDOC) | and ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","TABLEID")+" = 'РасчетноеСырье' | GROUP BY MaterialTypes.DESCR | FOR XML PATH('')), 1, 1, '') | ) | )) as char(256)) AS Materials | | ,(SELECT TOP 1 | MaterialTypes.ID [ВидМатериала $Справочник.ВидыСырья] | FROM dbo."+MetaDataWork.ИмяТаблицыТабличнойЧасти("ТехЗаданиеНаПроизводство")+" AS ManufactureTechTaskLines WITH (NOLOCK) | INNER JOIN dbo."+MetaDataWork.ИмяТаблицыСправочника("ВидыСырья")+" as MaterialTypes | ON ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","ВидМатериала")+" = MaterialTypes.ID | WHERE (ManufactureTechTask.IDDOC = ManufactureTechTaskLines.IDDOC) | AND (ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","TABLEID")+" = 'РасчетноеСырье') | AND (ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","Номер")+"= 1) | ) as Material1 | ,(SELECT TOP 1 | MaterialTypes.ID [ВидМатериала $Справочник.ВидыСырья] | FROM dbo."+MetaDataWork.ИмяТаблицыТабличнойЧасти("ТехЗаданиеНаПроизводство")+" AS ManufactureTechTaskLines WITH (NOLOCK) | INNER JOIN dbo."+MetaDataWork.ИмяТаблицыСправочника("ВидыСырья")+" as MaterialTypes | ON ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","ВидМатериала")+" = MaterialTypes.ID | WHERE (ManufactureTechTask.IDDOC = ManufactureTechTaskLines.IDDOC) | AND (ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","TABLEID")+" = 'РасчетноеСырье') | AND (ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","Номер")+"= 2) | ) as Material2 | ,(SELECT TOP 1 | MaterialTypes.ID [ВидМатериала $Справочник.ВидыСырья] | FROM dbo."+MetaDataWork.ИмяТаблицыТабличнойЧасти("ТехЗаданиеНаПроизводство")+" AS ManufactureTechTaskLines WITH (NOLOCK) | INNER JOIN dbo."+MetaDataWork.ИмяТаблицыСправочника("ВидыСырья")+" as MaterialTypes | ON ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","ВидМатериала")+" = MaterialTypes.ID | WHERE (ManufactureTechTask.IDDOC = ManufactureTechTaskLines.IDDOC) | AND (ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","TABLEID")+" = 'РасчетноеСырье') | AND (ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","Номер")+"= 3) | ) as Material3 | ,(SELECT TOP 1 | ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","Формат")+" | FROM dbo."+MetaDataWork.ИмяТаблицыТабличнойЧасти("ТехЗаданиеНаПроизводство")+" AS ManufactureTechTaskLines WITH (NOLOCK) | INNER JOIN dbo."+MetaDataWork.ИмяТаблицыСправочника("ВидыСырья")+" as MaterialTypes | ON ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","ВидМатериала")+" = MaterialTypes.ID | WHERE (ManufactureTechTask.IDDOC = ManufactureTechTaskLines.IDDOC) | AND (ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","TABLEID")+" = 'РасчетноеСырье') | AND (ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","Номер")+"= 1) | ) AS Format1 | ,(SELECT TOP 1 | ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","Формат")+" | FROM dbo."+MetaDataWork.ИмяТаблицыТабличнойЧасти("ТехЗаданиеНаПроизводство")+" AS ManufactureTechTaskLines WITH (NOLOCK) | INNER JOIN dbo."+MetaDataWork.ИмяТаблицыСправочника("ВидыСырья")+" as MaterialTypes | ON ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","ВидМатериала")+" = MaterialTypes.ID | WHERE (ManufactureTechTask.IDDOC = ManufactureTechTaskLines.IDDOC) | AND (ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","TABLEID")+" = 'РасчетноеСырье') | AND (ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","Номер")+"= 2) | ) AS Format2 | ,(SELECT TOP 1 | ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","Формат")+" | FROM dbo."+MetaDataWork.ИмяТаблицыТабличнойЧасти("ТехЗаданиеНаПроизводство")+" AS ManufactureTechTaskLines WITH (NOLOCK) | INNER JOIN dbo."+MetaDataWork.ИмяТаблицыСправочника("ВидыСырья")+" as MaterialTypes | ON ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","ВидМатериала")+" = MaterialTypes.ID | WHERE (ManufactureTechTask.IDDOC = ManufactureTechTaskLines.IDDOC) | AND (ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","TABLEID")+" = 'РасчетноеСырье') | AND (ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","Номер")+"= 3) | ) AS Format3 | ,cast(rtrim(ltrim( | (STUFF | ((SELECT '+' + ltrim(rtrim(cast(ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","РазверткаДизайна")+" as char(50)))) | FROM dbo."+MetaDataWork.ИмяТаблицыТабличнойЧасти("ТехЗаданиеНаПроизводство")+" AS ManufactureTechTaskLines WITH (NOLOCK) | WHERE ManufactureTechTask.IDDOC = ManufactureTechTaskLines.IDDOC | and ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","TABLEID")+" = 'ПараметрыДизайнов' | GROUP BY ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","РазверткаДизайна")+" | FOR XML PATH('')), 1, 1, '') | ) | )) as char(256)) AS PrintingRolls | ,ManufactureTechTask.sp"+MetaDataWork.ИДРеквизитаШапки("ТехЗаданиеНаПроизводство","ШиринаРезиновогоВала")+" AS LaminationRollWidth | ,ManufactureTechTask.sp"+MetaDataWork.ИДРеквизитаШапки("ТехЗаданиеНаПроизводство","ДиаметрВтулки")+" AS Core //| ,ManufactureTechTask.sp"+MetaDataWork.ИДРеквизитаШапки("ТехЗаданиеНаПроизводство","Примечание")+" AS Remark | ,( | SELECT TOP 1 Machines.ID | FROM dbo."+MetaDataWork.ИмяТаблицыТабличнойЧасти("ТехЗаданиеНаПроизводство")+" AS ManufactureTechTaskLines WITH (NOLOCK) | INNER JOIN dbo."+MetaDataWork.ИмяТаблицыСправочника("Машины")+" AS Machines WITH (NOLOCK) | ON ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","Машина")+" = Machines.ID | WHERE (ManufactureTechTask.IDDOC = ManufactureTechTaskLines.IDDOC) | AND ManufactureTechTaskLines.sp"+MetaDataWork.ИДРеквизитаТабличнойЧасти("ТехЗаданиеНаПроизводство","Операция")+" = $Перечисление.ОперацииПроизв.Печать | ORDER BY ManufactureTechTaskLines.LINENO_ | ) | AS PrintingMachine | ,(case when ManufactureTechTask.sp"+MetaDataWork.ИДРеквизитаШапки("ТехЗаданиеНаПроизводство","фПечать")+" = 1 then | ManufactureTechTask.sp"+MetaDataWork.ИДРеквизитаШапки("ТехЗаданиеНаПроизводство","ВидПечати")+" | else '' end) | as PrintType | ,ManufactureTechTask.sp"+MetaDataWork.ИДРеквизитаШапки("ТехЗаданиеНаПроизводство","фПодписьМенеджера")+" AS fManager | ,ManufactureTechTask.sp"+MetaDataWork.ИДРеквизитаШапки("ТехЗаданиеНаПроизводство","фПодписьЭкономиста")+" AS fEkonomist | ,ManufactureTechTask.sp"+MetaDataWork.ИДРеквизитаШапки("ТехЗаданиеНаПроизводство","фПодписьПлановогоОтдела")+" AS fPlanningDepartment | ,ManufactureTechTask.sp"+MetaDataWork.ИДРеквизитаШапки("ТехЗаданиеНаПроизводство","фПодписьРуководителя")+" AS fChief | ,ManufactureTechTask.sp"+MetaDataWork.ИДРеквизитаШапки("ТехЗаданиеНаПроизводство","фПодписьДизайнера")+" AS fDesigner | ,cast(ManufactureTechTask.$ОбщийРеквизит.Примечание as char(256)) Remark |FROM | dbo."+MetaDataWork.ИмяТаблицыШапки("ТехЗаданиеНаПроизводство")+" AS ManufactureTechTask WITH (NOLOCK) |) |"; ТекстЗапроса = MetaDataWork.ОбрМетаСКЛ(ТекстЗапроса); //Сообщить(ТекстЗапроса); рез=RecordSet_CurrentBase.Выполнить(ТекстЗапроса); Если рез = 0 Тогда ТекстОшибки=RecordSet_CurrentBase.ПолучитьОписаниеОшибки(); Возврат 0; Иначе Возврат 1; КонецЕсли; КонецЕсли; Возврат 1; КонецФункции