_ExecRPVSClient

(   Mode       : Byte;
    Wait       : Byte;
    OJNumber   : String;
    Month      : Byte;
    Year       : Word;
    FileName   : StringZ;
dim Msg        : String;
dim ExitCode   : Word) : Longint

Volá externí program FlxPamRPVSClient.exe, který umožňuje komunikaci s registrem pojištěnců vězeňské služby (RPVS).

Obecný popis činnosti

Čtěte zde.

Kde je RPVS klient hledán

Program se nejprve podívá do registru:

REG:\HKEY_CURRENT_USER\Software\FLUX\GlobalSettings

, zda existuje klíč:

Path of RPVS Client

Jestliže existuje, hledá se FlxPamRPVSClient.exe pomocí tam zadané cesty. Jestliže uvedená hodnota v registru neexistuje, vytvoří se cesta k Pam.Exe a k ní se přípojí adresář RPVSClient a tam se FlxPamRPVSClient.exe hledá.

Jestliže tedy bude Pam.Exe nainstalován například do adresáře 'C:\Flux\Bin', bude RPVS klient hledán v adresáři: 'C:\Flux\Bin\RPVSClient'.

Mode:  Mód činnosti

Wait: Čekej

True = Čekej na ukončení externího programu FlxPamRPVSClient.exe. Jestli chcete, aby komunikace pokračovala nezávisle dál, pište False.

OJNumber:

Číslo organizační jednotky

Month:

Měsíc období pro zpracování

Year:

Rok období pro zpracování

FileName:

Cesta k souboru xml s přenášenými daty.

Msg:

Oznámení popsané u parametru ExitCode, ale v textové podobě.

ExitCode:

Kod vracený programem FlxPamRPVSClient.exe:

V případě vzniku chyby, ukládá program FlxPamISIRClient.exe její podrobné znění do textového souboru FlxPamISIRClientLog.txt.

Funkce vrací:

Jestliže funkce dopadne dobře, vrací 0. Jinak vrací systémový kód chyby, jejichž celkový výčet je zde. Zde se také dozvíte, že program FlxPamRPVSClient.exe vůbec neexistuje (kód 2).

Proxy server

Nastavení proxy serveru se bere ze společných systémových hodnot, nebo z registrů. Hodnoty v registrech mají přednost!

reg:\HKEY_CURRENT_USER\Software\FLUX\GlobalSettings\Proxy Url Adresa
reg:\HKEY_CURRENT_USER\Software\FLUX\GlobalSettings\Proxy User
reg:\HKEY_CURRENT_USER\Software\FLUX\GlobalSettings\Proxy Psw
reg:\HKEY_CURRENT_USER\Software\FLUX\GlobalSettings\Proxy Použij

Jestliže bude 'Proxy Použij' = 0, nebude proxy použita. Hodnota 1 znamená: použij proxy.


Příklad:

call Test;
Exit;

procedure Test
    dim ExitCode : Word;
    dim sMsg     : String;	
    trace(_ExecRPVSClient(RPVS_OdesliData, true, "OJ_01", 7, 2015, "W:\RPVS\Testy\RPVS_1.xml", sMsg, ExitCode),
            "  ExitCode:",ExitCode, "  ", sMsg);	
endproc { Test }

Podívejte se na: Ostatní procedury a funkce