Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Неназначенных незавершенных заказов: 1
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Войти | Зарегистрироваться )



4 страниц V   1 2 3 > » 

>  Не меняется дата на форме при выборе в календаре
Yoja
Отправлено: 18.03.23, 12:34


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Управляемы формы.
1С:Предприятие 8.3 (8.3.14.1779)
Пустая конфигурация
Создал форму документа
На форме разместил реквизит: Тип Дата



Но выбор ничего не меняет



Если без формата ДФ=MMMyy, то все работает.
Как исправить?
Спасибо
  Форум: Программирование в 1С Предприятие 8.3 · Просмотр сообщения: #176943 · Ответов: 1 · Просмотров: 794
 

>  Работа с результатом отчета
Yoja
Отправлено: 13.07.17, 18:55


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Благодарю, Naghual!
Получилось ...

Перем ТабР;

Процедура Сформировать()
Сообщить("Начало работы: "+ТекущееВремя());    
    
    ТабР = СоздатьОбъект("Таблица");
    ТабР.ИсходнаяТаблица("Результат");
    
        //Начало цикла
        //Заполнение

             ТабР.ВывестиСекцию("Строки");

        //Конец цикла
                    
        ТабР.Показать();  
  Сообщить("Конец работы: "+ТекущееВремя());    
КонецПроцедуры

Процедура Выгрузить()  
    //....
    Сообщить(ТабР.ВысотаТаблицы());
    //....
КонецПроцедуры
  Форум: Программирование в 1С Предприятие 7.7 · Просмотр сообщения: #129584 · Ответов: 4 · Просмотров: 1495
 

>  Работа с результатом отчета
Yoja
Отправлено: 12.07.17, 12:16


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Пробовал!
Ошибка:
В ошибке говорится не найдена переменная
Пункт, ТоварКод, ГруппаРодитель и т.д.

Он думает что я снова создаю отчет в таблице Результат и не передаю туда параметров, а она то построена....:-)
  Форум: Программирование в 1С Предприятие 7.7 · Просмотр сообщения: #129510 · Ответов: 4 · Просмотров: 1495
 

>  Работа с результатом отчета
Yoja
Отправлено: 11.07.17, 22:57


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Доброй ночи
1С:Предприятие 7.7
Торговля + Склад для Украины (7.70.013)



После чего показывается такая таблица с названием "Заказ"



Выдает ошибку:



Мой код попытки обращения к таблице
    ТабВ = СоздатьОбъект("Таблица");
    ТабВ.ИсходнаяТаблица("Заказ");
    //Секция = ТабВ.ПолучитьСекцию("Строка");
      
    ТабВ.Вывести();
    Сообщить(ТабВ.ВысотаТаблицы());


Как обратиться к ней, узнав высоту таблицы например

Спасибо

  Форум: Программирование в 1С Предприятие 7.7 · Просмотр сообщения: #129483 · Ответов: 4 · Просмотров: 1495
 

>  Путь и название фотографии
Yoja
Отправлено: 21.06.17, 22:49


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Добрый вечер

Платформа 7.70.027
Конфигурация Торговля+Склад для Украины (7.70.013)


Два вопроса:

1) Подскажите пожалуйста как можно извлечь название фотографии которая подвязана к карточке номенклатуры?

2) Может ли быть такое, что фотографии которые присваивают стандартными средствами в карточке товара не отображаются на другом компьютере, когда базу копируют


  Форум: Программирование в 1С Предприятие 7.7 · Просмотр сообщения: #128672 · Ответов: 1 · Просмотров: 1473
 

>  Выборка номенклатуры по ID категории
Yoja
Отправлено: 18.06.17, 23:05


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Доброй ночи

Работаю с 1С 7.7
Платформа 7.70.027
Конфигурация Торговля+Склад для Украины (7.70.013)

С запросами не работал в семерке, постоянно выгружал справочник перебором

Помогите разобраться, как правильно выгрузить справочник номенклатуры с ценами
т.е. Имеем Справочник.Номенклатура и Справочник.Цены

В справочнике Цены указан тип цены, к примеру Закупочная
и к тому же выгружать не весь справочник, а только номенклатуру с указанной категории

Как написать запрос с выгрузкой номенклатуры с ценой


Спасибо
  Форум: Программирование в 1С Предприятие 7.7 · Просмотр сообщения: #128515 · Ответов: 1 · Просмотров: 1869
 

