OBS/Stammdaten/Weitere Stammdaten/Dokumentenvorlagen: Unterschied zwischen den Versionen

Aus OBS Wiki
Zur Navigation springen Zur Suche springen
Keine Bearbeitungszusammenfassung
Keine Bearbeitungszusammenfassung
Zeile 1: Zeile 1:
=Dokumentenvorlagen=
{{Vorlage:Weitere_Stammdaten}}




=Dokumentenvorlagen=




Version vom 2. Juli 2019, 09:59 Uhr

Weitere Stammdaten

Abonnententyp
Anrede
F10 Weit.


Dokumentenvorlagen

Vorlagengrupenebene

Die Liste

Dokuvorlagen1.png

In dieser Maske können neue Datensätze angelegt und bearbeitet werden. Hier definieren und bearbeiten wir unsere Vorlagengruppen.


Eingabemaske

Dokuvorlagen2.png

Dateiebene

Die Liste

Dokuvorlagen3.png

Eingabemaske

Dokuvorlagen4.png


Makro

Dokuvorlagen5.png 


//-----------------------------------------------------------------------------
// Unit Name: Beispiel Word Platzhalter ersetzen
// Author:    Jr
// Date:      14-Jul-2019
//-----------------------------------------------------------------------------

syny

function Office_Replace(oDoku:TWordDoku) : String;
begin
    oDoku.Replace('VORNAME'     , oDoku.cPsVorname);
    oDoku.Replace('NAME'        , oDoku.cPsName         );
    oDoku.Replace('NUMMER'      , oDoku.cPsNr           );
    oDoku.Replace('ANREDE'      , oDoku.cPsAnrede       );

    oDoku.Replace('VORNAME'     , oDoku.cPsVorname      );
    oDoku.Replace('ZUSATZ1'     , oDoku.cPsZusatz1      );
    oDoku.Replace('ZUSATZ2'     , oDoku.cPsZusatz2      );
    oDoku.Replace('STRASSE'     , oDoku.cPsStrasse      );
    oDoku.Replace('POSTFACH'    , oDoku.cPsPostfach     );
    oDoku.Replace('PLZ'         , oDoku.cPsPLZ          );
    oDoku.Replace('ORT'         , oDoku.cPsOrt          );
    oDoku.Replace('TELEFON'     , oDoku.cPsTelefon      );
    oDoku.Replace('EMAIL'       , oDoku.cPsEmail        );
    oDoku.Replace('TELEFAX'     , oDoku.cPsFax          );
    oDoku.Replace('INTERNET'    , oDoku.cPsInternet     );
    oDoku.Replace('PSBRIEF'     , oDoku.cPsBriefAnrede  );
    oDoku.Replace('DOKBEZ'      , oDoku.cDokBez         );
    oDoku.Replace('DOKDATELANG' , oDoku.cDokDateLang    );
    oDoku.Replace('DOKDATE'     , oDoku.cDokDate        );
    oDoku.Replace('DOKANSP'     , oDoku.cDokAnsp        );
    oDoku.Replace('DOKSACHBEARB', oDoku.cDokSachbearb   );
    oDoku.Replace('ANSCHRIFT'   , oDoku.cAnschrift      );
    oDoku.Replace('INTKDNR'     , oDoku.cIntKdNr        );
    oDoku.Replace('GBEZ1'       , oDoku.cGBez1          );
    oDoku.Replace('GBEZ2'       , oDoku.cGBez2          );
    oDoku.Replace('GARTNR'      , oDoku.cGBez2          );
    oDoku.Replace('GSERNR'      , oDoku.cGSerNr         );
    oDoku.Replace('GORT'        , oDoku.cGOrt           );
    oDoku.Replace('LFDNR'       , oDoku.cLfdNr          );
    oDoku.Replace('VPLZ'        , oDoku.cVsPLZ          );
    oDoku.Replace('VORT'        , oDoku.cVsOrt          );
    oDoku.Replace('WAAGENART'   , oDoku.cWaagenArt      );
    oDoku.Replace('QSNR'        , oDoku.cQsNr           );
    oDoku.Replace('WAAGENTYP'   , oDoku.cWaagentyp      );
    oDoku.Replace('PRUEFKL'     , oDoku.cPruefKl        );
    oDoku.Replace('PRUEFNR'     , oDoku.cPruefNr        );
    oDoku.Replace('PRUEFDAT'    , oDoku.cPruefDat       );
    oDoku.Replace('G2ORT'       , oDoku.cOrt2           );
    oDoku.Replace('ANLAGENNR'   , oDoku.cAnlagennr      );
    oDoku.Replace('EICHZAEHLER' , oDoku.cEichzaehler    );

    Result := 'OK';
end;
Abgerufen von „http:///index.php?title=OBS/Stammdaten/Weitere_Stammdaten/Dokumentenvorlagen&oldid=56080“