Skriptovací jazyk - funkce: Porovnání verzí
m |
m |
||
Řádek 2: | Řádek 2: | ||
|-valign=top | |-valign=top | ||
| Funkce || Popis | | Funkce || Popis | ||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
|-valign=top | |-valign=top | ||
|'''''Function DelAll(s: String) : String '''''||rowspan=20 align=center valign=center|Do skriptovacího jazyka doplněny funkce zajišťující kompatibilitu s množinou funkcí dostupnou v rámci vyhodnocování výrazů v jiných částech programu (např. generátor sestav,filtrování pomocí výběrových podmínek). Syntaxe je stejná nebo obdobná. | |'''''Function DelAll(s: String) : String '''''||rowspan=20 align=center valign=center|Do skriptovacího jazyka doplněny funkce zajišťující kompatibilitu s množinou funkcí dostupnou v rámci vyhodnocování výrazů v jiných částech programu (např. generátor sestav,filtrování pomocí výběrových podmínek). Syntaxe je stejná nebo obdobná. | ||
Řádek 52: | Řádek 42: | ||
|-valign=top | |-valign=top | ||
|'''''Function Trim(s: String): String ''''' | |'''''Function Trim(s: String): String ''''' | ||
+ | |-valign=top | ||
+ | |'''''Function IniReadString(Sekce: String; Promenna: Byte; TestUzivatel: Boolean; Sklad: integer; Default: String): String'''''||vrací textovou hodnotu proměnné z CISELNIK.BTR (číselník 161) | ||
+ | |-valign=top | ||
+ | |''''' Function IniWriteString(Sekce : String; Promenna : Byte; TestUzivatel: Boolean; Sklad: integer; Hodnota: String): Boolean'''''||zapisuje hodnotu proměnné (TestUzivatel=true: platí jen pro akt.uživatele; Sklad=0:platí pro všechny sklady) | ||
+ | |-valign=top | ||
+ | |''''' Function IniReadInteger(Sekce : String; Promenna : Byte; TestUzivatel: Boolean; Sklad: integer; Default: integer): integer'''''||vrací číselnou hodnotu proměnné | ||
+ | |-valign=top | ||
+ | |''''' Function IniWriteInteger(Sekce : String; Promenna : Byte; TestUzivatel: Boolean; Sklad: integer; Hodnota: integer): Boolean'''''||zapisuje číselnou hodnotu proměnné | ||
+ | |-valign=top | ||
+ | |''''' Procedure LogWrite(Msg : String)'''''||zapisuje informaci Msg do textového logu aplikace | ||
|} | |} | ||
Verze z 23. 11. 2012, 11:21
Funkce | Popis |
Function DelAll(s: String) : String | Do skriptovacího jazyka doplněny funkce zajišťující kompatibilitu s množinou funkcí dostupnou v rámci vyhodnocování výrazů v jiných částech programu (např. generátor sestav,filtrování pomocí výběrových podmínek). Syntaxe je stejná nebo obdobná. |
Function DelLeft(s: String) : String | |
Function DelRight(s: String) : String | |
Function EnumStr(s: String; Index: integer; Delimiter:Char = '/‘) : String | |
Function GetVar(VarName: String) : String | |
Function Left(s: String; Count: Integer) : String | |
Function Len(s: String) : Integer | |
Function Mid(s: String; Index, Count: Integer) : String | |
Function PosUp(SubStr, Source: String) : Integer | |
Procedure SetVar(Name: String; Value: Variant) | |
Function Str(Num: Extended; Size, Decimal: integer) : String | |
Function Right(s: String; Count: Integer) : String | |
Function Using(s: String, Size: Integer) : String | |
Function Val(s: String) : Extended | |
Function WinFmt(s: String) : String | |
Function DateValue(Datum: String):Integer | |
Function DV(Datum: String):Integer | |
Function StrDate(Datum: Integer):String | |
Function Abs(e: Extended): Extended | |
Function Trim(s: String): String | |
Function IniReadString(Sekce: String; Promenna: Byte; TestUzivatel: Boolean; Sklad: integer; Default: String): String | vrací textovou hodnotu proměnné z CISELNIK.BTR (číselník 161) |
Function IniWriteString(Sekce : String; Promenna : Byte; TestUzivatel: Boolean; Sklad: integer; Hodnota: String): Boolean | zapisuje hodnotu proměnné (TestUzivatel=true: platí jen pro akt.uživatele; Sklad=0:platí pro všechny sklady) |
Function IniReadInteger(Sekce : String; Promenna : Byte; TestUzivatel: Boolean; Sklad: integer; Default: integer): integer | vrací číselnou hodnotu proměnné |
Function IniWriteInteger(Sekce : String; Promenna : Byte; TestUzivatel: Boolean; Sklad: integer; Hodnota: integer): Boolean | zapisuje číselnou hodnotu proměnné |
Procedure LogWrite(Msg : String) | zapisuje informaci Msg do textového logu aplikace |
Následující funkce mají svoji obdobu ve funkcích pro zpracování výrazů. Jsou ale mírně odlišné.
Funkce | Popis | |
Function Conv(s: String; CP: Byte) : String | Převede text v kódování Windows do jiné kódové stránky.
Hodnoty pro CP: | |
0 | ASCII | |
1 | Kamenický (CP 895) | |
2 | ASCII2 (ASCII s rámečky) | |
3 | LATIN2 (CP 852) | |
4 | Windows 1250 | |
Function Date: TDateTime | Vrací hodnotu aktuálního data (jako číslo). | |
Function Time: TDateTime | Vrací hodnotu aktuálního času (jako číslo). | |
Function Now: TDateTime | Vrací hodnotu aktuálního data a času (jako číslo). | |
Function IfS(Condition: Boolean; IfTrue, IfFalse: String) : String | Funkce vyhodnotí podmínku, pokud bude hodnota True, tak vrátí text z parametru IfTrue, při False vrátí text z IfFalse. Parametry IfTrue, IfFalse i výsledek funkce jsou typu string | |
Function IfL(Condition: Boolean; IfTrue, IfFalse: Integer) : Integer | Funkce vyhodnotí podmínku, pokud bude hodnota True, tak vrátí číslo z parametru IfTrue, při False vrátí číslo z IfFalse. Parametry IfTrue, IfFalse i výsledek funkce jsou typu celé číslo. |
Příklad skriptu v syntaxi Pascal:
var i: integer; s: String; begin s:=IniReadString('ScriptTest', 1, True, _AktualniSklad_, '5'); ShowMessage(Settings.Values['INI.FirmaJmeno']+chr(13)+Settings.Values['USER.JmenoUziv']+chr(13)+_KonfigDir_); LogWrite('Direktivy:'+_Direktivy_); if s <> then i := StrToInt(s)+1 else i := -10; if not IniWriteInteger('ScriptTest', 1, True, _AktualniSklad_, i) then ShowMessage('V IniWriteInteger se vyskytla chyba'); end.
Skripty nelze v programu spouštět přímo (pouze v integrovaném editoru skriptů, kde je možné i jednoduché krokování skriptů), ale je třeba je nejdříve tzv. podepsat. To zajišťuje nová funkce s kódem menu 90,21, která k vybranému vstupnímu souboru se souborem skriptu vytvoří soubor s podepsaným skriptem (stejné jméno jako zdrojový soubor, ale s příponou FSC). K tomu je třeba určit jméno uživatele a heslo, pod kterým se bude program do aplikace přihlašovat (pokud skript připravujete pro jinou instalaci aplikace, tak heslo nemusí souhlasit s aktuálním heslem).
Je možné určit také jméno databáze (to je ale nepovinné, lze ho určit až při spouštění skriptu parametrem DB:jmenodatabaze). Podepsané soubory lze spouštět pomocí nového parametru FSC:jménopodepsanéhoskriptu, např.
SKLAD6.EXE S:SYSTEM FSC:Test.FSC
Výsledný podepsaný soubor je uložený v interním formátu a nelze ho již znovu podepisovat (je třeba podepisovat vždy zdrojový soubor). Program při podepisování nekontroluje syntaxi skriptu. Ta je kontrolována vždy až při spouštění skriptu. Chyby skriptu jsou zapisovány do textového LOG souboru (ne všechny jsou hlášeny na obrazovku). Obě funkce jsou ve výchozím stavu umístěny do menu Nástroje pro správu, které nahradilo stávající menu Rekonstrukce dat.