>  Считать данные из Таблицы
Yoja
Отправлено: 25.05.17, 23:19


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Перебор столбца таблицы
"R+Ин" - Строки
"С1" - Столбец №1

Процедура ЧТабл()                     
    ТабК = СоздатьОбъект("Таблица");  
    ТабК.Открыть("Category.mxl");
    Для Ин = 2 По ТабК.ВысотаТаблицы() Цикл
        ВыбОбласть = ТабК.Область("R"+Ин+"C1");
        Сообщить(ВыбОбласть.Текст);    
    КонецЦикла;    
КонецПроцедуры


Спасибо, помогли
  Форум: Программирование в 1С Предприятие 7.7 · Просмотр сообщения: #127508 · Ответов: 6 · Просмотров: 2002
 

>  Считать данные из Таблицы
Yoja
Отправлено: 23.05.17, 22:19


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Спасибо Всем. Сделаю напишу как получилось
  Форум: Программирование в 1С Предприятие 7.7 · Просмотр сообщения: #127356 · Ответов: 6 · Просмотров: 2002
 

>  Считать данные из Таблицы
Yoja
Отправлено: 23.05.17, 12:01


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Добрый день!
Подскажите пожалуйста как можно считать информацию из таблицы (не таблица значений)
Создал таблицу назвал ее "Параметры"
В ней всего два столбца с цыфрами, которые могут добавлятся
 ТабК = СоздатьОбъект("Таблица");
ТабК.ИсходнаяТаблица("Параметры")


как пройтись по этим строкам и считать ячейкм?

Спасибо
  Форум: Программирование в 1С Предприятие 7.7 · Просмотр сообщения: #127319 · Ответов: 6 · Просмотров: 2002
 

>  Сложный налоговый учет
Yoja
Отправлено: 11.10.16, 11:23


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Vofka @ Сегодня, 12:06 * , Vofka @ Сегодня, 12:06 * ,

Не получается изменить код, что бы при установке галочки сложный налоговый учет и нажатию кнопки Записать.
Программа не обращала внимание на существующие документы по данному договору
  Форум: Программирование обычных форм 1С 8.2 и не интер... · Просмотр сообщения: #117552 · Ответов: 3 · Просмотров: 1792
 

>  Сложный налоговый учет
Yoja
Отправлено: 11.10.16, 10:46


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Добрый день!
Имеем:
1С:Предприятие 8.2 (8.2.13.219)

Бухгалтерия для Украины, редакция 1.2. (1.2.32.2)


Слетела галочка в договоре контрагента Сложный налоговый учет (как бухгалтер утверждает она там была, слетела при обмене)
Договор с поставщиком

Как установить эту галочку что бы обойти проверку наличия документов по этому Контрагенту?

Спасибо
  Форум: Программирование обычных форм 1С 8.2 и не интер... · Просмотр сообщения: #117550 · Ответов: 3 · Просмотров: 1792
 

>  Обновление Конфы УТ с 2.3.7.1 до 2.3.25.1
Yoja
Отправлено: 15.04.16, 0:46


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Добрый день!
Подскажите как правильно обновить платформу и конфигурацию.
Имею:
Платформа 1С:Предприятие 8.2 (8.2.13.219)
Конфигурация "Управление торговлей для Украины", редакция 2.3. (2.3.7.1)


Новую платформу установил 8.3, версия 8.3.7.2027

Вопрос с конфигурацией, обновлять пошагово 2.3.7.1, .... , 2.3.24.3, 2.3.25.1

Также слышал что могут возникнуть с подключаемым оборудованием, в частности с кассовым аппаратом МАРИЯ

Как правильно обновлять конфигурацию, и чего ожидать от МАРИИ??

