Форум программистов, компьютерный форум, киберфорум
1С: Собственные программы
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.55/11: Рейтинг темы: голосов - 11, средняя оценка - 4.55
 Аватар для mikkijon
1 / 1 / 0
Регистрация: 29.08.2014
Сообщений: 282
1C 8.x (тонкий)

Серийный номер талонов на топливо (самописка)

15.10.2014, 19:55. Показов 2238. Ответов 10
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здравствуйте многоуважаемые форумчане!!
Снова нужна ваша помощь в программе 1С. Бороздя по просторам интернета я уже совсем запутался и теперь не знаю с какой стороны подойти.
Дело в том что мне нужно реализовать такую задачу: На фирме сотрудники получают талоны на топливо Бензин и Дизель. Нужно чтобы в базе учитывался приход талонов и их выдача водителям. Данные талоны разного номинала и соотвественно серийного номера Например Талон на бензин номинала 10 литров имеет серийный номер В20000405701 или на талон на Дизель номинала 20 литров имеет серийный номер Е3000245703, Последние две цифры на данных талонах разные.
Моя задача состоит в том что при заполнении документа "ПриходТалона" серийный номер талона автоматически менял фру в конце серийного номера талона например: Пользователь заполняет приход талона на бензин и ставит серийный номер В20000405745, при заполнении следующей строки серийный номер должен быть В20000405746 и.т.д. точно так же и с талонами на дизель
Я пробовал ставит цикл но не получается у меня ничего. Также у меня не получается преобразовать строку в число
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
15.10.2014, 19:55
Ответы с готовыми решениями:

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

Серийный номер
Не могу найти информацию как можно реализовать активацию в моей программе (нужно при первом запуске сгенерировать ключ вида...

Серийный номер, IMEI и др
Привет! Нужен уникальный идентификатор каждого устройства, пишу вот так: #if defined(TARGET_OS_IPHONE) ||...

10
286 / 186 / 18
Регистрация: 20.02.2012
Сообщений: 926
16.10.2014, 11:56
утрированно:

1C
1
НомерТалона = "В" + Строка(Номер+1);
где номер - числовое значение,
в итоге получишь типа "В200000001"
0
 Аватар для mikkijon
1 / 1 / 0
Регистрация: 29.08.2014
Сообщений: 282
16.10.2014, 21:28  [ТС]
SonicQ а можно по подробней я просто начинающий и мало что еще знаю

Добавлено через 1 минуту
SonicQ а можно по подробней я просто начинающий и мало что еще знаю, просто тут она не увеличивает серийный номер таллона а просто добавляет 1 в конце
0
 Аватар для duk337
2956 / 1768 / 84
Регистрация: 03.11.2011
Сообщений: 8,280
18.10.2014, 18:59
Конфигурация?
0
340 / 315 / 43
Регистрация: 20.08.2014
Сообщений: 1,242
Записей в блоге: 1
19.10.2014, 21:06
mikkijon, делаешь регистр куда пишешь последний номер используемого талона.
Измерение - будет номинал
Ресурс - будет последний номер
И при заполнении номера получаешь данные из регистра, добавляешь 1, пишешь при записи документа (получениеталона).
0
 Аватар для duk337
2956 / 1768 / 84
Регистрация: 03.11.2011
Сообщений: 8,280
20.10.2014, 01:18
Лучший ответ Сообщение было отмечено mikkijon как решение

Решение

я вот ленивый, и в таких случаях создавал справочник с автонумерацией: система дура, сама 1 прибавит по префиксу .
Но ТС даже конфигурацию не озвучил.
0
 Аватар для mikkijon
1 / 1 / 0
Регистрация: 29.08.2014
Сообщений: 282
21.10.2014, 16:20  [ТС]
Выгружаю Вам свою конфигурацию и еще один дополнительный вопрос у меня возникает. Тоже самое никак не могу не могу додуматься.....
Нужно чтобы из документы Приход талонов пользователь выбирал из табличной части один из талонов. Тоже никак не могу дотукаться))))
ЗАРАНЕЕ БЛАГОДАРЕН ВАМ ЗА ВАШУ ПОМОЩЬ ФОРУМЧАНЕ.....
Вложения
Тип файла: rar 1Cv8.rar (155.0 Кб, 10 просмотров)
0
 Аватар для duk337
