OBS/Makros und Scripting/Allgemeines/Klassen/Vorgänge/Reparaturauftrag

Wiki » Makros und Scripting

Makros und Scripting

Allgemeines

• Syntax
• Übersicht Funktionen
• Übersicht Prozeduren
• Übersicht Konstanten
• Übersicht Globale Variablen

Klassen

Vorgangsgenerierung

• Angebot
• Auftrag
• Reparaturauftrag
• Produktionsauftrag
• Lieferschein
• Rechnung
• Bestellung
• Einkaufslieferschein
• Einkauf

Import-Dateien

• TxImportFile
• TxImportFileCSV

PDF-Verarbeitung

• TOBS_PDF

• Script Bibliothek

Anwendungsbereiche

• Drucke
• Interaktive PDF
• Sonstige Makrodateien

Customizing

• Übersicht
• Rechte Verwaltung
• Listen
• Edits
• Select-Listen
• Übrige Fenster (xForm)

• Preislisten
• Bildverwaltung
• Artikelpflege
• Office Unterstützung
• Positionserfassung
• Data In/Out
• Wiederkehrende Aufgaben
• OFML-Kalkulation
• Zugriff auf externe Datenquellen (ODBC)
• Allgemeine Konvertierungen
• Vorgangsbaum
• Benutzerfelder
• Listen Stable
• ZUGFERD
• OpenTRANS

Beispiele

• Beispiele Sammlung

Benutzerdefinierte Datenbanktabellen

Developer

• User-Datenbank
• User-Listen
• User-Edits
• User-Widgets

Beispiele

• Positionen
• Vorgangs-Mail Betreff

Sonstiges

• DMS Abkürzungen

TRepAuftrag leitet sich von TVorgang ab. Die in TVorgang beschriebenen Methoden, Variabeln und Properties können hier ebenfalls verwendet werden.

Basis TRepAuftrag

Variablen

        cTechniker        : string;
        cFMPro            : string;
        cLagNr            : String;                         // Lagernummer
        dTermin           : TDateTime;                      // Termin
        cGeraet           : String;                         // Gerät
        cSeriennummer     : String;                         // Seriennummer
        cModell           : String;                         // Geräte Modell
        cLeihSerNr        : String;                         // Leihgerät Serienummer
        cLeihgeraet       : String;                         // Leihgerät
        cStandort         : String;                         // Standort
        cStandort2        : String;                         // Standort 2
        cZaehler          : String;                         // Zählerstand
        cZubehoer         : String;                         // Zubehör
        cStoer1           : String;                         // Störung 1
        cStoer2           : String;                         // Störung 2
        cStoer3           : String;                         // Störung 3
        cColstatus        : string;
        cZeit             : string;
        cAzeit            : string;
        cTel1             : string;
        cTel2             : string;
        cAnspr            : string;
        cAnspzah          : string;
        cAnrufer          : string;
        cAufnrku          : string;
        cRepaus           : string;
        cLagerver         : string;
        dVdat             : TDateTime;
        dRdat             : TDateTime;
        dFertdat          : TDateTime;
        dAusdat           : TDateTime;
        dAbdat            : TDateTime;
        cMrech            : string;
        cMbar             : string;
        cMgar             : string;
        cMkulanz          : string;
        cMabh             : string;
        cMnrep            : string;
        cMwart            : string;
        cManruf           : string;
        cMkv              : string;
        nMkvdm            : double;
        cMint             : string;
        cZBText           : string;
        cKText1           : string;
        cKText2           : string;
        cKText3           : string;
        cKText4           : string;
        cAbKto            : string;
        cTerminstr        : string;
        cGerBemerk        : string;
        cStdSteuer        : string;
        cArbanweisung     : string;
        cArbanweisungANSI : string;
        cMaterMD5         : string;
        cDMSnr            : string;
        cAbteilung        : string;

Methoden

Übersicht:

        constructor  Create(const cUid: string; oxDB: TxDB);
        constructor  Read(const cUid: string; oxDB: TxDB; cRepaNr: String; lPos: boolean=false);

        procedure FillPerson(cKdNr: String; lShop: Boolean=False);
        procedure FillVersand(cVaNrueber:String);
        procedure FillKopie(Query: TxQuery;cTable:String='');
        function  NeuePosition(cUid: string):TRepAuftragPos;
        function  AuftNeuNum():String;

        procedure Assign(var oSrc: TRepAuftrag); reintroduce;

        function  SaveRecord(cUid: string = '';lAlleAnzeigen : Boolean = true): Boolean; override;

Create

Definition:

constructor  Create(const cUid: string; oxDB: TxDB);

Erklärung:
Erstellt eine neue Instanz der Klasse TRepAuftrag. Sollte verwendet werden, wenn ein komplett neuer Vorgang angelegt werden soll. Für die Änderung oder Kopie eines vorhandenen Vorgangs bitte Read für die Erstellung der Instanz verwenden.
Parameter:

Name	Beschreibung
cUid	10-stellige alphanummerische ID für den Aufruf.
oxDB	Datenbankverbindung, auf der gearbeitet wird. Für Makros und Scripte ist hier oDB anzugeben, wenn auf der aktuellen Datenbank (i.d.R. Live-System) der Vorgang angelegt/bearbeitet werden soll.

Beispiel:

    oRepa := TRepAuftrag.Create('PMAC000001', oDB);

Read

Definition:

constructor  Read(const cUid: string; oxDB: TxDB; cRepaNr: String; lPos: boolean=false);

Erklärung:
Erstellt eine neue Instanz der Klasse TRepAuftrag. Sollte verwendet werden, wenn ein vorhandener Vorgang geändert oder kopiert werden soll. Für die Anlage eines komplett neuen Vorgangs bitte Create für die Erstellung der Instanz verwenden.
Parameter:

Name	Beschreibung
cUid	10-stellige alphanummerische ID für den Aufruf.
oxDB	Datenbankverbindung, auf der gearbeitet wird. Für Makros und Scripte ist hier oDB anzugeben, wenn auf der aktuellen Datenbank (i.d.R. Live-System) der Vorgang angelegt/bearbeitet werden soll.
cRepaNr	Nummer des Reparaturauftrags, dessen Daten in die Datenstruktur eingelesen werden soll.
lPos	Bestimmt, ob auch Positionen mit eingelesen werden sollen. Standardmäßig werden die Positionen nicht eingelesen (False). Geben Sie hier True an, wenn die Positionen eingelesen werden sollen.

Beispiel:

    oRepa := TRepAuftrag.Read('PMAC000001', oDB, 'R10000', True);

Properties

        property GeraeteNr : string read cGeraeteNr write SetGeraeteNr;

Basis TRepAuftragPos

Variablen

        oRepAuftrag   : TRepAuftrag;

Methoden

constructor  Create (oxRepAuftrag:TRepAuftrag);   virtual;

procedure FillKopie(Query: TxFQuery);
procedure GetAutoRepText();

Allgemeine Funktionen

procedure UebernahmeRepMaterial(cAuftNr: String; lDatum: Boolean = True);
procedure RepMateArtiGet(cKuNr:String;qArtiQuery:TxQuery;var qMaterData:TqSQL);
procedure MateSetREPAUStat(cAuft:String);

procedure AddBildPositionRepa(oMyDB: TxDB; cRaufNr: String; cBildPfad: String; cUID4: String);
procedure Repa_AddStdPosText(oMyDB: TxDB; const cRaufNr: String);

function  Generate_StdReparaturAuftrag(oMyDB: TxDB; const cStdNr: String; const cGNr: string): String;