OBS/Makros und Scripting/Allgemeines/Klassen/Vorgänge/Reparaturauftrag: Unterschied zwischen den Versionen

Aus OBS Wiki
Zur Navigation springen Zur Suche springen
Zeile 64: Zeile 64:
==Methoden==
==Methoden==
<syntaxhighlight lang="Delphi">
<syntaxhighlight lang="Delphi">
         constructor  Create (oxDB: TxDB); overload; virtual;
         constructor  Create(const cUid: string; oxDB: TxDB);
         constructor  Create (oxDB: TxDB; cAuftNr: String; lPos: boolean=false); overload; virtual;
         constructor  Read(const cUid: string; oxDB: TxDB; cRepaNr: String; lPos: boolean=false);


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


Zeile 77: Zeile 77:
         function  SaveRecord(cUid: string = '';lAlleAnzeigen : Boolean = true): Boolean; override;
         function  SaveRecord(cUid: string = '';lAlleAnzeigen : Boolean = true): Boolean; override;
</syntaxhighlight>
</syntaxhighlight>
==Properties==
==Properties==
<syntaxhighlight lang="Delphi">
<syntaxhighlight lang="Delphi">

Version vom 20. Juli 2023, 09:09 Uhr


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

        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;

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;