/ КОМПЬЮТЕРЫ И ПО / Языки программирования / 1С для программиста

Выпуск № 486
от 01.05.2007, 20:05

Вопрос № 84.282

Доброго здоровья, Уважаемые Специалисты!Есть проблемка(и желательно поскорее её решить).В УСН при проведении документа от 17.12.2006 "Начисление ЗП" программа документ не проводит и выдает следующее сообщение: БухИт.ВыполнитьЗапрос(ДатаУСН, КонецМесяцаДокумента, "70,ДФЛ.01",,, 2, "Месяц"); {Документ.НачислениеЗП.Модуль Документа(130)}: Неправильно задан период! Данну строку в модуле док-та нашел, а что там поменять пока не знаю.Может подскажете? - Желательно поскорее! С уважением Александр.

Отправлен: 26.04.2007, 10:16 Вопрос задал: Alex81 (статус: Посетитель) Всего ответов: 3 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Шахрайчук Владимир Анатольевич Здравствуйте, Alex81! Однозначно, что ДатаУСН больше чем КонецМесяцаДокумента. Ничего в модуле менять, скорее всего, не нужно. Нужно посмотреть, откуда берется ДатаУСН. Или она задается через константу, или привязана к последнему документу выплаты зарплаты, или вычисляется еще как-то. Когда Вы поймете, что такое ДатаУСН, Вы сможете с ней бороться. То ли подправить на время константу, то ли сделать поздние документы непроведенными, и провести их по очереди, то ли еще как нибудь. К сожалению, я не знаю УСН, потому что с Украины, у нас другие конфигурации.

Ответ отправил: Шахрайчук Владимир Анатольевич (статус: Студент) Ответ отправлен: 26.04.2007, 10:33 Оценка за ответ: 5 Комментарий оценки: Большое спасибо! - И на самом деле поменял дату перехода на УСН в константах(стояла 01.01.2007г) на 01.12.2006г - все стало ОК!

Отвечает: BigHard Здравствуйте, Alex81! Разберитесь, что такое ДатаУСН и КонецМесяцаДокумента. Скорее всего ДатаУСН у вас больше чем КонецМесяцаДокумента --------- Чем отличается чайник от программиста: У чайника в одном килобайте 1000 байт, а у программиста в одном километре 1024 метра

Ответ отправил: BigHard (статус: Студент) Ответ отправлен: 26.04.2007, 10:36 Оценка за ответ: 4 Комментарий оценки: Спасибо!Помог ответ эксперта Шахрайчук Владимир Анатольевич - просто поставил дату перехода на УСН(в константах)с 01.01.2007г. на 01.12.2006г. - документ провелся.Все работает!

Отвечает: Vlad Skorochod Здравствуйте, Alex81! Смотрим в константах дату перехода на УСН.

Ответ отправил: Vlad Skorochod (статус: 3-ий класс) Ответ отправлен: 26.04.2007, 10:53 Оценка за ответ: 5 Комментарий оценки: Ещё раз большое спасибо!Но уже помог ответ эксперта Шахрайчук Владимир Анатольевич.Все работает!

Вопрос № 84.293

Здравствуйте!! Документ имеет реквизит табличной части товар с типом значения <справочник>, в процедуре приНачалеВыбораЗначения определены справочники для открытия Материалы и Оборудование , почему когда я открываю новый документ у меня сразу выскакивает окошко с выбором справочников и как это можно исправить, если же открываю сохраненный документ то все нормально. Надеюсь понятно обяъяснила

Отправлен: 26.04.2007, 11:16 Вопрос задал: Fifina (статус: Посетитель) Всего ответов: 4 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Андрей Тимофеев Здравствуйте, Fifina! Потому, что у Вас определено 2 справочника для выбора. Попробуйте приНачалеРедактирования определить один справочник для выбора, думаю, что по заполненой шапке документа можно будет понять какой именно Вам нужен справочник. Удачи.

