Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » 1C Программирование и поддержка

Модерирует : ShIvADeSt

ShIvADeSt (30-10-2009 09:51): http://forum.ru-board.com/topic.cgi?forum=33&topic=10715  Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101

   

ShIvADeSt



Moderator
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Тема для программирования 1С!!!
Это продолжение темы, предыдущие части доступны тут


ПРОГРАММЫ  1С:Предприятие 1C - 1C: Вопросы по конфигурациям

ВАРЕЗНИК   1C:Предприятие 7.7 - 1С:Предприятие v.8.x - 1C Диск ИТС - 1С: Совместимо 8.х

Топик 1C Ebooks
ЗДЕСЬ  (обновлено 17.10.2009) - небольшая библиотечка (книги, документация, видео, утилиты) по 1С, финансам, бухучету и т.п.
Все рассортировано по версиям...


Для заблудившихся в трех соснах >>> FAQ по форуму RU.Board
 
Предыдущие темы были здесь часть 4 | часть 3 | часть 1
 
Как убить рекламу при обновлении отчетности | конфигурации (ИБ)?

Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 02:02 03-04-2009 | Исправлено: vkramnik, 12:06 23-10-2009
An4eus



Silver Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
dias65
стандартными средствами на ТЗ нельзя сделать обработчик кнопкой del
тогда придётся использовать ВК formex.dll

----------
Век живи - век учись!

Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 15:02 27-05-2009
dias65



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
An4eus
Понял. Спасибо за информацию. А formex.dll фриварный, если я не ошибаюсь?

Всего записей: 277 | Зарегистр. 28-11-2006 | Отправлено: 15:07 27-05-2009
An4eus



Silver Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
dias65
да... ищи в нете - полно инфы!

----------
Век живи - век учись!

Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 15:16 27-05-2009
StalkerLegend



Junior Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
vizlipuzli
 
Убиваюсь об стенку, мозги кипят. Когда открыл ЭТО всё, долго блуждал по строчкам понимая что вообще происходит в итоге. Оказалось что 2 документ "УкажитеИмяФайла.s03", с данными списком сотрудников
 

Цитата:
40817810930311477044-56       46103.50Федина Анатолий Никитович
40817810530311477046-56       14440.81Габараева Зинаида Николаевна

 
между первым полем и вторым должен стоять "tab" и межде вторым и третьим тоже "tab" потому-что в банке только так читает, не знаю почему, искал как это сделать ничего не нашёл, пытался дома самостоятельно всё это соорудить не ушёл дальше создания типичного документа с названием и расширением что говорить уже об переносе туда данных и подавно просто помер.  
 
1. Вопрос как сделать эти ТАБЫ между полями.
 
И как примерное написать путь к этим всем полям, если данные:
 

Цитата:
//описание ваших данных
    ПервоеПоле="ОАО       Выселкирайгаз";        //(Организация) Справочник->Организации "через ТАБ"
    ВтороеПоле="      30312064        ";               //(Счёт организации) Справочник->Банковские счета "через ТАБ"
    ТретьеПоле="5158";                                    //(номер отделения банка) просто вбивается в принципе так и остаёся. "через ТАБ"
    ЧетвертоеПоле="   0    ";                            //(Количество сотрудников указанных в ведомости на получение зарплаты) берётся из ведомости "через ТАБ"  
             
 
2. Поможите с этим ?...

Всего записей: 34 | Зарегистр. 26-05-2009 | Отправлено: 15:30 27-05-2009
DARKDEAD

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
StalkerLegend
Во-первых убери, крайние пробелы, команда СокрЛП(), во-вторых, что такое ТАБ, это определенное кол-во пробелов , ну так и добавь их, в итоге:
 
//описание ваших данных  
    ПервоеПоле="ОАО       Выселкирайгаз";      
    ПервоеПоле = СокрЛП(ПервоеПоле) + "          ";

Всего записей: 249 | Зарегистр. 04-02-2008 | Отправлено: 16:15 27-05-2009
StalkerLegend



Junior Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
DARKDEAD
 
Спасибо от одной проблемы избавился теперь осталась насыщенная
 

