_GetSystem

(   Mode : Byte[;
    Data : Word]) : Word[, String]

Vrací obecné systémové hodnoty.

Mode

Popis

Typ

SYS_JMENO_VL Jméno vlastníka String
SYS_CISLO_VL Číslo vlastníka Word
SYS_SER_CISLO Seriové číslo String
SYS_KLIC_CISLO Klíč String
SYS_DBTYP V textové formě vrací povolené typy databází ve tvaru:
  • ACCESS
  • MSSQL
  • ORACLE
String
SYS_JMENO_FRM Jméno firmy String
SYS_MAX_POC_STANIC Maximální počet stanic v síti Word
SYS_MAX_POC_FIREM Maximální počet zadaných firem Word
SYS_MAX_POC_ZAM Maximální počet zadaných zaměstnanců Word
SYS_POVOLENE_MOD Povolené moduly aplikačního serveru SDpam (raději používejte mode= SYS_JE_EXE_MODUL, toto je původní starý způsob zjišťování):
Bit Popis SYS_JE_EXE_MODUL
$00000001 D5Admin EXE_MOD_SDPAM_ADMIN
$00000002 Personalistika EXE_MOD_SDPAM_PERSONAL
$00000004 Docházka EXE_MOD_SDPAM_DOCHAZKA
$00000008 PersInfo EXE_MOD_SDPAM_PERSINFO
$00000010 Snímač EXE_MOD_SDPAM_SNIMAC
$00000020 Stravenky EXE_MOD_SDPAM_STRAVENKY
$00000040 Výčetka EXE_MOD_SDPAM_VYCETKA
$00000080 Zakázky EXE_MOD_SDPAM_ZAKAZKA
$00000100 Nástěnka EXE_MOD_SDPAM_NASTENKA
$00008000 Tiskový klient EXE_MOD_SDPAM_FPRINT
$00010000 Pásky EXE_MOD_SDPAM_PASKY
Word
SYS_JE_EXE_MODUL

Zjišťuje povolený EXE modul (vrací true nebo false), jehož číslo přichází v parametru Data. Povolené konstanty jsou tyto.

 
SYS_CISLO_DB Číslo databáze. Každá databáze by měla mít jedinečné číslo. String
SYS_SQL_OUTER_JOIN

Jestliže lze v SQL příkazech použít klauzule 'LEFT OUTER JOIN', vrací true. DB system ORACLE cca do verze 7 totiž používal zápis pomocí (+).

MSSQL, MSAccess, Oracle(vyšší verze serveru než 7):

select o.O0007,c.XNAME from (OSOBNI o left outer join CEN c on o.O0005=c.IDENT);

Oracle(verze serveru 7):

select o.O0007,c.XNAME from OSOBNI o, CEN c where o.O0005=c.IDENT(+);
Byte
SYS_TABLE_NAME Vrací jméno tabulky z indexu.  
        
SYS_DSN_AKT Vrací název aktuálně používaného ODBC datového zdroje. String
SYS_DBUSER_AKT Vrací aktuálně používané login jméno do databáze. String
SYS_DBTYP_AKT Vrací číslo typu aktuálně používané databáze:
  • DBTYPE_MSACCESS
  • DBTYPE_MSSQL
  • DBTYPE_ORACLE8
  • DBTYPE_MSSQL_PROC
  • DBTYPE_ORACLE8_PROC
  • DBTYPE_ORACLE8_NATIVE
  • DBTYPE_ORACLE8_NATIVE_PROC
Word
SYS_POUZIVEJ_RN Ze společných systemových hodnot zjišťuje, zda se používá (true) system rozdělení mzdových nákladů či nikoliv (false). Byte
SYS_GET_FREE_MEMORY Vrací volnou paměť počítače v MB. Real

Příklady:

PrintUp(_GetSystem(SYS_JMENO_VL))
...
if(_GetSystem(SYS_JE_EXE_MODUL, EXE_MOD_PERSONAL))then
    ...
endif
...
PrintUp(_GetSystem(SYS_TABLE_NAME, dbtBnk))

Podívejte se na:  System