Спасибо
  Форум: Управление торговлей для Украины редакция 2 (Уп... · Просмотр сообщения: #111495 · Ответов: 0 · Просмотров: 2230
 

>  Ошибка подключения из консоли windows
Yoja
Отправлено: 14.01.15, 17:18


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Все решено.
Проблема была уже не в этих компьютерах.
Нужно было на CISCO открыть порт 3540 и 3541 и 3560-3590

Спасибо
  Форум: Администрирование и настройка 1С · Просмотр сообщения: #95192 · Ответов: 1 · Просмотров: 2109
 

>  Ошибка подключения из консоли windows
Yoja
Отправлено: 14.01.15, 11:27


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Добрый день!
1. Поднят сервер 1С:Предприятия 8.3.5.1248 на ubuntu 14.04 + PostGresql, порты ragent (3540,3541) (SRV1)
2. Поднят сервер 1С:Предприятия 8.3.5.1248 на ubuntu 12.04 + PostGresql, порты ragent (1540,1541) (SRV2)
Работает все чудно, классно.


на своей рабочей машине windows 7х64
Установил 1С, подключаюсь через Консоль администрирования 1с на заранее сконфигурированные порты (3540,3441, 3560-3590) к SRV1, SRV2
Все работает.

Пытаюсь подключится с сервера Windows 2008 R2 через консоль администрирования 1с к SRV2, все хорошо
к серверу SRV1 выдает ошибку




Удаление папки srvinfo уже пробывал, поменял порты. Т.к. на windows 2008 R2 стоит сервер 1с 8.2
ничего не помогает?? что может быть???

Брендмауэр отключен на Windows 2008 R2
telnet на сервер SRV1 на порт 3540 работает (отвечает)
  Форум: Администрирование и настройка 1С · Просмотр сообщения: #95173 · Ответов: 1 · Просмотров: 2109
 

>  Альтернативное название ТМЦ в расходе
Yoja
Отправлено: 22.09.14, 14:49


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Цитата(lefty @ 22.09.14, 14:15) *
"Анальный крем "Незабудка""


Жесь

Словарный запас оставляет желать лучшего, читайте книжки :-)
  Форум: Программирование в 1С Предприятие 7.7 · Просмотр сообщения: #91464 · Ответов: 11 · Просмотров: 4693
 

>  Альтернативное название ТМЦ в расходе
Yoja
Отправлено: 22.09.14, 8:53


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Это же форум, если сделал расскажи форумчанам как!
Если у кого то будет такой же вопрос через полгода, Вас будет не найти,
или актуальность отпадет пока Вы ответишь и сам вспомнишь как Вы это реализовал
  Форум: Программирование в 1С Предприятие 7.7 · Просмотр сообщения: #91459 · Ответов: 11 · Просмотров: 4693
 

>  Отчет где то как в касссовой книге
Yoja
Отправлено: 22.09.14, 8:45


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Добрый день!
Спасибо всем кто помогал, советовал... (я попутал Таблицу значений и просто таблицу)
Я конечно тормозил, тупил, но желаемый результат достигнут, может конечно эксперты скажут что достигнут топорным способом..

1. что нужно было получить? Журнал ПКО, РКО за период по кассам с остатками на начала и конец периода, а также дебит и кредит по этим кассам (рисунок)


2. Ну собственно что получилось:
Процедура Сформировать()
         Если (ПроверкаДаты() = 1) Тогда //Начало проверки даты [001]
    
     ТаблЗнач = СоздатьОбъект("ТаблицаЗначений");    
     ТаблЗнач.Очистить();
    
     ТаблЗнач.НоваяКолонка("ТабП");
     ТаблЗнач.НоваяКолонка("ТабД");
     ТаблЗнач.НоваяКолонка("ТабДок");
     ТаблЗнач.НоваяКолонка("ТабК");
     ТаблЗнач.НоваяКолонка("ТабЦФО");
     ТаблЗнач.НоваяКолонка("ТабОДДС");
     ТаблЗнач.НоваяКолонка("ТабСумма");
     ТаблЗнач.НоваяКолонка("ТабПр");  
    
     ТаблЗнач.НоваяКолонка("ОстНач");
     ТаблЗнач.НоваяКолонка("пДт");
     ТаблЗнач.НоваяКолонка("пКт");
     ТаблЗнач.НоваяКолонка("ОстКон");
    
         row=1; //первая строка
