Формы отчётов из L_SKLAD.res

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

BlazeBio
Местный житель
Сообщения: 386
Зарегистрирован: 27 апр 2010, 14:31
Контактная информация:

Формы отчётов из L_SKLAD.res

Сообщение BlazeBio »

Я, наверное, лезу в дебри Амазонки. Но у меня такие вопросы по ресурсу L_Sklad.res.(наверное они касаются всех стандартных галактических ресурсов).
Можно ли из ресурса L_SKLAD извлечь каким-то образом формы отчётов по приходным и расходным ордерам?
Если нельзя, то может как-то можно подменить существующие поля?
Или только можно добавлять свои отчёты?
Алексей
Местный житель
Сообщения: 2896
Зарегистрирован: 24 июн 2005, 12:12
Откуда: Иркутская область

Сообщение Алексей »

а что значит извлечь? :) с патчами идут архивы ФРМок. ну и имея лицензию на фком - включив параметр forms.fcenv=on можно стоя на форме переключить закладку, нажать ф4 и вы получите исходник искомой формы.
BlazeBio
Местный житель
Сообщения: 386
Зарегистрирован: 27 апр 2010, 14:31
Контактная информация:

Сообщение BlazeBio »

Что за архив ФРМок?. Можно поподробнее и где включается параметр forms.fcenv=on ?
Алексей
Местный житель
Сообщения: 2896
Зарегистрирован: 24 июн 2005, 12:12
Откуда: Иркутская область

Сообщение Алексей »

ехе\frm\*.rar - там то, что дают от исходников

параметр включается в конфигураторе. можно сразу в галнет.кфг его прописать.
BlazeBio
Местный житель
Сообщения: 386
Зарегистрирован: 27 апр 2010, 14:31
Контактная информация:

Сообщение BlazeBio »

Спасибо нашёл! Буду ковыряться. :grin:
Masygreen
Местный житель
Сообщения: 1089
Зарегистрирован: 04 сен 2008, 11:27
Откуда: Москва
Контактная информация:

Сообщение Masygreen »

это называется присоединенные формы. LinkForm по ним и поиск в форуме
Время ведет!
BlazeBio
Местный житель
Сообщения: 386
Зарегистрирован: 27 апр 2010, 14:31
Контактная информация:

Сообщение BlazeBio »

А prototype 'skorder' можно как-то подредактировать? А то в архиве с исходниками ....exe/frm/L_Sklad.rar обновление архива не поддерживается. :(
Vik
Местный житель
Сообщения: 370
Зарегистрирован: 28 сен 2006, 15:43
Откуда: Санкт-Петербург
Контактная информация:

Сообщение Vik »

BlazeBio писал(а):А prototype 'skorder' можно как-то подредактировать? А то в архиве с исходниками ....exe/frm/L_Sklad.rar обновление архива не поддерживается. :(
Прототипы трогать вообще нельзя. Зачем понадобилось что-то в нем редактировать? Редактируйте линк-форму. Да и обновление прототипов в архиве погоды не сделает, они скомпилированы в ресурсы, а в архивах просто исходники их.
BlazeBio
Местный житель
Сообщения: 386
Зарегистрирован: 27 апр 2010, 14:31
Контактная информация:

Сообщение BlazeBio »

Хорошо в linkform я добавляю свою поле osum, то компилятор в Галактике ругается, что нет такого метода и поля и поля, хотя в alter interface оно есть. Может я что-то должен дописать в linkform ? Я мало работал с linkform.
Vik
Местный житель
Сообщения: 370
Зарегистрирован: 28 сен 2006, 15:43
Откуда: Санкт-Петербург
Контактная информация:

Сообщение Vik »

На форуме очень много тем, которые вам помогут. Поищите, как Masygreen советовал. Alter interface не имеет никакого отношения к link-формам. Или вы в альтер интерфейсе пытаетесь изменить формирование потока данных для линкформы?
BlazeBio
Местный житель
Сообщения: 386
Зарегистрирован: 27 апр 2010, 14:31
Контактная информация:

Сообщение BlazeBio »

Поискал по форуму и нашёл, что поле можно добавить через view. Только почему-то поле постоянно в отчётах выводит нулевое значение.
Вот код :

Код: Выделить всё

.Group 'Складской ордер'
.NameInList 'СТАНДАРТНЫЙ СКЛАДСКОЙ ОРДЕР'
.var
  Sender:String
  senderpost:String
  Recipient:String
  RecipientPost:String
.endvar
.Create    view localSklOrder
from
  SklOrder;
.Create   view v1 (osum) as select sporder.kol*sporder.rsrprice from spsopr;
.fields
  CommonFormHeader
  OrdName
  nOrder
  dOrder
  Osnov
  Sklad
  'в '+RublSimv
  'в '+RublSimv
  NNomer
  MC
  ED
  Kol
  Price
  v1.osum
  Itogo
  Senderpost
  Sender
  RecipientPost
  Recipient
.endfields                    
Не знаете почему?
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5187
Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb

Сообщение edward_K »

добавить в create view
where (( ??????? == spsopr.nrec ))
вместо ??????? подставить значение
перед выводом
if v1.getfirst spsopr=0 {}
обычно в прототипе есть nrec документов и их спецификаций
здесь может быть есть только на ордер
where (( ??????? == sporder.nrec and sporder.cspsopr == spsopr.nrec ))
...
if v1.getfirst sporder=0 {}
if v1.getfirst spsopr=0 {}
BlazeBio
Местный житель
Сообщения: 386
Зарегистрирован: 27 апр 2010, 14:31
Контактная информация:

Сообщение BlazeBio »

Чего-то не пойму :-o if на проверку по нулям? мне нужно вывести не нулевые значения. Я сделал такое view

Код: Выделить всё

.Create      view v1 (osum) as select sporder.kol*sporder.rsrprice from spsopr
where ((SpOrderRec== sporder.nrec and sporder.cspsopr == spsopr.nrec )) ;    
и все равно выводится 0. Что-то опять делаю не так ?
Yuri
Посетитель
Сообщения: 43
Зарегистрирован: 18 ноя 2009, 02:56
Откуда: Гомель, Республика Беларусь

Сообщение Yuri »

Может быть достаточно так ?
.Create view v1 (osum) as select sporder.kol*sporder.rsrprice from sporder where ((SpOrderRec== sporder.nrec)) ;
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5187
Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb

Сообщение edward_K »

да. не узрел что поля то по ордеру выводите.
В формах автопозиционирование не пашет - для этого if getfirst ... в программном блоке.
.begin
if v1.getfirst sporder=0 {}

end.
Ответить