Procedura-POSAddStoreCard

Parametry:

NázevPopisDatový typ
IN_Owner_IDChar(10)
IN_NameVarChar(100)
IN_CodeVarChar(40)
IN_ShortNameVarChar(15)
IN_SpecificationVarChar(30)
IN_Specification2VarChar(30)
in_noteVarChar(2048)
IN_HIDDENChar(1)

Tělo:

begin
  if (IN_HIDDEN='N') then begin
    INSERT INTO SYS$POSStoreCards (Owner_ID, Code, Name, ShortName, Specification, Specification2, Note)
      VALUES (:IN_Owner_ID,
              upper(IB_REMOVE_DIACRITICS(:IN_Code) Collate PXW_CSY),
              upper(IB_REMOVE_DIACRITICS(:IN_Name) Collate PXW_CSY),
              upper(IB_REMOVE_DIACRITICS(:IN_ShortName) Collate PXW_CSY),
              upper(IB_REMOVE_DIACRITICS(:IN_Specification) Collate PXW_CSY),
              upper(IB_REMOVE_DIACRITICS(:IN_Specification2) Collate PXW_CSY),
              upper(IB_REMOVE_DIACRITICS(:in_note) Collate PXW_CSY));
  end
end;

Generated by ABRA Software a.s. 27.10.2021 16:34:31