////После создания таблицы значений заполняем ее значениями из приходных документов (ПКО)
         ДокПК = СоздатьОбъект("Документ.ПриходныйКассовый");
         ДокПК.ВыбратьДокументы(Дата1,Дата2);    
         ДокПК.УстановитьФильтр(1,0);
         Пока ДокПК.ПолучитьДокумент() = 1 Цикл    
             
         Если ДокПК.ПометкаУдаления() <> 0 Тогда Продолжить КонецЕсли;
             
             ТаблЗнач.НоваяСтрока();
             ТаблЗнач.ТабП     = row;
             ТаблЗнач.ТабД     = СокрЛП(ДокПК.ДатаДок);  
             ТаблЗнач.ТабДок   = СокрЛП(ДокПК.НомерДок);
             ТаблЗнач.ТабК     = СокрЛП(ДокПК.РСчет.Наименование);
             ТаблЗнач.ТабЦФО   = СокрЛП(ДокПК.ЦФО.Наименование);
             ТаблЗнач.ТабОДДС  = СокрЛП(ДокПК.ОДДС.Наименование);
             ТаблЗнач.ТабСумма = СокрЛП(ДокПК.СуммаВал);
             ТаблЗнач.ТабПр    = СокрЛП(ДокПК.Примечание);
         row=row+1;//переходим на следующую строку
         КонецЦикла;
    

//дописываем в таблицу значений значениями расходных документов (РКО)
         ДокРК = СоздатьОбъект("Документ.РасходныйКассовый");
         ДокРК.ВыбратьДокументы(Дата1,Дата2);    
         ДокРК.УстановитьФильтр(1,0);
         
         Пока ДокРК.ПолучитьДокумент() = 1 Цикл
         Если ДокРК.ПометкаУдаления() <> 0 Тогда Продолжить КонецЕсли;
         
             ТаблЗнач.НоваяСтрока();
             ТаблЗнач.ТабП     = row;
             ТаблЗнач.ТабД     = СокрЛП(ДокРК.ДатаДок);  
             ТаблЗнач.ТабДок   = СокрЛП(ДокРК.НомерДок);
             ТаблЗнач.ТабК     = СокрЛП(ДокРК.РСчет.Наименование);
             ТаблЗнач.ТабЦФО   = СокрЛП(ДокРК.ЦФО.Наименование);
             ТаблЗнач.ТабОДДС  = СокрЛП(ДокРК.ОДДС.Наименование);
             ТаблЗнач.ТабСумма = СокрЛП(ДокРК.СуммаВал);
             ТаблЗнач.ТабПр    = СокрЛП(ДокРК.Примечание);
             
         
         row=row+1;//переходим на следующую строку
         КонецЦикла;
         
//Сортируем по трем столбцам
         ТаблЗнач.Сортировать("ТабК+, ТабД+, ТабДок+");    
                  
             //Теперь заполняем последние столбцы, Дт, Кт, ОстатокНаНачало ОстатокНаКонец периода
         Для i=1 по ТаблЗнач.КоличествоСтрок() Цикл
             ТаблЗнач.ПолучитьСтрокуПоНомеру(i);
                 //проверяем Дебит И Кредит по файлам
                 //ПКО11 и РКО10
                 Если Лев(ТаблЗнач.ПолучитьЗначение(i,3),3) = "ПКО" Тогда
                     ТаблЗнач.УстановитьЗначение(i,11,ТаблЗнач.ТабСумма);    
                 КонецЕсли;
                 
                 Если Лев(ТаблЗнач.ПолучитьЗначение(i,3),3) = "РКО" Тогда
                     ТаблЗнач.УстановитьЗначение(i,10,ТаблЗнач.ТабСумма);    
                 КонецЕсли;    
    
             
                 Если i = 1 Тогда                                                    
                     ТаблЗнач.УстановитьЗначение(i,9,ВозвНачОстатка(ТаблЗнач.ТабК));    
                 КонецЕсли;
                 
                 Если i > 1 Тогда
                     Если ТаблЗнач.ТабК <> ТаблЗнач.ПолучитьЗначение(i-1,4) Тогда
                         ТаблЗнач.УстановитьЗначение(i,9,ВозвНачОстатка(ТаблЗнач.ТабК));
                         //прКО = прКО - ТаблЗнач.ПолучитьЗначение(i,10) + ТаблЗнач.ПолучитьЗначение(i,11);
                     КонецЕсли;
                 КонецЕсли;
             
         КонецЦикла;
    
                   
         Для i=1 по ТаблЗнач.КоличествоСтрок() Цикл
             ТаблЗнач.ПолучитьСтрокуПоНомеру(i);
                  
         Если i = ТаблЗнач.КоличествоСтрок() Тогда
             //Если ТаблЗнач.ТабК <> ТаблЗнач.ПолучитьЗначение(i-1,4) Тогда
                 ТаблЗнач.УстановитьЗначение(i,12,ВозвКонОстатка(ТаблЗнач.ТабК));
             //КонецЕсли;
         КонецЕсли;    
             
         Если i < ТаблЗнач.КоличествоСтрок() Тогда
             Если ТаблЗнач.ТабК <> ТаблЗнач.ПолучитьЗначение(i+1,4) Тогда
                 ТаблЗнач.УстановитьЗначение(i,12,ВозвКонОстатка(ТаблЗнач.ТабК));
                 //прКО = прКО - ТаблЗнач.ПолучитьЗначение(i,10) + ТаблЗнач.ПолучитьЗначение(i,11);
             КонецЕсли;
         КонецЕсли;    
    
         КонецЦикла;
    
    
    
         Таб = СоздатьОбъект("Таблица");      
         Таб.ИсходнаяТаблица("RU_Таблица");
                                                                 
         Состояние("Заполнение выходной таблицы...");
    
         Таб.ВывестиСекцию("ШапкаЗаголовки");
         
    
         
         Для i=1 по ТаблЗнач.КоличествоСтрок() Цикл
             ТаблЗнач.ПолучитьСтрокуПоНомеру(i);    
    
                 ТабП     = i;
                 ТабД     = ТаблЗнач.ТабД;
                 ТабДок   = ТаблЗнач.ТабДок;
                 ТабК     = ТаблЗнач.ТабК;
                 ТабЦФО   = ТаблЗнач.ТабЦФО;
                 ТабОДДС  = ТаблЗнач.ТабОДДС;
                 ТабСумма = ТаблЗнач.ТабСумма;
                 ТабПр    = ТаблЗнач.ТабПр;  
    
    
                 ОстНач   = ТаблЗнач.ОстНач;
                 пДт      = ТаблЗнач.пДт;
                 пКт      = ТаблЗнач.пКт;
                 ОстКон   = ТаблЗнач.ОстКон;
                 
             Таб.ВывестиСекцию("Строка");
         КонецЦикла;
         
         
         Таб.Показать("Журнал операций: ("+Дата1+"-"+Дата2+")");        
        
    
         
     КонецЕсли; //Конец проверки даты [001]
    
     КонецПроцедуры



