Приемы и подходы, обмен опытом
Модераторы: Screw, larin
-
masygreen
- партнер
- Сообщения: 112
- Зарегистрирован: Чт, 20/03/2008 09:10
- Имя Фамилия: Максим Черепанов
- Откуда: IT
-
Контактная информация:
Сообщение
masygreen »
Код: Выделить всё
.LinkForm 'OSKATOP_FRM' Prototype is 'OSKATOP'
.Group 'Основные средства'
.NameInList 'Моя форма. Список операций по карточке'
.var
Kart_Number:string;
.endvar
.fields
Инвентарный_Номер
.endfields
^
.{
.[F
.begin
Message('00000');
end.
.]F
.}
* - операция проведена
Message('11111');
.endform
месаж 000 выходит,111 нет... почему?
-
den
- заказчик
- Сообщения: 117
- Зарегистрирован: Пт, 26/10/2007 14:16
- Имя Фамилия: Денис Кучин
- Откуда: Геомостпроект НПО
Сообщение
den »
.begin
end.
?
-
masygreen
- партнер
- Сообщения: 112
- Зарегистрирован: Чт, 20/03/2008 09:10
- Имя Фамилия: Максим Черепанов
- Откуда: IT
-
Контактная информация:
Сообщение
masygreen »
то я чего то тупокод послал :)
но так тоже не работает ....
Код: Выделить всё
.LinkForm 'OSKATOP_FRM' Prototype is 'OSKATOP'
.Group 'Основные средства'
.NameInList 'Моя форма. Список операций по карточке'
.var
Kart_Number:string;
dbeg,dend:date;
.endvar
.fields
Инвентарный_Номер
.endfields
^
.{
.[F
.begin
Message('00000');
end.
.]F
.}
* - операция проведена
.begin
Message('1111');
if(RunDialog('C_COMMON::GETINTERVAL',dbeg,dend)=cmok) Message(dend);
end.
.endform
* - операция проведена - это уже не выводится
-
Ged
- топ-софт
- Сообщения: 76
- Зарегистрирован: Вс, 16/09/2007 10:23
- Имя Фамилия: Леонид Поликутин
- Откуда: Галактика СПб
-
Контактная информация:
Сообщение
Ged »
Есть такая тема.. - надо в пир, чтобы организовывали циклы по CheckEnter