Цитата:
Процедура ВыгрузитьДанныеПоЗарплатеИтого()
    
    Файл=Новый ТекстовыйДокумент;
    ПутьФайла="C:\";
    ИмяФайла="УкажитеИмяФайла";
    РасширениеФайла=".k03";
    КодировкаТекстаФайла=КодировкаТекста.OEM;    
    ИтогоСумма=0;
    НомерПлатежногоПоручения="";
    ДатаПлатежногоПоручения="";
    
    ИтогоСумма=ДокПлатежноеПоручениеИсходящее.ПеречислениеЗаработнойПлаты.Итог("СуммаКВыплате");            
    ДатаПлатежногоПоручения=ДокПлатежноеПоручениеИсходящее.Дата;
    НомерПлатежногоПоручения=ДокПлатежноеПоручениеИсходящее.Номер;
        
    //описание ваших данных
    ПервоеПоле="ОАО    Выселкирайгаз";                  // Организация  
    ПервоеПоле=СокрЛП(ПервоеПоле) + "    ";
    ВтороеПоле="30312064";                          // Лицевой счёт организации
    ВтороеПоле=СокрЛП(ВтороеПоле) + "    ";
    ТретьеПоле="5158 ";                                // Номер отделения банка  
    ТретьеПоле=СокрЛП(ТретьеПоле) + "    ";
    ЧетвертоеПоле="0";                                // Количество сотрдудников в ведомости
    ЧетвертоеПоле=СокрЛП(ЧетвертоеПоле) + "    ";
    ПятоеПоле=ИтогоСумма;                               // сумма
    ШестоеПоле=" №"+СокрЛП(НомерПлатежногоПоручения);   // номер платёжки
    СедьмоеПоле=" от "+Формат(ДатаПлатежногоПоручения,"ДФ=""дд ММ гггг"""); // дата платёжки
    
    Файл.ДобавитьСтроку(ПервоеПоле+ВтороеПоле+ТретьеПоле+ЧетвертоеПоле+ПятоеПоле+ШестоеПоле+СедьмоеПоле);
    Файл.Записать(ПутьФайла+"\"+ИмяФайла+РасширениеФайла, КодировкаТекстаФайла);  
    
КонецПроцедуры    

 
С описание что где находится выше...жду ответов с нетерпением. =)

Всего записей: 34 | Зарегистр. 26-05-2009 | Отправлено: 16:31 27-05-2009
M_Volkov



Gold Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
dimaxmaster

Цитата:
это такой метод защиты от 1С, так как семерку ругали направо и налево именно из-за ее "защиты", поэтому в восьмерке они подошли к делу посерьезней

Это я понял, но не нашел описания этих "стандартных средств" защиты. Нашел лишь "Ограничение доступа к модулям конфигурации", как пароль вешать, но это не то! А где то?
Может это: Конфигурация - Поставка конфигурации - Настройка поставки, и снимаем галочку "Включать в поставку исходный текст модулей объекта"? Не похоже - у модуля уатАРМ эта галочка есть (или это обман?).
Еще пара конкретных вопросов:
1. Можно ли как-то сразу видеть, какие модули защищены, какие - нет? Или придется по всем пробежаться и пытаться их открыть?
2. К примеру, допустим, что mdid, зачавший этот вопрос, перед увольнением защитил таким образом (компиляцией и удалением исходного текста) ряд модулей, в которых он сделал пусть небольшие изменения. На его место пришел новый человек, и пытается снять защиту. Декомпилятора 1Cv81 я полагаю не существует? Но по алгоритму работы воссоздал их (изменения, сделанные mdid) заново, и хочет убедиться на сколько точно он это сделал. Для этого, допустим, воссозданные модули скомпилировал и ... Можно ли как-то сравнить скомпилированные модули?

Всего записей: 5783 | Зарегистр. 23-06-2008 | Отправлено: 16:36 27-05-2009 | Исправлено: M_Volkov, 16:38 27-05-2009
anachrom

Junior Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
В v8.1 Управление Торговлей хотелось бы сделать печать нескольких видов ценников.
которые были бы привязаны к Ценовой группе товара.

Код:
 
ТипЦенника = СокрЛП(СтрокаТаблицы.Номенклатура.ЦеноваяГруппа);
Если ТипЦенника = "Маленький" Тогда
КонецЕсли;
 

Т.е. Ценовая группа = маленький => маленький ценник, Ценовая группа = средний => средний ценник, Ценовая группа = большой => большой ценник.
Вот как мне это в стандартную функцию вписать
Помогите пожалуста.

Всего записей: 179 | Зарегистр. 18-11-2008 | Отправлено: 16:46 27-05-2009 | Исправлено: anachrom, 17:11 27-05-2009
dimaxmaster

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
M_Volkov

Цитата:
Конфигурация - Поставка конфигурации - Настройка поставки, и снимаем галочку "Включать в поставку исходный текст модулей объекта"? Не похоже - у модуля уатАРМ эта галочка есть (или это обман?).  

 
Да, именно это я имел ввиду. Но эта галочка может выставляться на какие-то конкретные модули так и на конфигурацию в целом. Нужно посмотреть именно те модули которые отсутствуют, есть ли там вообще эта галочка.
 

Цитата:
1. Можно ли как-то сразу видеть, какие модули защищены, какие - нет? Или придется по всем пробежаться и пытаться их открыть?  

 
нужно в конфигурации поглядеть настройку поставки, возможно так. Проще было бы говорить, если бы глянул на конфу.
 

Цитата:
2.  ...Для этого, допустим, воссозданные модули скомпилировал и ... Можно ли как-то сравнить скомпилированные модули?

 
не пробовал такое, надо пробовать, но думаю врядли

Всего записей: 333 | Зарегистр. 05-06-2008 | Отправлено: 17:21 27-05-2009
DARKDEAD

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
StalkerLegend
судя по листингу, мне не понятно, каким образом заполняются поля, они статичны, кроме 5-го, 6-то и 7-го, это рабочий пример?
 