Тема ЗАКРЫТА
  Форум: Программирование в 1С Предприятие 7.7 · Просмотр сообщения: #91458 · Ответов: 9 · Просмотров: 2622
 

>  ТаблицаЗначений
Yoja
Отправлено: 16.09.14, 11:45


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Цитата(alex040269 @ 16.09.14, 11:50) *
попробуйте
тблЗнач.ПолучитьСтрокуПоНомеру(i);
тблЗнач.ИмяКолонки10 = "TEST";
Сообщить(тблЗнач.ИмяКолонки10);

должно получиться:


Имя колонки не дает указать, пишет агрегатная функция не найдена

Наверное я всех обманул.
Когда заходишь в конфигуратор, и там внизу есть,
4 закладки:
Диалог, Модуль, Описание, Таблица

Вот у меня заполняется эта таблица, в ней указаны названия колонок (в строке 1). и в строке 2 созданы переменные в каждом столбце
После обращения к БД. Эта таблица заполнена, но опять таки нужно пройтись по всем строкам

Вот код, создания ТЗ (на форме у меня нет никаких таблиц)
   
   ТаблЗнач = СоздатьОбъект("ТаблицаЗначений");    
   ТаблЗнач.Очистить();
  
   ТаблЗнач.НоваяКолонка("ТабП");
   ТаблЗнач.НоваяКолонка("ТабД");
   ТаблЗнач.НоваяКолонка("ТабДок");
   ТаблЗнач.НоваяКолонка("ТабК");
   ТаблЗнач.НоваяКолонка("ТабЦФО");
   ТаблЗнач.НоваяКолонка("ТабОДДС");
   ТаблЗнач.НоваяКолонка("ТабСумма");
   ТаблЗнач.НоваяКолонка("ТабПр");  
  
   ТаблЗнач.НоваяКолонка("ОстНач");
   ТаблЗнач.НоваяКолонка("пДт","Число",10,2);
   ТаблЗнач.НоваяКолонка("пКт");
   ТаблЗнач.НоваяКолонка("ОстКон","Строка",10);
  
   .....
   //заполнение
   .....
  
       ТаблЗнач.ВыбратьСтроки();    
      
       Для i=1 по ТаблЗнач.КоличествоСтрок() Цикл
                   ТаблЗнач.ПолучитьСтрокуПоНомеру(i);
                   Сообщить(ТаблЗнач.ТабК);
       КонецЦикла


