home K2»Infoservice»Diskusní fórum»Zápis do podřízeného modulu v LUNA

Topic created by Macků Mílek
Last contribution added by Macků Mílek Monday, December 14, 2020 12:40:50 PM. Topic contains 5 Replies.
Module: Process:
Friday, December 04, 2020 10:21:22 AM
  • Macků Mílek
  • Registered1/14/2009
  • Naposledy přihlášen 2/3/2021
Dobrý den, potřeboval bych poradit, co dělám špatně, program proběhne ale věty se nezapíšou.

MojeZbo.BeginEdit(RemEdit);
try
MojeZbo.RelatedGoodsChild.BeginEdit(remAppend);
MojeZbo.RelatedGoodsChild.RelationType := Vety.Vztah;
MojeZbo.RelatedGoodsChild.GoodsId := Podrizene.Cis;
MojeZbo.RelatedGoodsChild.MasterGoodsId := MojeZbo.Cis;
MojeZbo.RelatedgoodsChild.SaveEdit;
finally
MojeZbo.RelatedGoodsChild.EndEdit;
MojeZbo.EndEdit;
ToLog('Importována související položka ' + trim(Vety.Souvisejici) + ' pro Zboží ' + trim(Vety.Zkratka),0);
end;

end;
GauClose();
ToLog('Import souvisejících ukončen dne ' + DateToStr(date()) + ' v ' + TimeToStr(time()),0);
CloseCell;

Friday, December 04, 2020 10:37:01 AM
Dobrý den,
neukládáte doklad MojeZbo.SaveEdit;
Doporučuji použít konstrukci with, která vše potřebné zajistí sama:

with MojeZbo do (remEdit) do begin
nastavení hodnot;
with MojeZbo.RelatedGoodsChild do (remAppend) begin
nastavení hodnot;
end;
end;

Jak vidíte, tak není potřeba žádný blok try .. finally.

Friday, December 04, 2020 3:04:43 PM
  • Macků Mílek
  • Registered1/14/2009
  • Naposledy přihlášen 2/3/2021
Děkuji moc, zejména ta varianta s with se mi moc líbí.

Friday, December 11, 2020 12:24:53 PM
  • Macků Mílek
  • Registered1/14/2009
  • Naposledy přihlášen 2/3/2021
A ještě se zeptám, je možné otestovat v rámci tohoto cyklu existenci věty se stejným recordID?

Friday, December 11, 2020 4:13:50 PM
Tohle není cyklus. To je uložení záznamu co bylo předtím BeginEdit – SaveEdit – EndEdit. Existenci záznamu musíte řešit před tím. Možná by byl lepší konkrétní příklad, ať každý nemyslíme něco jiného.

Monday, December 14, 2020 12:40:50 PM
  • Macků Mílek
  • Registered1/14/2009
  • Naposledy přihlášen 2/3/2021
Děkuji, již jsem to vyřešil, chyba byla samozřejmě na mé straně.