Добавлено:
и что за проблема сечас, то что выше очень сумбурно и не понятно, в чем теперь загвоздка?

Всего записей: 249 | Зарегистр. 04-02-2008 | Отправлено: 17:24 27-05-2009
rmobile

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Добрый вечер господа Гуру 1С. Обыскал весь инет, и форум.. ничего не нашел, а судя по запросам, проблема актуальная, но видимо для профи банальная. Как можно печатать в 3 - 4 -5 колонок ценники, а не как по умолчанию в 2. Ниже код, но первая страничка выходит неправильно, помогите разобраться пожалуйста.
 
Процедура ДобавитьЦенник(Таб, Печфирма, ПечНаименование, ПечЕдиница, ПечРозн, Столбик, Ряд)
 
Столбик = ?(Столбик <= 3, Столбик,0);
Ряд = ?(Столбик = 0, Ряд + 1, Ряд);
Если Ряд > 4 Тогда
Таб.НоваяСтраница();
Ряд = 1;
КонецЕсли;
Если Столбик = 0 Тогда
Таб.ВывестиСекцию("Товар|Ценник");
Иначе
Таб.ПрисоединитьСекцию("Товар|Ценник");
КонецЕсли;
Столбик = Столбик + 1;
КонецПроцкдуры // ДобавитьЦенник()
 
Выводит вот так :
 
* * *
* * * *
* * * *
* * * *
* * * *
----------
* * * *
* * * *
* * * *
* * * *
-----------

Всего записей: 7 | Зарегистр. 08-09-2008 | Отправлено: 19:19 27-05-2009
Fanat Andrew



Junior Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
An4eus
 

Цитата:
Fanat Andrew  
платформа какая?

 
8.0
 

Всего записей: 80 | Зарегистр. 14-03-2006 | Отправлено: 19:23 27-05-2009
rmobile

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Платформа 7.7

Всего записей: 7 | Зарегистр. 08-09-2008 | Отправлено: 19:31 27-05-2009
An4eus



Silver Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Fanat Andrew
Цитата:
8.0
это пока не ко мне
 
rmobile
1. полное наименование конфигурации и номер
2. откуда идёт печать: из обраьотки или из справочника [что именно выбирается при печати]?

----------
Век живи - век учись!

Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 19:49 27-05-2009
rmobile

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Не помню я точно конфигурацию, но точно стандартная торговля и склад. Печать идет скорее всего из обработки (я так думаю), а печатаю просто =Кнопочка "номенклатуры" список и ценники... все =)

Всего записей: 7 | Зарегистр. 08-09-2008 | Отправлено: 20:02 27-05-2009
An4eus



Silver Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
rmobile
что-то такой код нигде не могу найти... по крайне мере в ТиС 958...

Код:
Процедура ДобавитьЦенник(Таб, Печфирма, ПечНаименование, ПечЕдиница, ПечРозн, Столбик, Ряд)  
 
//Столбик = ?(Столбик <= 3, Столбик,0);  
Столбик = ?(Столбик <= 5, Столбик,0);//теперь в 5 столбиков...
Ряд = ?(Столбик = 0, Ряд + 1, Ряд);  
Если Ряд > 4 Тогда  
Таб.НоваяСтраница();  
Ряд = 1;  
КонецЕсли;  
Если Столбик = 0 Тогда  
Таб.ВывестиСекцию("Товар|Ценник");  
Иначе  
Таб.ПрисоединитьСекцию("Товар|Ценник");  
КонецЕсли;  
//Столбик = Столбик + 1;  
КонецПроцкдуры // ДобавитьЦенник()


----------
Век живи - век учись!

Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 20:16 27-05-2009
Fanat Andrew



Junior Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
An4eus
 
ЖАль а для 8.1 тоже не к тебе?

Всего записей: 80 | Зарегистр. 14-03-2006 | Отправлено: 20:22 27-05-2009
rmobile

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Нужно как раз 4*4 столбика, и то что ты предлагаешь работать не будет =)) Столбик будет всегда равен Null ? а код такой не найдешь =), это я уже правил стандартный.....

Всего записей: 7 | Зарегистр. 08-09-2008 | Отправлено: 20:23 27-05-2009
An4eus



Silver Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
rmobile
+ мне нужно увидеть процедуру Сформировать() ...
ща всё заработает...
 
Добавлено:
Fanat Andrew

Цитата:
An4eus
ЖАль а для 8.1 тоже не к тебе?

ну пока так...

----------
Век живи - век учись!

Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 20:26 27-05-2009 | Исправлено: An4eus, 20:27 27-05-2009
rmobile

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Цитата:
как же тут цитировать е мое =)

Да стандартно все

Всего записей: 7 | Зарегистр. 08-09-2008 | Отправлено: 20:28 27-05-2009 | Исправлено: rmobile, 20:30 27-05-2009
   

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » 1C Программирование и поддержка
ShIvADeSt (30-10-2009 09:51): http://forum.ru-board.com/topic.cgi?forum=33&topic=10715


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru