Rozdíly

Zde můžete vidět rozdíly mezi vybranou verzí a aktuální verzí dané stránky.

--- reports:repupgc [2013/03/25 08:26] – [Automatické kontroly] Libor Kadaník
+++ reports:repupgc [2018/06/15 08:16] (aktuální) – [Prohledávání] Libor Kadaník
@@ Řádek 9: / Řádek 9: @@
 Adresář musí končit lomitkem. Místo adresáře lze použít výběr souborů (např. c:\report\directory\*.rep).
@@ Řádek 35: / Řádek 30: @@
 V adresáři **M:\obis4\system\reports\rozpocty\** a podřazených projíždíme soubory.
 Program vypisuje všechny reporty na které neexistuje odkaz v **XML** souborech, nebo nesouhlasí velikost pismen.
-Funkce kontroluje i přítomnost starých funkcí (začínajících **#**) a špatný zápis datumu.
+Funkce kontroluje i přítomnost starých funkcí (začínajících **#**) a špatný zápis datumu.\\
+Parametr **CheckOldFunction** (true/false) kontroluje a převádí staré funkce. Parametr **
+CheckExistInXML** (true/false) kontroluje, zda má report odkaz v některém XML souboru
 <code>
-repupgc -debug 2 -luastring "CheckReports([[M:\obis4\system\reports\rozpocty\*.*]])"
+repupgc -debug 2 -luastring "CheckReports([[M:\obis4\system\reports\rozpocty\*.*]], CheckOldFunction, CheckExistInXML)"
 </code>
@@ Řádek 52: / Řádek 50: @@
   * excel a oo - vloží field do pravé spodní buňky, není-li již něčím obsazena
   * html - vloží na konec textu bandu, můžou vzniknout problémy je-li tam např. hlavička tabulky
+Úprava LUA scriptů a náhrada obsolete funkcí jako např. **os.date()** -> **osex.date()**, **Function:** -> **Function.** atd.
+<code>
+repupgc.bin -debug 2 -luastring "UpgradeLua([[/obis/system/lua/]])"
+</code>
 ==== Automatické kontroly ====
@@ Řádek 71: / Řádek 75: @@
 <code>
 repupgc -debug 2 -luastring "CheckReports([[M:\obis4\system\reports\rozpocty\rozpocet.rep]], true)"
+</code>
+==== Upgrade formregister.xml ====
+<code>
+repupgc -debug 2 -luastring "UpgradeFormRegister([[M:\obis4\user\formregister.xml]])"
+</code>
+====== Skripty pro práci s reporty  ======
+==== Seznam použitých fontů ====
+<code>
+for i in `find -name "*.rep"`; do perl -ne 'if(/<Font /../\/Font>/) {print("$1\n") if/<Name>(.*)<\/Name>/};' $i; done | sort | uniq
+</code>
+==== Nahrazení fontů ====
+<code>
+for i in `find -name "*.rep"`; do perl -pi -e'if(/<Font /../\/Font>/) { s/MS Shell Dlg/Arial/ }' $i; done
 </code>