ArchView - Spolupráca s procesom HI
V rámci zošita vytvoreného z predlohy ArchView.xlt je implementovaný
modul HIP_Interface, ktorý obsahuje procedúry volané z procesu
D2000 HI, ak je v ňom otvorený ako report.
Procedúry volané z procesu HI:
Procedúry sú vypísané spolu s ich implementáciou.
'Parametre, s ktorymi je proces HI prihlaseny ku procesu D2000 Server |
Sub LogonFromHI(Name As String, Password As String, Server As String, User As String) |
' na prihlasenie VBAPI do D2000. |
'Password - heslo, s ktorym je uzivatel prihlaseny |
'Server - parameter /S, s ktorym bol spusteny proces HI |
'User - parameter /W, s ktorym bol spusteny proces HI |
' v tomto pripade neprebehne automaticke volanie Auto_Open |
' inicializaciu vyvolam sam |
Common.DefaultD2Server = Server |
Common.DefaultLogonName = Name |
Common.DefaultLogonPassword = Password |
Popis:
Procedúra je zavolaná po otvorení zošita v procese
D2000 HI za účelom inicializácie
vlastného zošita. Parametre popisujú ako je k systému prihlásený užívateľ
a sú užitočné napríklad v prípade inicializácie rozhrania
D2000 VBApi.
Sub SetStringFromHI(sPar As String) ' zmena parametrov |
'sPar - uzivatelsky parameter nastavitelny z procesu HI |
Sub SetNumsFromHI(I1 As Double, I2 As Double) ' zmena parametrov |
'I1 - uzivatelsky parameter nastavitelny z procesu HI |
'I2 - uzivatelsky parameter nastavitelny z procesu HI |
Sub SetTimesFromHI(sTime As Date, eTime As Date) ' zmena parametrov |
'sTime - uzivatelsky parameter nastavitelny z procesu HI |
'eTime - uzivatelsky parameter nastavitelny z procesu HI |
ThisWorkbook.Worksheets(DefaultDataSheetId()).Range(D2BeginArchTimeLabel).value = sTime |
Popis:
Procedúry sú volané z procesu D2000 HI po zadaní parametrov pre report.
Pre Časový interval je zavolaná procedúra SetTimesFromHI.
V templite je implementovaná tak, že zmení počiatočný čas pre report (políčko
FromTime).
Pre Číselné parametre je zavolaná procedúra SetNumsFromHI.
Pre Reťazec je zavolaná procedúra SetStringFromHI.