Změny customizací

Změna ve skriptech a sestavách

ExposeToScript pro property

TUserBooks.GetItems() je třeba ve skriptu přepsat na TUserBooks.Items[]

Rozdělení na vlastní firmy (Zboží a pole Celní sazebník)

V unitě Am_StandardDoc.pas se mění následující:

• za původní f-ci Get_NameOfGoods137 (která již nebude ve standardu používána) je f-ce Get_NameOfGoods141 (Důvodem je změna parametru pro "Neuvádět název zboží" z flagu na nové pole typu Boolean) - Je potřeba původní f-ce ve speciálních sestavách dokladů nákupu a prodeje nahradit novou funkcí včetně změny parametru.

Nový kód v sestavách (tučně zvýrazněné změny):

Result:= Get_NameOfGoods141 (sc.NumberOfItem,

sc.OneLineItem,

Data.SaleItemsChild_OrigItemZ,

Data.SaleItemsChild_OrigItemO,

Data.SaleItemsChild_Naz_Abbr,

Data.SaleItemsChild_CFNazC,

Data.SaleItemsChild_C_Zbo_NoArticleName,

1)

• za původní f-ci SuppressDetWithDescOfItem je f-ce SuppressDetWithDescOfItem141 (mění se typ parametru String na Boolean… Zbo;Flagy)

Nový kód (tučně zvýrazněné změny):

Result:= SuppressDetWithDescOfItem141 (Data.SaleItemsChild_Naz_Abbr,

Data.SaleItemsChild_CFNazC,

Data.SaleItemsChild_C_Zbo_NoArticleName,

Data._TypeRec

)

• zároveň došlo ke změnám v celním sazebníku. Protože je pole možné nyní používat pro vlastní firmy, bylo pole TarDuty upraveno na TarDutyCalc. Je tedy nutné ve výběru polí toto upravit včetně výskytu tohoto pole v kódu sestav.

Odstranění závislosti na poznámkách - skripty Export faktur do XML a Export faktur do XML

Ve skriptu Export faktur do XML (ISDOC) a Export faktur do XML (ISDOC 6.0) byly provedeny následující změny:

1) plnění elementů v uzlu AccountingCustomerParty.Party.Contact již není závislé na poznámce KO na faktuře, plní se z pole Kontaktní osoba z nadřízeného dokladu,

2) parametr AddNoteToDoc již nepřidá poznámku I1 na fakturu, ale přidá komentář typu ISDOC,

3) ze skriptu byly odstraněny části skriptu, které se týkají záloh, které byly řešeny dnes již standardně nepodporovanými položkami prodeje "zboží typu záloha".

Nová grupa - VF_DOK01.AM

Do sestavy VF_DOK01.AM byla po opakovaných požadavcích přidána nová grupa pro grupování položek dokladu, která bude sloužit výhradně pro speciály. Tato grupa ale může ovlivnit stávající speciály odvozené ze sestavy VF_DOK01.AM. implicitně je grupa prázdná.

Je třeba prověřit hlavně sumační pole. Ta se vyčíslují podle čísla grupy a nová grupa toto mění.

Standardní doklady nákupu a prodeje (sestavy *.DOK01.AM)

V sestavách standardních dokladů nákupu a prodeje (např. VF_DOK01, ZAK_DOK01, OBV_DOK01 apod.) Došlo k úpravě zobrazování dodatků položek, dodatků ze zboží, dodatků zákazníka a dodatků z hlavičky dokladu. V těchto sestavách již dále nejsou podporovány dodatky zadávané v poznámkách (např. poznámku typu DZ na zákazníkovi). Podporovány jsou již jen komentáře. (pozn.: existuje standardní konverzní skript pro konverzi vybraných poznámek na komentáře).

V případě dodatků DO, které se zobrazovaly vždy bez ohledu na parametr byla provedena změna. Vznikl nový parametr Notes, do kterého lze vložit typy komentářů (jednotlivé typy oddělit středníkem), které se mají zobrazit.

Cestovní příkazy - rozdělení na vlastní firmy

Cestovní příkazy – číselníky - rozdělení na vlastní firmy způsobem, že každá vlastní firma má svoje číselníky.

Jsou to tyto datové moduly:

TD_CPC_SCZ - domácí stravné

TD_CPC_SZH - zahraniční stravné

TD_CPC_PCZ - Ceny PHM - tuzemsko

TD_CPC_SKM - Sazebník za km jízdy

TD_CPC_KCZ - Krácení tuzemského stravného

TD_CPC_KZH - Krácení zahraničního stravného

TD_CPC_KAP - Zákonné kapesné

Bylo přidáno pole CompanyId i do obou klíčů.

Pokud se přistupuje k datovém modulu způsobem SetKey, DoNext nebo DoPrior, musí se CompanyId vyplnit, nelze spoléhat na to, že se sama doplní z kontextu dm.

Př.:

  DmFoodFor := Dict.GetDataModule (cD_CPC_SZH) as TD_CPC_SZH; 

1. Mám odkud přebrat DataMContext

    DmFoodFor.UseDataMContext(Self, procedure

        DmFoodFor [CP_Cis_CompanyId].AsLong := DmFoodFor.CompanyFilter;

        …..

    end);

nebo

2. následovně 

var

  LCompanyDivide: ICompanyDivide;

begin

    if Supports(DmFoodFor, ICompanyDivide, LCompanyDivide)

    then DataField[CP_Cis_CompanyId].AsLong := LCompanyDivide.CompanyFilter

     …..

Odstranění závislosti na poznámkách - std skripty a sestavy

Ze standardu byly vyřazeny tyto skripty:

Doplnění oslovení u kontaktních osob - Kos_DoplOsl1.pas

Vlož dodatek do dokladu – DODDOKL.pas

skripty v modulech JCD (JSD_FORM1.pas, JSD_FORM2.pas, JSD_FORM3.pas, JSD_FORM4.pas a JSD_FORM54.pas)

Připojování komentářů k položkám nákupu/prodeje/převodek

Historicky se komentáře připojovaly přes tabulku E_SerNumItems. Do verze K2 luna byla provedena úprava a komentáře jsou nyní připojeny přes příslušnou tabulku položek (tedy buď prodeje, nákupu, převodek). Součástí verze je i inicializace.

Došlo ke zrušení metody na komentářích CommonStringList a tato metoda byla nahrazena metodou GetCommnetStrigList se vstupními parametry Typ komentáře a Jazyk.

Příklad volání:

TDataM.CommentChild.GetCommentStringList