Имя: Пароль:
1C
1С v8
Электронные накладные
,
0 Guinplen
 
08.10.13
08:47
Добрый день! Требуется сделать электронные накладные в виде двух файлов формата DBF с кодировкой dBase RUS cp866 (формат dBase, желательно v 7.0). С чего начать?
1 Guinplen
 
08.10.13
08:48
Наименование поля    Тип поля    Условие    Коментарий
1    DocNumber    char(15)    Обязательно    Номер накладной
2    RegDate    Date    Обязательно    Дата накладной
3    Inn    char(22)        ИНН поставщика
4    Contr    int    Обязательно    Код Продавца (поставщика)
5    Consig    int    Обязательно    Код получателя
6    Order    int    Обязательно    Код Контракта (Договора) (Контракта (Договора)) поставщика
7    Remark    char(100)        Примечания
2 Mikeware
 
08.10.13
08:49
начни с приглашения проограммиста
3 Wobland
 
08.10.13
08:49
с изучения документации, конечно
4 Mikeware
 
08.10.13
08:50
(3) если у ТС не возникло мыслей почитать документацию - она ему не поможет...
5 dk
 
08.10.13
08:50
Еще в поиск не отправляли
6 Guinplen
 
08.10.13
08:50
Спасибо! может, ссылки есть с чего начать ?
7 Мизантроп
 
08.10.13
08:52
(6) ya.ru
8 Guinplen
 
08.10.13
08:55
Mike, прООграммист - не, не видел
9 anaed
 
08.10.13
08:57
(0) открываем СП и читаем про xBase
10 cw014
 
08.10.13
08:58
Можешь хотя бы СП почитать
11 Guinplen
 
08.10.13
09:08
Зачем нужно сидеть умничать, глумиться.
Неужели трудно подсказать?!
12 Wobland
 
08.10.13
09:09
(11) подсказали ж
13 shuhard
 
08.10.13
09:10
(11) а западло
14 cw014
 
08.10.13
09:26
(11) Даю подсказку - пока бесплатную. Открываешь СП, раскрываешь ветку "Общие объекты", ищешь ветку "XBase", читаешь
15 Guinplen
 
08.10.13
09:29
cw014, спасибо!
16 Guinplen
 
08.10.13
14:07
а что такое СП?
17 anaed
 
08.10.13
14:10
(16) Справочник пользователя
18 Данил Сергеевич
 
08.10.13
14:14
(17) Может все таки Скорый Поезд?
19 Elf_80_lvl
 
08.10.13
14:15
//Выгрузка
БД = Новый XBase;
БД.Поля.Добавить("CODE", "S", 5);
БД.Поля.Добавить("NAME", "S", 40);
БД.СоздатьФайл(Путь + "start.dbf", Путь + "index.cdx");
БД.Индексы.Добавить("IDXCODE", "CODE");
ФлИБД = БД.СоздатьИндексныйФайл(Путь + "index.cdx");
БД.АвтоСохранение = Истина;

Выборка = Справочники.Номенклатура.ВыбратьИерархически();
Пока Выборка.Следующий() Цикл
    БД.Добавить();
    БД.CODE = Выборка.Код;
    БД.NAME = Выборка.Наименование;
КонецЦикла;

БД.ЗакрытьФайл();

//загрузка
БД = Новый XBase;
БД.ОткрытьФайл(Путь + "start.dbf", Путь + "index.cdx");
БД.ТекущийИндекс = БД.Индексы.IDXCODE;

Пока БД.Следующая() Цикл
    Сообщить(БД.CODE);
    Сообщить(БД.NAME);
КонецЦикла;

БД.ЗакрытьФайл();
20 dk
 
08.10.13
14:16
Программист всегда исправляет последнюю ошибку.