Сообщения показываются.
но установить значения не дает

Может я все спутал, работу с Таблицей и ТЗ



faceoff.gif разобрался, сделаю все напишу
  Форум: Программирование в 1С Предприятие 7.7 · Просмотр сообщения: #91259 · Ответов: 4 · Просмотров: 2530
 

>  ТаблицаЗначений
Yoja
Отправлено: 16.09.14, 10:45


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Цитата(alex040269 @ 16.09.14, 11:01) *
какой тип данных 10-ой колонки?


Значение не возвращает


а вообще не указывал

Изменение типа колонки тоже не помогло

А как обновить ТаблЗнач, после УстановкиЗначений?
  Форум: Программирование в 1С Предприятие 7.7 · Просмотр сообщения: #91251 · Ответов: 4 · Просмотров: 2530
 

>  ТаблицаЗначений
Yoja
Отправлено: 16.09.14, 9:56


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Добрый день
Подскажите, а то я что то затупил
Есть ТаблицаЗначений, состоит из 12 столбцов,
8 первых столбцов заполнено

Нужно пройтись по всем строкам и изменить значение в столбце 10 (он пустой)

пишу код:

Для i=1 по ТаблЗнач.КоличествоСток() Цикл
                 ТаблЗнач.УстановитьЗначение(i,10,"TEST");
             КонецЦикла;

Ошибок не выдает, но и столбец не заполняет.
В отладчике выбрав ТаблЗнач.УстановитьЗначение(i,10,"TEST") пишет ошибка значения

В чем ошибка?? Подскажите, пожалуйста
  Форум: Программирование в 1С Предприятие 7.7 · Просмотр сообщения: #91245 · Ответов: 4 · Просмотров: 2530
 

>  Отчет где то как в касссовой книге
Yoja
Отправлено: 12.09.14, 12:02


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Спасибо, попробую отпишусь
  Форум: Программирование в 1С Предприятие 7.7 · Просмотр сообщения: #91106 · Ответов: 9 · Просмотров: 2622
 

>  Отчет где то как в касссовой книге
Yoja
Отправлено: 12.09.14, 10:56


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


т.е. мои действия:

1. Определяемся с периодом (НачДата, КонДата), задаем через форму
2. Определяемся с кассой по которой хотим посмотреть остаток на начало дня, конец дня, дебет и кредит


     //задаем фирму
       Фирма = глВосстановитьЗначение(,"БазФирма");
      
       //задаем кассу
       //но так как это пока для тестов, то укажу кассу в ручную
   Касса = СоздатьОбъект("Справочник.НашиДенежныеСчета");
             Касса.ИспользоватьВладельца(Фирма);
             Касса.НайтиПоНаименованию("Касса Д2",0);
      
   //забираем периоды с формы
   НачДата = Дата1;
         КонДата = Дата2;

//создаем объект бухгалтерские итоги
<tt>БухИт = СоздатьОбъект("БухгалтескиеИтоги");
       БухИт.ИспользоватьазделительУчета(Фима);
       БухИт.ВклчатьСубсчета(-1);  
       
       
       Сообщить(БухИт.СНД("С"));</tt>


Правильно? У меня всегда в сообщении вывода 0(ноль)
  Форум: Программирование в 1С Предприятие 7.7 · Просмотр сообщения: #91103 · Ответов: 9 · Просмотров: 2622
 

>  Отчет где то как в касссовой книге
Yoja
Отправлено: 10.09.14, 10:54


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Спасибо, за перенос темы в правильное русло

Добавлю код, реализации журнала ПКО и РКО
Перем Флаг, i;
Перем Запрос, КодЗапроса;
Перем Таб;

Перем ТабП;     //номер подпункта
Перем ТабД;     //дата документа
Перем ТабДок;   //документ
Перем ТабК;     //касса
Перем ТабЦФО;   //цфо
Перем ТабОДДС;  //оддс
Перем ТабСумма; //сумма документа
Перем ТабПр;    //примечание    

Перем ОстНач;
Перем пДт;
Перем пКт;
Перем ОстКон;

