Opravný daňový doklad ------------------------------------------ Předloha výstupu Činnost: (SP0151) Procesy Typ: Sestava Autor: Správce systému Vznik: 18.03.2011 08:41:37 Změna: 23.03.2011 12:14:53 Interní ID: SP0151_W36A0IO4GH Popis: Local lopdf, _rt IF _akce<>'TOFILE' OR _typ<>1 select sql_tisk RETURN .T. ENDIF select sql_tisk go top *brow lopdf = Createobject("bm_code_syspdf") lopdf.ridic=_this lopdf.parametr_profilu=_parametr_profilu *lopdf.recipaddress='*PLUDA_AD01ID' lopdf.recipaddress=tool.sql_dotaz([select ADJ.ad11email from BM_SERVIS.ADSPOJ ADJ, BM_SERVIS.ADADSAT AD where ]+; [ AD.ad01id=?_p1 and AD.ad01id=ADJ.ad01id and AD.ad11cisspo=ADJ.ad11cisspo], SQL_TISK.OBUDAL_ad01id) lopdf.subject='Faktura '+SQL_TISK.SPPRC_sp33cisdr+'-'+SQL_TISK.SPPRC_sp33cisdpm+'-'+SQL_TISK.SPPRC_sp33cisd *lopdf.subject='Faktura '+bw_tiskh('PLA', 'SQL_TISK.PLUDA_pl02vs') *lopdf.messagetext='Zaplate nebo zemřete !!!'+chr(13)+chr(13)+tool.jmenot lopdf.messagetext='' lopdf.creport= _frx * Metoda MAIN objektu třídy BM_CODE_SYSPDF vytváří dokument PDF a vrací numerickou hodnotu (0,1,17 ...) Return lopdf.Main()=0 #INCLUDE SYSPDF Balíček vytvořil: SPRÁVCE (00000-01) 23.03.2011 13:53:12