lua:tisk_pomoci_lua
Rozdíly
Zde můžete vidět rozdíly mezi vybranou verzí a aktuální verzí dané stránky.
Obě strany předchozí revizePředchozí verzeNásledující verze | Předchozí verze | ||
lua:tisk_pomoci_lua [2022/07/13 10:50] – [Ukázka tisku vizuálního:] Libor Kadaník | lua:tisk_pomoci_lua [2023/05/25 11:34] (aktuální) – [Ukázka tisku vizuálního:] Karel Petrů | ||
---|---|---|---|
Řádek 1: | Řádek 1: | ||
==== Doplnění LUA reportů o správné ukládání při SaveDocument ==== | ==== Doplnění LUA reportů o správné ukládání při SaveDocument ==== | ||
- | |||
- | * Name - jméno reportu, je použito v názvu souboru: [ID-]Name-IDDokument.ext | ||
- | * v reports.xml doplnit volaní LUA funkce o parametr Name (..., Use, Name) | ||
- | * volanou Lua funkci doplnit o parametr Name | ||
- | * ve volání Print doplnit třetí parametr hash: {document_name=Name} | ||
* MiddleName je použit jako podadresář v reports (report/ | * MiddleName je použit jako podadresář v reports (report/ | ||
Řádek 11: | Řádek 6: | ||
* pokud se tiskne z Query a chceme dokument ukládat k danému rozpočtu, musí byt v prvním Query field // | * pokud se tiskne z Query a chceme dokument ukládat k danému rozpočtu, musí byt v prvním Query field // | ||
- | |||
- | === Pokud potřebuji ID a tiskne se z SQL je první field v SQL (ID) === | ||
- | |||
- | Do typu reportu napsat: '' | ||
- | |||
- | Pro doplneni //TypDokl// a //Cisla dokladu// do dokumentu je potreba v SQL mit field //TypDokl// a mit nastaven primarni index nebo // | ||
- | |||
- | DSI z SQL musi být před tiskem otevřené !!! | ||
- | |||
- | <code lua> | ||
- | function v_zakazky_zakazky.reports.PracVykaz(DSI, | ||
- | local TiskMD=v_prost_vykony.ZakazkaVykazMiddle(DSI: | ||
- | if TiskMD then | ||
- | TiskMD: | ||
- | TiskMD: | ||
- | WindowsManager: | ||
- | TiskMD: | ||
- | end | ||
- | end | ||
- | |||
- | --ponovu | ||
- | return LuaForm.PrintReport(Data.TiskMD, | ||
- | {document_name=Data.Params.Name, | ||
- | AfterSaveLuaHookFunc=" | ||
- | |||
- | </ | ||
=== pokud je použit GotoNextPage=false, | === pokud je použit GotoNextPage=false, | ||
<code lua> | <code lua> | ||
+ | --pro specielni pripady ze je dialogu vybran konktretni partner nebo zakazka a dokument pak chci s nim spojit (napr. seznam faktur) | ||
if res.idpartner ~= "" | if res.idpartner ~= "" | ||
local MD=ClientSession: | local MD=ClientSession: | ||
Řádek 55: | Řádek 25: | ||
</ | </ | ||
- | === Pro tisk metodou CreatePrint-CreateReport-StartPrint === | ||
- | Pro doplneni //TypDokl// a //Cisla dokladu// do dokumentu je potreba ve **BeforeSaveToDocumentDir(DSI, | ||
- | Z DSI se bere //TypDokl// a // | ||
- | |||
- | <code lua> | ||
- | local prnt=WindowsManager: | ||
- | local report=prnt: | ||
- | local FileName | ||
- | local Options = {Report=ReportName, | ||
- | if Action==PRINT_DOCUMENT then | ||
- | if ID ~= "" | ||
- | FileName=dokumenty_dokumenty.BeforeSaveToDocumentDir(DSI, | ||
- | end | ||
- | prnt: | ||
- | | ||
- | ... | ||
- | |||
- | prnt: | ||
- | report: | ||
- | prnt:Free() | ||
- | if Action==PRINT_DOCUMENT then | ||
- | dokumenty_dokumenty.AfterSaveToDocumentDir(nil, | ||
- | end | ||
- | | ||
- | </ | ||
- | |||
- | |||
====Ukázka tisku vizuálního: | ====Ukázka tisku vizuálního: | ||
Řádek 95: | Řádek 38: | ||
====Ukázka nevizuálního tisku middle:==== | ====Ukázka nevizuálního tisku middle:==== | ||
- | Vytiskne do souboru "m:/tmp/out.sxc" řádky " | + | Vytiskne do souboru "/ |
Middle musí být otevřené a vybrané řádky musí být " | Middle musí být otevřené a vybrané řádky musí být " | ||
<code lua> | <code lua> | ||
- | ClientSession: | + | ClientSession: |
</ | </ | ||
====Ukázka tisku vizuálního: | ====Ukázka tisku vizuálního: | ||
- | Preferovaný způsob fungující | + | -pokud potřebuji **ID** a tiskne se z **SQL** je potřeba nastavit **primarni index root DSI**. GotoNextPage urcuje, zda je report seznam ID="" |
+ | -pro doplneni **TypDokl** a **Cisla dokladu** do dokumentu je potreba | ||
+ | -**CDokladu** do dokumentu si to bere pres **DSI:GetPrimaryIndex**. Tzn. musí být nadefinován **DataModel** s **RequredIndexes**\\ | ||
+ | -//< | ||
+ | -pokud neni DSI z SQL **otevřené** otevře se automaticky v cf.LuaFormPrintReport | ||
- | **metoda CreatePrint-CreateReport-StartPrint** | + | <code lua> |
+ | local query = enc[[ | ||
+ | <Middle Name=" | ||
+ | < | ||
+ | <Table Name=" | ||
+ | < | ||
+ | IDPRIJEMKA-P | ||
+ | </ | ||
+ | </ | ||
+ | </ | ||
+ | |||
+ | < | ||
+ | select p.idprijemka, | ||
+ | ... | ||
+ | Data.TiskMD=ClientSession: | ||
+ | local ds=Data.TiskMD: | ||
+ | ds: | ||
+ | ... | ||
+ | </ | ||
+ | |||
+ | \\ | ||
+ | |||
+ | === Základní metoda tisku PrintReport (WindowsManager: | ||
+ | |||
+ | <code lua> | ||
+ | LuaForm.Func.v_zakazky_zakazky_reports_PrintZakpol={ | ||
+ | function(Data) | ||
+ | Data.PrintMid = v_zakazky_zakazky.reports.PrintZakpol(Data.DSI, | ||
+ | return cf.LuaFormPrintReport(Data, | ||
+ | end, | ||
+ | finally=function(Data) | ||
+ | if Data.PrintMid then Data.PrintMid: | ||
+ | end | ||
+ | } | ||
+ | |||
+ | |||
+ | function v_zakazky_zakazky.reports.PrintZakpol(DSI, | ||
+ | local idzakaz=DSI: | ||
+ | local polDS = DSI: | ||
+ | polDS: | ||
+ | local tIDZakpol = Form: | ||
+ | |||
+ | local tisk=[[ | ||
+ | <Middle Name=" | ||
+ | < | ||
+ | <Table Name=" | ||
+ | <Field Name=" | ||
+ | <Field Name=" | ||
+ | </ | ||
+ | </ | ||
+ | |||
+ | < | ||
+ | select z.idzakaz, z.idpartner, | ||
+ | from zakazky_zakpol zp | ||
+ | JOIN zakazky_zakazky z ON z.idzakaz = zp.idzakaz | ||
+ | where ]]..cf.ConstructWhereFromString(" | ||
+ | </ | ||
+ | </ | ||
+ | </ | ||
+ | ]] | ||
+ | if DEBUG_DETAIL then DEBUG_WRITE({mid=tisk}) end | ||
+ | local TiskMD=ClientSession: | ||
+ | if DEBUG_DETAIL and not DEBUG_NOVISIBLE then | ||
+ | local form=WindowsManager: | ||
+ | local outSP=WindowsManager: | ||
+ | form=form: | ||
+ | if outSP.MRCode==2 then TiskMD=TiskMD: | ||
+ | end | ||
+ | | ||
+ | local ds = TiskMD: | ||
+ | ds: | ||
+ | return TiskMD | ||
+ | end | ||
+ | |||
+ | </ | ||
+ | |||
+ | === Metoda tisku Start/ | ||
<code lua> | <code lua> | ||
LuaForm.Func.v_rozpocty_rozpocty_reports_Specifikace={ | LuaForm.Func.v_rozpocty_rozpocty_reports_Specifikace={ | ||
function(Data) | function(Data) | ||
- | | + | |
- | local ID = "" | + | |
- | --pokudse tiskne jen jeden rozpocet, muze se do dokumentu doplnit odkaz na rozpocet | + | |
- | if # | + | |
- | if Data.FirstParams.Action==PRINT_DOCUMENT then | + | |
- | Data.FileName=dokumenty_dokumenty.BeforeSaveToDocumentDir(Data.DSI, | + | |
- | Data.FirstParams.ReportName, | + | |
- | end | + | |
- | local Config = {output = Data.FileName, | + | |
- | return LuaForm.StartPrintReport(Data.Options, | + | |
end, | end, | ||
function(Data) | function(Data) | ||
... | ... | ||
- | LuaForm.CallFunc(" | + | |
v_rozpocty_rozpocty.reports.TiskKapitol(Data.DSI, | v_rozpocty_rozpocty.reports.TiskKapitol(Data.DSI, | ||
end, "Tisk zakazek", | end, "Tisk zakazek", | ||
+ | end, | ||
+ | function(Data) | ||
... | ... | ||
- | | + | |
- | dokumenty_dokumenty.AfterSaveToDocumentDir(nil, "", | + | |
- | end | + | |
- | return LuaForm.EndPrintReport() | + | |
- | ... | + | |
end, | end, | ||
} | } | ||
Řádek 152: | Řádek 164: | ||
end | end | ||
</ | </ | ||
+ | |||
+ | \\ | ||
==== Vložení LUA bandu do existujícího reportu ==== | ==== Vložení LUA bandu do existujícího reportu ==== |
lua/tisk_pomoci_lua.1657709401.txt.gz · Poslední úprava: 2022/07/13 10:50 autor: Libor Kadaník