Ответ отправил: Андрей Тимофеев (статус: 3-ий класс) Ответ отправлен: 26.04.2007, 11:50

Отвечает: svsrus Здравствуйте, Fifina! ВидыДляВыбора(<?>) Синтаксис: ВидыДляВыбора(<СписокВидов>) Назначение: Установка выбираемых видов для справочника неопределенного вида. Возвращает: Строковое значение, содержащее текущий список видов выбираемых справочников, разделенных запятыми (на момент до исполнения метода). Параметры: <СписокВидов> - строка, содержащая список видов выбираемых справочников, разделенных запятыми. Замечание: Метод можно использовать только для объектов-справочников неопределенного вида, созданных функцией СоздатьОбъект, либо определенных в конфигураторе как реквизит диалога или реквизит другого объекта.

Ответ отправил: svsrus (статус: 5-ый класс) Ответ отправлен: 26.04.2007, 13:08 Оценка за ответ: 3

Отвечает: Николай Александрович Здравствуйте, Fifina! Вы не уточнили, какая платформа у Вас установлена, я могу объяснить только для версии 7.7. Я не знаю, какое ИМЕННО окно у Вас выскакивает, но если у Вас окно с выбором выскакивает в первой строке документа на реквизите "Товар", то могу предположить следующее: скорее всего у Вас в процедуре "ВводНового" создаётся одна строка, и организован переход на редактирование этой строки в реквизит "Товар". Потому что строка сама по себе (при создании нового документа) не создаётся. Выбор может выскочить при нажатии первый раз курсором в табличную часть. А если у вас выскакивает независимое от документа окно, то это тоже в процедуре "ВводНового". Только там должны быть строки для открытия какой-то обработки: ОткрытьФорму("Обработка.НаименованиеФормы", ... , ...). Если эти строки заблокировать, то всё должно быть нормально. Если не получится, можете переслать модуль документа мне на почту, я посмотрю и подскажу... Удачи!

Ответ отправил: Николай Александрович (статус: 1-ый класс) Ответ отправлен: 26.04.2007, 13:48 Оценка за ответ: 5

Отвечает: Ovr1970 Здравствуйте, Fifina! Скорее всего Ваш реквизит первый в табличной части, и 1С слегка глючит при создании первой строки. Попробуйте продублировать выбор в процедуре "ПриВводеСтроки()" или "ПриНачалеРедактированияСтроки"

Ответ отправил: Ovr1970 (статус: Практикант) Ответ отправлен: 26.04.2007, 19:25 Оценка за ответ: 4

Вопрос № 84.312

Уважаемые эксперты! Необходимо записать в текстовый файл строку вместе с символом ". Как это сделать? И еще не подскажите как в 1С можно работать с xml документами.

