// проверка наличия незарегистрированных комм. актов ===НАЧАЛО sSQL := 'SELECT' + ' DOC_NO,DOC_DATETIME,DOC_ORDER_NUMBER,DOC_REG_STATUS' + ' FROM KRD_DOP' + ' WHERE' + ' PLACEID=' + KRD_MAIN.PLACEID + ' AND ID=' + KRD_MAIN.ID + ' AND (DOC_REG_STATUS <> ' +char(39)+ '3' +char(39)+ ' OR DOC_REG_STATUS IS NULL)'; OPENQUERY ('qUnregisteredCommActs', 'STS_DB', sSQL, 1); IF (FIELDISNULL ('qUnregisteredCommActs', 'DOC_NO') = 0, Block( bError := 1; sGroupName := 'ДО-2: Связанные документы'; AddError ( sGroupName, 'Ошибка', 'Отсутствует регистрация в коммерческих актах', 'КА №№ ' + UNIONVALUES ('qUnregisteredCommActs', ['DOC_NO'], ',', ''), 'Данные о товарах в программе инспектора могут отличаться. Рекомендуется сначала дождаться регистрации коммерчески актов и только потом переходить к оформлению ДО-2', sErrorsListId, 0 ); // AddError ) ); // IF CLOSEDATASET ('qUnregisteredCommActs'); // проверка наличия незарегистрированных комм. актов ====КОНЕЦ