Перем ПутьExcel;
                                                    

                  
Процедура ИмпортExcel()
     //Таб.Записать(КаталогИБ()+"ExtForms\004m.xls", 1);
     //Таб.Показать("Отчет",КаталогИБ()+"ExtForms\004m.xls");
    
ИмяВыбрФайла = "Журнал_"+ТекущаяДата()+".xls";
    Если ФС.ВыбратьФайл(1, ИмяВыбрФайла, ПутьExcel, "Сохранить Excel документ", "Microsoft Excel (*.xls)|*.xls", , ) = 1 Тогда
    Таб.Записать(ПутьExcel+ИмяВыбрФайла,1);

  КонецЕсли;
КонецПроцедуры    

Функция ПроверкаДаты();
     Флаг = 0;
     Если (Число(Дата1) = 0) или (Число(Дата2) = 0) или (Дата1 > Дата2) Тогда
         Сообщить("Не правильно заполнен период","!");
         Возврат Флаг;
     Иначе          
         Флаг = 1;
         Возврат Флаг
     КонецЕсли;
КонецФункции    


//*******************************************

Процедура Сформировать()
     Если (ПроверкаДаты() = 1) Тогда //Начало проверки даты [001]

ТаблЗнач = СоздатьОбъект("ТаблицаЗначений");    
ТаблЗнач.Очистить();

ТаблЗнач.НоваяКолонка("ТабП");
ТаблЗнач.НоваяКолонка("ТабД");
ТаблЗнач.НоваяКолонка("ТабДок");
ТаблЗнач.НоваяКолонка("ТабК");
ТаблЗнач.НоваяКолонка("ТабЦФО");
ТаблЗнач.НоваяКолонка("ТабОДДС");
ТаблЗнач.НоваяКолонка("ТабСумма");
ТаблЗнач.НоваяКолонка("ТабПр");  

ТаблЗнач.НоваяКолонка("ОстНач");
ТаблЗнач.НоваяКолонка("пДт");
ТаблЗнач.НоваяКолонка("пКт");
ТаблЗнач.НоваяКолонка("ОстКон");

     row=1; //первая строка
     ДокПК = СоздатьОбъект("Документ.ПриходныйКассовый");
     ДокПК.ВыбратьДокументы(Дата1,Дата2);    
     ДокПК.УстановитьФильтр(1,0);
     Пока ДокПК.ПолучитьДокумент() = 1 Цикл    
        
     Если ДокПК.ПометкаУдаления() <> 0 Тогда Продолжить КонецЕсли;
        
         ТаблЗнач.НоваяСтрока();
         ТаблЗнач.ТабП     = row;
         ТаблЗнач.ТабД     = СокрЛП(ДокПК.ДатаДок);  
         ТаблЗнач.ТабДок   = СокрЛП(ДокПК.НомерДок);
         ТаблЗнач.ТабК     = СокрЛП(ДокПК.РСчет.Наименование);
         ТаблЗнач.ТабЦФО   = СокрЛП(ДокПК.ЦФО.Наименование);
         ТаблЗнач.ТабОДДС  = СокрЛП(ДокПК.ОДДС.Наименование);
         ТаблЗнач.ТабСумма = СокрЛП(ДокПК.СуммаВал);
         ТаблЗнач.ТабПр    = СокрЛП(ДокПК.Примечание);
     row=row+1;//переходим на следующую строку
     КонецЦикла;

     ДокРК = СоздатьОбъект("Документ.РасходныйКассовый");
     ДокРК.ВыбратьДокументы(Дата1,Дата2);    
     ДокРК.УстановитьФильтр(1,0);
    
     Пока ДокРК.ПолучитьДокумент() = 1 Цикл
     Если ДокРК.ПометкаУдаления() <> 0 Тогда Продолжить КонецЕсли;
    
         ТаблЗнач.НоваяСтрока();
         ТаблЗнач.ТабП     = row;
         ТаблЗнач.ТабД     = СокрЛП(ДокРК.ДатаДок);  
         ТаблЗнач.ТабДок   = СокрЛП(ДокРК.НомерДок);
         ТаблЗнач.ТабК     = СокрЛП(ДокРК.РСчет.Наименование);
         ТаблЗнач.ТабЦФО   = СокрЛП(ДокРК.ЦФО.Наименование);
         ТаблЗнач.ТабОДДС  = СокрЛП(ДокРК.ОДДС.Наименование);
         ТаблЗнач.ТабСумма = СокрЛП(ДокРК.СуммаВал);
         ТаблЗнач.ТабПр    = СокрЛП(ДокРК.Примечание);
        
    
     row=row+1;//переходим на следующую строку
     КонецЦикла;
    