Отправлен: 26.04.2007, 14:16 Вопрос задал: Radik (статус: Посетитель) Всего ответов: 6 Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Шахрайчук Владимир Анатольевич Здравствуйте, Radik! 1.МояСтрока="НужнаяСтрока""с двумя кавычками""." 2.За xml отвечает внешняя компонента addin.dll, которая перед работой грузится коммандой ЗагрузитьВнешнююКомпоненту(... У меня есть образец отчета, который выгружает данные в xml. Кроме того, можно строить файл xml как Текст, самостоятельно вписывая туда теги.

Ответ отправил: Шахрайчук Владимир Анатольевич (статус: Студент) Ответ отправлен: 26.04.2007, 15:05

Отвечает: Pycuk Здравствуйте, Radik! Пишеш в двойных кавычках 2 одинарные 'на английская раскладке двойные можно на русской'

Ответ отправил: Pycuk (статус: 1-ый класс) Ответ отправлен: 26.04.2007, 15:29

Отвечает: DERL.KG Здравствуйте, Radik! >>Необходимо записать в текстовый файл строку вместе с символом " Надо две кавычки ставить... например Сообщить("ОсОО ""Ремстрой""");

Ответ отправил: DERL.KG (статус: 2-ой класс) Ответ отправлен: 26.04.2007, 16:55

Отвечает: Ovr1970 Здравствуйте, Radik! Кавычки задаются двойным повторением т.е. Стр="Начало "" конец" Оптимально работать с XML через MS парсер , который всегда ставится вместе с Explorer 5.5 и выше Примерно такой код Приложение: //NODE_ELEMENT=(1); //NODE_ATTRIBUTE=(2); //NODE_COMMENT=(8); //БЕЗ имени //NODE_TEXT=(3); //БЕЗ имени //NODE_CDATA_SECTION=(4); // сложно //NODE_ENTITY_REFERENCE=(5); // сложно //NODE_ENTITY=(6); // сложно //NODE_PROCESSING_INSTRUCTION=(7); // сложно //NODE_DOCUMENT=(9); // сложно //NODE_DOCUMENT_TYPE=(10); // сложно //NODE_DOCUMENT_FRAGMENT=(11); // сложно //NODE_NOTATION=(12); // сложно Процедура ЧитатьТабЧасть(Док, Root) Перем nodeList,Pattern,Attrib; nodeList = Root.selectNodes("./*"); nodeList.reset(); Для Инд=0 по nodelist.Length-1 Цикл Pattern=nodeList.NextNode().SelectNodes("./*"); Док.НоваяСтрока(); Для ном=0 по Pattern.Length-1 Цикл Attrib=Pattern.NextNode(); Док.УстановитьАтрибут(Attrib.NodeName,ЗначениеИзСтроки(Attrib.text)); КонецЦикла; КонецЦикла; КонецПроцедуры Процедура ИмпортДокументов(xmlDoc) Перем nodeList; nodeList = xmlDoc.selectSingleNode("//Docs"); Попытка Если Число(nodeList.getAttribute("Версия"))=0 Тогда Сообщить("Неправильная версия файла!"); Возврат; КонецЕсли; Исключение Сообщить("Неправильная версия файла!"); Возврат; КонецПопытки; nodeList = nodeList.selectNodes("./Doc"); nodeList.reset(); Для Инд=0 по nodelist.Length-1 Цикл Doc=nodeList.NextNode(); ТекДок=ИмпортДокумента(Doc); КонецЦикла; КонецПроцедуры Процедура ОбновитьРеквизиты(ИмяКаталога, ИмяФайла) Перем nodeList,xmlDoc; Перем Инд,НовТип,Представление,Комментарий; xmlDoc = СоздатьОбъект("MSXML.DOMDocument"); xmlDoc.async = 0; xmlDoc.validateOnParse = -1; Если Прав(СокрП(ИмяКаталога),1)<>"" Тогда ИмяКаталога=СокрЛП(ИмяКаталога)+""; КонецЕсли; СтарыйТип.УдалитьВсе(); СтарыйТип.ДобавитьЗначение("","Все документы"); СтарыйТип.ТекущаяСтрока(1); Если ФС.СуществуетФайл(СокрП(ИмяКаталога)+ИмяФайла)=0 Тогда Возврат; КонецЕсли; xmlDoc.Load(СокрП(ИмяКаталога)+ИмяФайла); Попытка nodeList = xmlDoc.selectSingleNode("//Docs"); nodeList = nodeList.selectNodes("./Doc"); Исключение Сообщить("Неправильный формат файла!"); ИмяФайла=""; Возврат; КонецПопытки; nodeList.reset(); Для Инд=0 по nodelist.Length-1 Цикл xmlDoc=nodeList.NextNode(); НовТип=xmlDoc.selectSingleNode("ТипДок").Text; Если СтарыйТип.НайтиЗначение(НовТип)=0 Тогда Попытка Если НовТип=Метаданные.Документ(НовТип).Идентификатор Тогда Представление = Метаданные.Документ(НовТип).Представление(); Комментарий = Метаданные.Документ(НовТип).Комментарий; Если ПустаяСтрока(Комментарий) = 0 Тогда Представление = Представление + " (" + Комментарий +")"; КонецЕсли; Иначе Представление=НовТип; КонецЕсли; Исключение Представление=НовТип; КонецПопытки; СтарыйТип.ДобавитьЗначение(НовТип, Представление); КонецЕсли; КонецЦикла; КонецПроцедуры

Ответ отправил: Ovr1970 (статус: Практикант) Ответ отправлен: 26.04.2007, 19:30

Отвечает: Ноговицин Роман Викторович Здравствуйте, Radik! Строка " записывается вот так: Сообщить(""""+"Строка"+"""");

Ответ отправил: Ноговицин Роман Викторович (статус: 1-ый класс) Ответ отправлен: 27.04.2007, 00:42

Отвечает: Игорь К. Здравствуйте, Radik! XML документы можно обрабатывать с помощью объекта Addin.xmlParser. который находится в V7Plus.DLL Пример чтения XML файла и сам файл в приложении. Приложение: Перем ИмяПути,ИмяФайла; Перем xmlParser; //_____________________________________________________________________________ //пример чтения xml файла. Функция УстановитьКомпоненту() Если ЗагрузитьВнешнююКомпоненту(КаталогИБ()+"ExtFormsv7plus.dll")=0 Тогда Если ЗагрузитьВнешнююКомпоненту("v7plus.dll")=0 Тогда Сообщить("Не удалось обнаружить компоненту V7Plus.dll!"); Возврат 0; КонецЕсли; КонецЕсли; Попытка xmlParser = СоздатьОбъект("Addin.XmlParser") ; Исключение Сообщить("Не удалось создать объект Addin.XmlParser!"); Возврат 0; КонецПопытки; Возврат 1; КонецФункции // УстановитьКомпоненту //_____________________________________________________________________________ Процедура Выполнить() стрИмяФайла=ИмяПути+ИмяФайла; таб=СоздатьОбъект("ТаблицаЗначений"); таб.НоваяКолонка("Ф","Строка",50,0); таб.НоваяКолонка("И","Строка",50,0); таб.НоваяКолонка("О","Строка",50,0); таб.НоваяКолонка("ДатаР","Дата"); таб.НоваяКолонка("_01","Число",16,2); таб.НоваяКолонка("_02","Число",16,2); таб.НоваяКолонка("_03","Число",16,2); таб.НоваяКолонка("_04","Число",16,2); таб.НоваяКолонка("_05","Число",16,2); таб.НоваяКолонка("_06","Число",16,2); таб.НоваяКолонка("_07","Число",16,2); таб.НоваяКолонка("_08","Число",16,2); таб.НоваяКолонка("_09","Число",16,2); таб.НоваяКолонка("_10","Число",16,2); таб.НоваяКолонка("_11","Число",16,2); таб.НоваяКолонка("_12","Число",16,2); таб.НоваяКолонка("СумГод","Число",18,2); таб.НоваяКолонка("ОблГод","Число",18,2); таб.НоваяКолонка("УдерГод","Число",18,2); таб.НоваяКолонка("Индекс","Строка",6,0); таб.НоваяКолонка("Регион","Строка",2,0); таб.НоваяКолонка("Город","Строка",20,0); таб.НоваяКолонка("Улица","Строка",20,0); таб.НоваяКолонка("Дом","Строка",5,0); таб.НоваяКолонка("Корпус","Строка",5,0); таб.НоваяКолонка("Квартира","Строка",5,0); Документ=xmlParser.СоздатьДокумент(); Документ.Загрузить(стрИмяФайла); Данные=Документ.ПолучитьПодчиненныйПоНомеру(2); Для Сч=1 По Данные.КоличествоПодчиненных() Цикл таб.НоваяСтрока(); Элем=Данные.ПолучитьПодчиненныйПоНомеру(Сч); УзелПолучДох=Элем.ВыбратьУзлы("ПолучДох"); Для Сч3=0 По УзелПолучДох.КоличествоУзлов-1 Цикл // Сообщить(УзелПолучДох.ПолучитьУзел(Сч3).ПредставлениеXML); // Сообщить(УзелПолучДох.ПолучитьУзел(Сч3).КоличествоПодчиненных()); ФИО=УзелПолучДох.ПолучитьУзел(Сч3).ПолучитьПодчиненныйПоНомеру(1); таб.Ф=ФИО.ПолучитьПодчиненныйПоНомеру(1).Текст; таб.И=ФИО.ПолучитьПодчиненныйПоНомеру(2).Текст; таб.О=ФИО.ПолучитьПодчиненныйПоНомеру(3).Текст; таб.ДатаР=УзелПолучДох.ПолучитьУзел(Сч3).ПолучитьПодчиненныйПоНомеру(3).Значение ; адр=УзелПолучДох.ПолучитьУзел(Сч3).ПолучитьПодчиненныйПоНомеру(6); Для Сч4=1 По адр.КоличествоПодчиненных() Цикл Если адр.ПолучитьПодчиненныйПоНомеру(Сч4).Наименование="Индекс" Тогда таб.Индекс=адр.ПолучитьПодчиненныйПоНомеру(Сч4).Текст; ИначеЕсли адр.ПолучитьПодчиненныйПоНомеру(Сч4).Наименование="КодРегион" Тогда таб.Регион=адр.ПолучитьПодчиненныйПоНомеру(Сч4).Текст; ИначеЕсли адр.ПолучитьПодчиненныйПоНомеру(Сч4).Наименование="Город" Тогда таб.Город=адр.ПолучитьПодчиненныйПоНомеру(Сч4).Текст; ИначеЕсли адр.ПолучитьПодчиненныйПоНомеру(Сч4).Наименование="Улица" Тогда таб.Улица=адр.ПолучитьПодчиненныйПоНомеру(Сч4).Текст; ИначеЕсли адр.ПолучитьПодчиненныйПоНомеру(Сч4).Наименование="Дом" Тогда таб.Дом=адр.ПолучитьПодчиненныйПоНомеру(Сч4).Текст; ИначеЕсли адр.ПолучитьПодчиненныйПоНомеру(Сч4).Наименование="Корпус" Тогда таб.Корпус=адр.ПолучитьПодчиненныйПоНомеру(Сч4).Текст; ИначеЕсли адр.ПолучитьПодчиненныйПоНомеру(Сч4).Наименование="Кварт" Тогда таб.Квартира=адр.ПолучитьПодчиненныйПоНомеру(Сч4).Текст; Иначе КонецЕсли; КонецЦикла; КонецЦикла; УзелСвДохСтав=Элем.ВыбратьУзлы("СвДохСтав"); Для Сч3=0 По УзелСвДохСтав.КоличествоУзлов-1 Цикл //ел=УзелСвДохСтав.ПолучитьУзел(Сч3); УзелДохВыч=УзелСвДохСтав.ПолучитьУзел(Сч3).ВыбратьУзлы("ДохВыч"); Для Сч4=0 По УзелДохВыч.КоличествоУзлов-1 Цикл МесДоход=УзелДохВыч.ПолучитьУзел(Сч4); ИмяМес=""; СумМес=0; Если МесДоход.ПолучитьПодчиненныйПоНомеру(1).Наименование="НомМес" Тогда ИмяМес=МесДоход.ПолучитьПодчиненныйПоНомеру(1).Текст; КонецЕсли; Если МесДоход.ПолучитьПодчиненныйПоНомеру(3).Наименование="СумДоход" Тогда СумМес=МесДоход.ПолучитьПодчиненныйПоНомеру(3).Значение; КонецЕсли; Если ПустоеЗначение(ИмяМес)=0 Тогда Если ИмяМес="01" Тогда таб._01=СумМес; ИначеЕсли ИмяМес="02" Тогда таб._02=СумМес; ИначеЕсли ИмяМес="03" Тогда таб._03=СумМес; ИначеЕсли ИмяМес="04" Тогда таб._04=СумМес; ИначеЕсли ИмяМес="05" Тогда таб._05=СумМес; ИначеЕсли ИмяМес="06" Тогда таб._06=СумМес; ИначеЕсли ИмяМес="07" Тогда таб._07=СумМес; ИначеЕсли ИмяМес="08" Тогда таб._08=СумМес; ИначеЕсли ИмяМес="09" Тогда таб._09=СумМес; ИначеЕсли ИмяМес="10" Тогда таб._10=СумМес; ИначеЕсли ИмяМес="11" Тогда таб._11=СумМес; ИначеЕсли ИмяМес="12" Тогда таб._12=СумМес; КонецЕсли; КонецЕсли; КонецЦикла; УзелНалПер=УзелСвДохСтав.ПолучитьУзел(Сч3).ВыбратьУзлы("СГДНалПер"); НалПер=УзелНалПер.ПолучитьУзел(0); Если НалПер.Наименование="СГДНалПер" Тогда таб.СумГод=НалПер.ПолучитьПодчиненныйПоНомеру(1).Значение; таб.ОблГод=НалПер.ПолучитьПодчиненныйПоНомеру(2).Значение; таб.УдерГод=НалПер.ПолучитьПодчиненныйПоНомеру(3).Значение; КонецЕсли; //тут еще берем данные КонецЦикла; Состояние(Сч); КонецЦикла; Т=СоздатьОбъект("Таблица"); Т.ИсходнаяТаблица("Таблица"); таб.выбратьСтроки(); Т.ВывестиСекцию("Шапка"); нпп=1; Пока таб.ПолучитьСтроку()=1 Цикл Т.ВывестиСекцию("Текст"); нпп=нпп+1; КонецЦикла; Т.ТолькоПросмотр(1); Т.Опции(0, 0, 1, 0); // Т.ОбластьПечати(2); Т.ПараметрыСтраницы(2,,,5,5,5,5,,, 1); Т.Показать("Прочитали из XML"); КонецПроцедуры //_____________________________________________________________________________ Процедура Выбрать() ФС.ВыбратьФайл(0,ИмяФайла,ИмяПути,"Выберите файл","xml файлы (*.xml) |*.xml|Все файлы (*.*) |*.*","xml", ); Если ПустоеЗначение(ИмяФайла)=0 Тогда PathSbitn=ИмяПути+ИмяФайла; КонецЕсли; КонецПроцедуры //Выбрать //_____________________________________________________________________________ Процедура ПриОткрытии() ИмяФайла =""; ИмяПути = "P:"; res=УстановитьКомпоненту(); // Сообщить(res); КонецПроцедуры //ПриОткрытии ***************************************** Пример файла XML : <?xml version="1.0" encoding="windows-1251"?> <НДФЛ2 xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" ВерсФорм="4.00001" ВерсПрог="НП 10.31" ИдФайл="ДОХОД_2НДФЛ"> <Справка> <ОбщСвИЧ> <ГодДох>2006</ГодДох> <НомСпр>1</НомСпр> <ДатаСпр>26.03.2007</ДатаСпр> <ИФНСНА>7777</ИФНСНА> </ОбщСвИЧ> <ИстДох> <СвНАЮЛ> <ИННЮЛ>1234567890</ИННЮЛ> <КПП>12345678</КПП> <НаимОрг>ООО Рога и Копыта</НаимОрг> <ОКАТО>12345678901</ОКАТО> </СвНАЮЛ> </ИстДох> <ПолучДох> <ФИО> <Фамилия>Иванов</Фамилия> <Имя>Иван</Имя> <Отчество>Иванович</Отчество> </ФИО> <Статус>1</Статус> <ДатаРожд>24.01.1973</ДатаРожд> <Гражданство>643</Гражданство> <УдЛичн> <КодУдЛичн>21</КодУдЛичн> <СерНомДок>12 01 012345</СерНомДок> </УдЛичн> <АдрМЖРФ> <Индекс>123456</Индекс> <КодРегион>77</КодРегион> <Город>Энн г</Город> <Улица>Ленина ул</Улица> <Дом>99</Дом> <Корпус>5</Корпус> <Кварт>12</Кварт> </АдрМЖРФ> </ПолучДох> <СвДохСтав> <Ставка>35</Ставка> <ДохВыч> <НомМес>02</НомМес> <КодДоход>2610</КодДоход> <СумДоход>252.15</СумДоход> </ДохВыч> <ДохВыч> <НомМес>07</НомМес> <КодДоход>2760</КодДоход> <СумДоход>100.00</СумДоход> <КодВычет>503</КодВычет> <СумВычет>100.00</СумВычет> </ДохВыч> <ДохВыч> <НомМес>10</НомМес> <КодДоход>2760</КодДоход> <СумДоход>100.00</СумДоход> <КодВычет>503</КодВычет> <СумВычет>100.00</СумВычет> </ДохВыч> <СГДНалПер> <СГДСумм>252.15</СГДСумм> <ОблСумм>252.15</ОблСумм> <НИОблСумм>88</НИОблСумм> <НУОблСумм>88</НУОблСумм> <ВозврСуммПЛ>0</ВозврСуммПЛ> <ЗачСуммПЛ>0</ЗачСуммПЛ> <УдСуммПЛ>0</УдСуммПЛ> <ДолгНП>0</ДолгНП> <ДолгНА>0</ДолгНА> <ВзыскИФНС>0</ВзыскИФНС> </СГДНалПер> </СвДохСтав> </Справка> </НДФЛ2> --------- Лучше два часа потерять, потом за пять минут долететь

Ответ отправил: Игорь К. (статус: 4-ый класс) Ответ отправлен: 27.04.2007, 08:03

Вопрос № 84.317

Здравствуйте уважаемые эксперты! 1С бухгалтерия. Конфигурация не обновлялась (466) и всё дописывалось вручную (не мной). Метод определения выручки по отгрузке. В документе ПоступлениеМатериалов в Договор заносят каждый раз новый (номер и дата счета-фактуры полученного). Книга покупок делается через формирование ЗаписиКнигиПокупок (при этом неправильно - по отлате). Может лучше вводить на основании ПоступленияМатериалов СчетФактураПолученная, и книга покупок будет формироваться из них. Но при этом надо учитывать что нужно будет делать оборотно-сальдовую ведомость по сч.60 в разрезе счетов-фактур полученных. Подскажите пожалуйста кто менял подобное...

Отправлен: 26.04.2007, 14:56 Вопрос задала: Darina (статус: Посетитель) Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 3)

Отвечает: Николай Александрович Здравствуйте, Darina! Могу сказать только одно, если это все изменения, то можно конфигу обновлять на последний релиз (естественно сначала сделав копию) и далее работать без проблем и каждый раз делать обновления релизов. А по поводу разреза счетов-фактур... Тут есть такое соображение: справочник "Договора" - двухуровневый... можно заводить папку "договор № ____ от ______" , а внутри заводить элементы "счёт-фактура № ____ от _______". При формировании ОСВ ставить галочку "группы" на субконто "Договоры", если необходимо увидеть договор и счета по данномуц договору. По крайней мере мы так делаем на более чем 10-ти организациях и все довольны... А счёт-фактуру полученную какой смысл вводить.... если только Вы не формируете ОСВ по 60-му счёту... Если вводится поступление материалов, то проводка на 60-й счёт формируется без 2-ой аналитики. А когда вводишь счёт-фактуру полученный, тогда появляется вторая аналитика: сам документ счёт-фактура. И по поводу включения в книгу покупок (не представляю как Вы ведёте учёт): с релиза примерно 477... не помню точно какого в документах появляется галочка включать или нет в Книгу покупок... так что можно формировать документ "ПоступлениеМатериалов", потом на его основе документ "Счёт-фактураПолученный", а галочку "Включать в книгу покупок" ставить в одном из документов.... Удачи и успехов Вам!!!

Ответ отправил: Николай Александрович (статус: 1-ый класс) Ответ отправлен: 26.04.2007, 16:55 Оценка за ответ: 5 Комментарий оценки: Вот именно что нужно ОСВ по 60. Спасибо за подсказки!

Отвечает: Полозов Олег aka Asher Здравствуйте, Darina! Подымать конфигурации надо обязательно! Иначе рисовать придется самой все изменения. Тебе оно надо? Я делаю так. Беру релиз без изменений. сравниваю с измененным. делаю полный отчет о сравнении. распечатываю и на новый релиз вставляю все что изменено. из вашего вопроса я понял, что изменений в принципе не так и много. По второй части Я бы добавил в 60 счет субконто Счета фактуры, там сейчас 2 субконто Контрагент и договор. тогда можно разрулить договора реальные и счета фактуры полученные

Ответ отправил: Полозов Олег aka Asher (статус: 4-ый класс) Ответ отправлен: 27.04.2007, 03:32 Оценка за ответ: 5 Комментарий оценки: Спасибо за комментарии! Изменений много! А каким отчетом Вы делаете сравнение?

Вопрос № 84.346

Приветствую... Прошу помощи в таком вопросе: делаю обработку по выгрузке всех данных из нестандартной конфигурации в стандартную бухгалтерию, поскольку версии очень различны, то не стала пользоваться стандартной конфигурацией... Перенос данных делаю через ОЛЕ-объект... Дошла до переноса номенклатуры, и тут при переносе возникает такая ошибка, даже не знаю что это может быть Это строка Справ.ПолнНаименование = СправОле.ПолноеНаименование; Это сообщение об ошибке Неизвестная ошибка В дополнение могу сказать, что Данные откуда происходит загрузка ранее были на Клиент-сервере, а для удобства отладки перенесла на файл-сервер. Может кто сталкивался? Заранее благодарна.

Отправлен: 26.04.2007, 18:09 Вопрос задал: Попова Т Г (статус: Посетитель) Всего ответов: 4 Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Андрей Тимофеев Здравствуйте, Попова Т Г! = = Ответ перенесен в мини-форум вопроса = = [ Климова М. ]

Ответ отправил: Андрей Тимофеев (статус: 3-ий класс) Ответ отправлен: 26.04.2007, 18:25

Отвечает: Elric Здравствуйте, Попова Т Г! Справ.ПолнНаименование = СправОле.ПолноеНаименование; Реквизит указан правильно (у СправОле)? Попробуйте строку заменить на Справ.ПолнНаименование = СправОле.ПолнНаименование; --------- Мирный атом в КАЖДЫЙ дом!

Ответ отправил: Elric (статус: Специалист) Ответ отправлен: 26.04.2007, 18:51

Отвечает: DERL.KG Здравствуйте, Попова Т Г! Рискну предположить, что в справочнике, что слева это поле меньшего размера, чем у справочника справа. В общем посмотрите совпадают ли все параметры данного реквизита.

Ответ отправил: DERL.KG (статус: 2-ой класс) Ответ отправлен: 27.04.2007, 07:27

Отвечает: Gorus Здравствуйте, Попова Т Г! Возможно ПолноеНаименование у Вас - реквизит неограниченной длины. Тогда нужно так: Справ.ПолнНаименование=СправОле.ПолучитьАтрибут("ПолноеНаименование");

Ответ отправил: Gorus (статус: 5-ый класс) Ответ отправлен: 27.04.2007, 10:58

© 2001-2007, Портал RusFAQ.ru, Россия, Москва. Авторское право: ООО "Мастер-Эксперт Про" Email: support@rusfaq.ru, тел.: +7 (926) 535-23-31 Авторские права | Реклама на портале Версия системы: 4.51 (beta) от 27.04.2007