Porovnávané verzie

Stará verzia 2

changes.mady.by.user D2000 Dev Team

Uložené

porovnané s

Nová verzia 3

changes.mady.by.user D2000 Dev Team

Uložené

Kľúč

  • Tento riadok sa pridal
  • Riadok je odstránený.
  • Formátovanie sa zmenilo.

...

Deklaráciastartexcel [/Q] [/I] [/D] [/R] fullXlsPath [StartMakro [ param1 .. paramN ]]
konkrétne pre automatický export:
startexcel [/Q] [/I] [/D] [/R] fullXlsPath StartParams EXP
Parametre


/QVýpis prípadných chybových hlásení do súboru (startexcel.log) a ukončenie utility startexcel.
/ISpustiť MS Excel ako viditeľný. Nepovinný parameter.
Na operačných systémoch MS Server 2008, MS Vista a Windows 7 sa neodporúča použiť parameter /I, ak je MS Excel štartovaný v kontexte service (Napríklad SELF.EVH štartovaný ako servis).
/DDo logovacieho súboru sú zapísane ladiace informácie vrátane zoznamu parametrov, ktoré boli zadané pri jeho spustení.
/R

Zakáže utilite prepisať hodnotu v registry Computer\HKEY_CURRENT_USER\Software\Microsoft\Office\16.0\Excel\Options\DisableMergeInstance na 1.

Defaultne nastavuje túto hodnotu na 1, aby sa nové inštancie excelu nezlučovali s už existujúcimi.

fullXlsPathPlná cesta k reportu (zošitu).
StartMakroVoliteľné meno makra v súbore, ktoré sa má vykonať.
param1 .. paramNVoliteľné parametre makra StartMakro.
StartParamsMeno makra v reporte, ktoré vykoná vlastný export dát.
EXPParameter makra StartParams špecifikujúci, že sa má vykonať export dát.


PopisUtilita StartExcel naštartuje MS Excel. Ak je parameter /I uvedený, MS Excel bude otvorený ako viditeľný. Ak je uvedený parameter /Q, prípadné chybové hlásenia budú zapísané do súboru startexcel.log a utilita StartExcel bude ukončená.
Následne otvorí zošit daný parametrom fullXlsPath a zavolá makro StartParams s parametrom EXP. Makro StartParams musí byť implementovaná v zošite (ak je zošit vytvorený z predlohy D2000_WorkBook.xlt, automaticky makro obsahuje).

Zošit sa automaticky prihlási k systému D2000 podľa prihlasovacích parametrov (USER_NAME, PASSWORD, SERVER), vyhodnotí sa a uloží kópiu aktívnej stránky zošita do nového súboru, ktorého meno je v bunke EXPORT_FILE_NAME. Táto je štandardne naplnená výrazom, ktorý existujúce meno zošita doplní dátumom a časom. V aplikácii je potrebné zmeniť adresár určený pre exportované reporty. V predlohe je nastavený na C:\Reporty.
Vyhodnotenie reportu je realizované nastavením časov v bunkách D2000_BT a D2000_ET na aktuálny čas.

...

INT _ret
TEXT _txtMsg
TEXT _report = "c:\Reporty\test1.xls"

; report export with 50 seconds timeout
_ret := RUN "startexcel.exe" SYNC " " + _report + " StartParams EXP" TIMEOUT 50
IF _ret\VLD THEN
IF _ret = _ERR_TIME_OUT THEN
  _txtMsg := "TIMEOUT pre export reportu"
ELSE
_txtMsg := "Export ExitCode = " + %IToStr(_ret)
IF _ret = 0 THEN
  _txtMsg := _txtMsg + " OK"
ELSE
IF _ret = 1 THEN
  _txtMsg := _txtMsg + " Init Ole Error"
ELSE
IF _ret = 2 THEN
  _txtMsg := _txtMsg + " Start Excel Error"
ELSE
IF _ret = 3 THEN
  _txtMsg := _txtMsg + " Open Report Error"
ELSE
IF _ret = 4 THEN
  _txtMsg := _txtMsg + " Run Macro Error"

ELSE

IF _ret = 12 THEN
  _txtMsg := _txtMsg + " Set Registry Error"
ELSE
ELSE
  _txtMsg := _txtMsg + " Unknown Error"
ENDIF
ENDIF
ENDIF
ENDIF
ENDIF
ENDIF
ELSE
  _txtMsg := "Nepodarilo sa spustiť startexcel.exe"
ENDIF

LOG _txtMsg, SysTime
END

...