ТаблЗнач.Сортировать("ТабК+, ТабД+, ТабДок+");        

     Таб = СоздатьОбъект("Таблица");      
     Таб.ИсходнаяТаблица("RU_Таблица");
                                                              
     Состояние("Заполнение выходной таблицы...");

     Таб.ВывестиСекцию("ШапкаЗаголовки");
    
     Для i=1 по ТаблЗнач.КоличествоСтрок() Цикл
         ТаблЗнач.ПолучитьСтрокуПоНомеру(i);    

             ТабП     = i;
             ТабД     = ТаблЗнач.ТабД;
             ТабДок   = ТаблЗнач.ТабДок;
             ТабК     = ТаблЗнач.ТабК;
             ТабЦФО   = ТаблЗнач.ТабЦФО;
             ТабОДДС  = ТаблЗнач.ТабОДДС;
             ТабСумма = ТаблЗнач.ТабСумма;
             ТабПр    = ТаблЗнач.ТабПр;
            
         Таб.ВывестиСекцию("Строка");
     КонецЦикла;
    
     Таб.Показать("Журнал операций: ("+Дата1+"-"+Дата2+")");

     КонецЕсли; //Конец проверки даты [001]
КонецПроцедуры
  Форум: Программирование в 1С Предприятие 7.7 · Просмотр сообщения: #91044 · Ответов: 9 · Просмотров: 2622
 

>  Отчет где то как в касссовой книге
Yoja
Отправлено: 10.09.14, 10:20


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


1С:Предприятие 7.7 для SQL (7.70.027)
Конфигурация:
"Бухгалтерский учет" для Украины (7.70.252)

Добрый день!
Давненько было задание сделать отчет по кассам расходные и приходные документы с сортировкой по кассе за период (сделано)
Поля в отчете:
№п/п
Дата
Документ
Касса
Сумма
Примечание

Теперь хотят, что бы добавил еще 4 поля
Остаток на начало периода, дебит, кредит, остаток на конец периода по каждой кассе.

Подскажите пожалуйста, где и как найти информацию, откуда ее выкатить??

Как должен выглядеть отчет


Спасибо


 ! 

Правила, п.3,4,5
 
  Форум: Программирование в 1С Предприятие 7.7 · Просмотр сообщения: #91041 · Ответов: 9 · Просмотров: 2622
 

>  Выполнение хранимой процедуры
Yoja
Отправлено: 05.08.14, 12:53


Говорящий
***

Группа: Пользователи
Сообщений: 90
Регистрация: 11.05.12
Пользователь №: 17731


Проблема решена.
Решение:
В хранимой процедуре передавались параметры типа DATETIME
Microsoft SQL Server Management Studio 2010
пропустил переменную со значение типа '01.01.1980'
а Microsoft SQL Server Management Studio 2012 сообщил что нужно сделать CONVERT(datetime, '01.01.1980')
и + в 1С при передачи параметра типа дата преобразовал в формат в соответствии с форматом в БД SQL yyyy.MM.dd

вот и все

и вот еще, код, с передаваемыми параметрами в хранимую процедуру изменился так
Command.CommandText = "USE [NAuser]; EXEC [dbo].[Base1C_TO_SQL] @cN='"+cN+"',@cD ='"+cD+"';";   
         Command.CommandType = 8;


Command.CommandType

4 - означает хранимую процедуру.
8 - (значение по умолчанию) – сервер баз данных определяет тип команды самостоятельно.
  Форум: Программирование обычных форм 1С 8.2 и не интер... · Просмотр сообщения: #89702 · Ответов: 3 · Просмотров: 5475
 

4 страниц V   1 2 3 > » 

Новые сообщения  Открытая тема (есть новые ответы)
Опрос  Опрос (есть новые голоса)
Нет новых сообщений  Открытая тема (нет новых ответов)
Нет новых голосов  Опрос (нет новых голосов)
Популярная тема  Горячая тема (есть новые ответы)
Закрыта  Закрытая тема
Нет новых  Горячая тема (нет новых ответов) Перемещена  Тема перемещена
 

RSS Текстовая версия Сейчас: 28.04.24, 13:14
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!