$ v'RE-STORE "MULTICFG"'#';Das Programm vervielfltigt die JDLG-Konfigurationsdateien. '5Dazu werden Basisdateien und eine ini-Datei bentigt.'4Input-Dateien mit den vorgeschriebenen Platzhaltern: '- Basisdateien:  ' - jdlg.jnlp '1mit den notwendigen Platzhaltern: [jdlg], [jeloq]  ' - JEloq.cfg !'7mit den notwendigen Platzhaltern: [applications],[perf]  ' - Perf.cfg '- Applications.cfg '%mit dem Platzhalter: [log]/[log=NAME]' '5Es knnen beliebige Key + Platzhalter gesetzt werden.'Dabei gibt es folgenden Regeln:'/- Key und Platzhalter sind nicht case sensitive &'B- Key aus MULTICFG.ini <=> [Platzhalter] aus Konfigurationsdateien &'B- Gibt es zu einem Platzhalter in den Konfigurationsdateien keinen '&Key, wird die Zeile nicht bernommen !  '- MULTICFG.ini  'Eintrge (Keys): ''- [Dateikennzeichnung] (alphanumerisch) ' Beispiel: ' [_1] ergibt%'@Dateien: jdlg_1.jnlp, JEloq_1.cfg, Applications_1.cfg,Eloq_1.log'.Ersetzung der ensprechenden Platzhalter, z.B.:')'[jdlg]' wird ersetzt durch 'jdlg_1.jnlp''- Apps=appname1,appname2,...&'BSollen fr einen bestimmten User nicht alle Anwendungen bernommen%'?werden, hier die Anwendungsnamen aufgelisten, welche bernommen  'werden sollen.!'"%'@Beim ersten Lauf mssen alle Basisdateien vervielfltigt werden.#,'MBei spterer Verwendung des Programms, kann die Vervielfltigung auf einzelne$,'MBasisdateien beschrnkt werden. Dies kann z.B. sinnvoll sein, wenn es - wegen%,'Meiner Firewall - zu Problemen mit der genderten Startdatei (jdlg.jnlp) kommt&'-und diese aber gar nicht gendert werden mu.''()'GDie Namen der Basisdateien, fr In- und Output, knnen gendert werden.)'*('EIn der Datei MULTICFG.ini gibt es die folgenden Optionen fr die Keys+ ' - Key=Value , '- Key->Dateiname -('FAnstelle des '='-Zeichens kann also ein Pfeil verwendet werden, um die.)'HWertzuweisung in eine andere Datei zu verlagern, z.B. um in dieser Datei/ '5spezielle Anpassungen fr bestimmte User zu fixieren.0)'GDiese referenzierte Datei darf allerdings keine Links enthalten und mu1-'Pansonsten den gleichen Aufbau haben wie MULTICFG.ini, darf also nur die Elemente2'- [Id] 3 ' - Key=Value 4 ' enthalten.5'6,'NUm die Standard-Generierung der Konfigurationsdateien durchzufhren, bei allen7'&Eingabeaufforderungen leer besttigen.8'9.'QEine Besonderheit ist die log-Datei: in der Applications-Basisdatei kann auch der:''CPlatzhalter [log] um einen Dateinamen (ohne Endung) ergnzt werden.;'/Der Name der log-Datei setzt sich zusammen aus:<'(Dateiname&Dateikennzeichnung&Dateiendung = ' Beispiele:>"':[log] -> ergibt mit [_1] aus MULTICFG.ini: Eloq_1.log?"'9[log=XYZ] -> ergibt mit [_1] aus MULTICFG.ini: XYZ_1.log@'A1'X****************************************************************************************B'C ^LOCALD ' E7F ' G   %  %  % H  @ %  %  %' I ' J /'T==================================================================================== K 'Aus MULTICFG.ini: Key=Value L . 2   " ! Key_values$(0) = [File_id]+M '#Aus MULTICFG.ini: Apps=appname1,... N +'L-> Wenn nicht alle Anwendungen aus Applications.cfg bernommen werden sollenO  5   " P /'T==================================================================================== Q ' R ;   "! ph: place holder&S A     " T ـH   "U׀AOOjdlgyyV׀AOU.jnlpyyW׀AO[jdlgyyX׀AOa.jnlpyyY׀AUOJEloqyyZ׀AUU.cfgyy[׀AU[JEloqyy\׀AUa.cfgyy]׀A[O Applicationsyy^׀A[U.cfgyy_׀A[[ Applicationsyy`׀A[a.cfgyya׀AaOPerfyyb׀AaU.cfgyyc׀Aa[Perfyyd׀Aaa.cfgyye2׀AgOEloqyy?! Default-Name '[log]', falls nicht anders angegeben: [log=...]%f׀AgU.logyyg ' h ڀHOyOi ڀHUyOj ڀH[yOk ڀHayOl ' m mO-! Bei der Ausgabe die Standardnamen verwenden'n( MULTICFG.inivy.! Datei mit den Eintrgen zur Vervielfltigung'o '..................... p /'T==================================================================================== q ' r )s' t)run؀|yyMULTICFGyy؀|yzu)v'w)x+Datei zum Einlesen? (leer = MULTICFG.ini): y -yz y{v| }'~)+CInput: die Standard-Basisdateien verwenden j/n? (leer = Standard):  -oyy ny)2ROutput: Die Namen der Standard-Basisdateien beibehalten j/n (leer = beibehalten): ) -oyy nymy#4Anstelle von jdlg.jnlp einlesen (leer = jdlg.jnlp):  -y Zy퀂A'Omy逐 #4Anstelle von JEloq.cfg einlesen (leer = JEloq.cfg):  -y Zy퀂A'Umy逐 "2Anstelle von Perf.cfg einlesen (leer = Perf.cfg):  -y Zy퀂A'amy逐 *BAnstelle von Applications.cfg einlesen (leer = Applications.cfg):  -y Zy퀂A'[my逐  ' )-GOutput: alle Konfigurationsdateien vervielfltigen j/n? (leer = alle):  -oyy ny)jdlg.jnlp j/n? (leer = vervielfltigen):  -oyyڀHOnyyy)JEloq.cfg j/n? (leer = vervielfltigen):  -oyyڀHUnyyy(Perf.cfg j/n? (leer = vervielfltigen):  -oyyڀHanyyy!0Applications.cfg j/n? (leer = vervielfltigen):  -oyyڀH[nyyy ' #';Basisdateien vorhanden und statische Platzhalter gefunden ?  ay퀥'v 2O%怮 r 逮)Fehler: Datei 'y' nicht gefunden!yy '  Oy.5y~ǀ ׀.O y )User: y  - yy ʀO%a ̀O%a ݀Hy׀ÀO׀ÀUyyy 2U%怮 r 逮)Fehler: Datei 'y' nicht gefunden!yy   % D % D % D % D /9*%Uffǀ ' )Unerwarteter Fehler: yy)Das Programm wurde abgebrochen!!)/ => berprfen Sie die Angaben in der Datei: yv)% => berprfen Sie die Basisdateien!)5Letzte gelesene Datei/Zeile (.cfg)/Zeile (.ini)/ERRM$ ) => y ) => y ) => y ) => yy 9*%O9*%U9*%[) BPROGRAMMENDE\2'Y========================================================================================='׀À[y ׀Àayyy!COMMAND ؀|yy! > yyy؀|zzz  2[% r &)Fehler: Datei 'y' konnte nicht erstellt werden!yy U7  kUo[jdlg]yyy .nOOyy׀AOOyyy ׀AOUzzrz zz zz  o[jeloq]yyy .nOOyy׀AUOyyy ׀AUUzzrz zz zz  O%[׀.Ooyyy]yyz ׀.Uy y    Zy nOOyyyryzyzz    f[y]yyyy [  9*%[+'L............................................................................' ׀À[y ׀Àayyy!COMMAND ؀|yy! > yyy؀|zzz  2[% r &)Fehler: Datei 'y' konnte nicht erstellt werden!yy U7   kU!o[applications]yyy" ##nOOyy׀A[Oyyy ׀A[Uzzz $ %o[perf]yyy& '#nOOyy׀AaOyyy ׀AaUzzz ( ) O%*[׀.Ooyyy]yyz+ ׀.Uy, y- . Zy/nOOyyyryzyzz 0 1f2[y]yyyy3 4 %[5 6 9*%[78+'L............................................................................9':׀À[y ׀Àayyy;!COMMAND ؀|yy! > yyy؀|zzz <= 2[% r> ?&)Fehler: Datei 'y' konnte nicht erstellt werden!yy@A BU7+C D 0kUEo [file_id]yyyF GnOOyyy yH I O%J[׀.Ooyyy]yyzK ׀.UyL yM N ZyOnOOyyyryzyzz P QfR[y]yyyyS0T 5[U V +9*%[WX+'L............................................................................Y 'Z׀À[y ׀Àayyy[!COMMAND ؀|yy! > yyy؀|zzz \] 2[% r^ _&)Fehler: Datei 'y' konnte nicht erstellt werden!yy`a bU7;c yd e @kUf .yyg hOyyOyyi ׀5Oyyj O% :5k ׀5yyl׀5oy.yyy@m nEo pfq r s 't EO%u[׀.Ooyyy]yyzv ׀.Uyw yx y ZyznOOyyyryzyzz { |f}o[log]yyy~ #nOOyy׀AgOyyy ׀AgUzzz K o[log=yyy o]yyQyQgrnQOyyyynOOyyyy ׀AgUyzzK [y]yyyy@ ' K[  ;9*%[''D-------------------------------------------------------------------- ' y ʀO%a ݀Hy rOyT ׀AʀO׀AʀUyyy 2O%怮 r 逮)Fehler: Datei 'y' nicht gefunden!yy  rOy  % D ' jdlg.jnlp׀;O[jdlg]yy׀;U[jeloq]yyZU % D ' JEloq.cfg׀;O[applications]yy׀;U[perf]yyZU % D 'Applications.cfgZa % D 'Perf.cfgZa /O7a  kO  % D Xсh;OZ Xсh;UZ % D Xсh;OZ Xсh;UZ / a ZO y)Basisdatei -> y nO%g ׀;nyy׀;ny,yyy fn,)/ folgende Platzhalter wurden nicht gefunden: ZnyOOyyyy  9*%OTfq1'W***************************************************************************************Err1@Line@Line_ini@Buf@Target@Key@Value@File_ident@File_nameBKey_valuesBApps_iniBFound_phBCfg_namesRMulti_file&& &0&@&PP Norm_out_names@File_inF@4&Set_filenamePErrnPErnrCheck_filesPFoundPErr_cfErr2PEEndeNext_iniRead_iniPIdx_iniPRvPIPJNextj_iniJdlgJeloqApplicationPerfEnd_iniPREnd_jNext_jPPPLen&`Print_j&pPXEnd_eNext_ePrint_eEnd_pNext_pPrint_pEnd_aNext_aWeiter_aPrint_aPP2Next_cfPCounter_phWeiter_cfCheck_phPKEnd_cf;! - y y- yyyz Is_commentline@Line@Char&17Qj Wert@StrErr&[6"  : o׀ yy ׀ yy ny Check_ph@LineBFound_phPIndexPCounter_ph&JK   : '5Funktion: Einen String ber ein Trennzeichen splitten '5und die Substrings in einem String-Array zurckgeben. '*String$: String der gesplittet werden soll '(String_arr$(*): Array fr die Substrings 'Sep$: Das Trennzeichen 'Index: Startindex des Arrays '.Rckgabewert: Anzahl der gewonnenen Substrings 'Im Hauptprogramm, z.B.: '%DIM Line$[600],Split_array$(1:4)[250] '(Num=FNSplit(Line$,Split_array$(*),",",1) 7&  Z*y.r*4yyy:y : r*:*y׀ r=4n*4yyyyy r4y r4y=* ׀ r*4yyyy r4yB  .F4 ׀ yy r4yB& F n*:*y#n4׀ yn4׀ yyr*4zzyz yz  BSplit@StringBString_arr@SepPIndexPCounter&ErrPPosStr_end&PPPOldposEndPStrend:{  " :&7,  2D m  2Dm  [y2y  2 5; ]yAyA,׀ D;r2;nA;yyyyy &D;7J  Pk; #WyP [y2y 2 5D5; ]yAyA,׀ D;r2;nA;yyyyyP  ;! " # =y2y$ 2%n2;;yy-yy&r2;yy-yy' ( ->y2y) 2*n2;;yy-yy+r2`yy-yy,[׀ D;yy]yyfy"nz-n,. /,0 1 2 oappsyy3,ry;wy4P5 6 r&;&y7 ׀ &;y8 ׀ &`y9 :J; , yD<)Fehler ini-Datei 'y'yy= >)Fehler ini-Datei 'y': yyyy? @j;AJDBRead_ini@Line_iniBKey_values@Key@ValueBApps_ini@BufPIdx_iniErr_readPPPId_found&PP2&End_readNext_read Is_commentline& Get_filenamePErrnSplitPApps VC   :D7'E Zy+F .y1yG 1+Hn144yyyI 1y:yJ KL :yM N ׀ 4yO ׀ @y:P Q ׀ FyR ׀ Ly:S T URV'WR+XSet_filename@BufBCfg_names@File_namePRowP Norm_out_namesErr&PP&@File_ext& &0&@EndW\Y  Z   [7#\'+]^ 21%7 r_ 7`+)'Fehlerhafter Link in ini-Datei: Datei 'y' nicht gefunden!yya':b@c dD+e17@f g Ik1h #PyIi [yYyj ]y€YykD+l Yym YnD:oIp q r Ds  Yyt Yu =yYyv YwrY:yy-yyx :y z':{@| } ~  @ #'y @9*%1'Get_filename@Id@Key@Value@Line@TargetF@dErrPErrn&&@PE&EndPFoundNext_read Is_commentlinePP