2956 / 1768 / 84
Регистрация: 03.11.2011
Сообщений: 8,280
21.10.2014, 17:52
сажаешь реквизит формы Постфикс тип число
При создании на сервере Постфикс=1
1C
1
2
3
4
5
6
7
8
9
10
11
&НаКлиенте
Процедура ТаблицаПриходаНаименованиеТаллонаПриИзменении(Элемент)
    СтрокаТабЧасти=Элементы.ТаблицаПрихода.ТекущиеДанные;
    СтрокаТабЧасти.СерийныйНомерТаллона=ПолучитьСерийныйНомер(СтрокаТабЧасти.НаименованиеТаллона);
    СтрокаТабЧасти.НоминалТаллона=ПолучитьНоминал(СтрокаТабЧасти.НаименованиеТаллона);
    СтрокаТабЧасти.НаименованиеФирмы=ПолучитьФирму(СтрокаТабЧасти.НаименованиеТаллона);
Если СтрокаТабЧасти.СерийныйНомерТаллона="В200004075" тогда 
СтрокаТабЧасти.СерийныйНомерТаллона="В200004075"+Формат(Постфикс,"ЧЦ=2");
Постфикс=Постфикс+1;
КонецЕсли;
КонецПроцедуры
0
 Аватар для mikkijon
1 / 1 / 0
Регистрация: 29.08.2014
Сообщений: 282
21.10.2014, 19:08  [ТС]
А что такое постфикс

Добавлено через 3 минуты
И можно создать в процедуре "ПолучитьСерийныйНомерНоменклатуры"
0
 Аватар для duk337
2956 / 1768 / 84
Регистрация: 03.11.2011
Сообщений: 8,280
21.10.2014, 19:24
Цитата Сообщение от mikkijon Посмотреть сообщение
А что такое постфикс
Тебя интересует этимология слова? Это переменная формы в виде реквизита. Называй как хочешь, например, "пф".
Цитата Сообщение от mikkijon Посмотреть сообщение
И можно создать в процедуре "ПолучитьСерийныйНомерНоменклатуры"
не знаю. Поскольку я с тонкими формами не работаю - экспериментируй сам. Есле на сервере пройдёт пф=пф+1, тогда отчего ж

Добавлено через 1 минуту
Цитата Сообщение от duk337 Посмотреть сообщение
сажаешь реквизит формы Постфикс тип число
ну, заводишь... или добавляешь
0
 Аватар для mikkijon
1 / 1 / 0
Регистрация: 29.08.2014
Сообщений: 282
21.10.2014, 19:36  [ТС]
Спасбо Вам огромное буду пробовать

Добавлено через 1 минуту
Вы меня всегда выручаете. К сожалению там где я живу мало очень мало людей которые соображают програмирование да и вообще большинство тех кто соображает самоучки))))
Благо недавно у нас в городе появился высокоскоростной интернет)))
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
21.10.2014, 19:36
Помогаю со студенческими работами здесь

Серийный номер флешки
ManagementObjectSearcher theSearcher = new ManagementObjectSearcher("SELECT * FROM Win32_DiskDrive WHERE InterfaceType='USB'"); ...

Серийный номер на этикетке
У меня на этикетке ноутбука сзади стоит один серийный номер, а когда я выполняю команду в cmd wmic bios get serialnumber то показывается...

Серийный номер диска
есть такая функция function GetHardID:string; var SerialNum: dword; a, b: dword; Buffer: array of char; begin if...

Серийный номер устройства
Здраствуйте, подскажите пожалуйста как програмно можна вытянуть серийный номер устройства... или любой другой индевидульный номер...

Серийный номер флешки
Нужно узнать физический серийник флэшки. GetVolumeInformation - возвращает серийный номер тома, который меняется при форматировании. ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
11
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве
8Observer8 02.02.2026
Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .
Философия технологии
iceja 01.02.2026
На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf
8Observer8 01.02.2026
Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли
8Observer8 30.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm
8Observer8 30.01.2026
Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .
SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 29.01.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT
bedvit 28.01.2026
Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .
SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 28.01.2026
Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru