OBS/Makros und Scripting/Allgemeines/Klassen/Vorgänge/Reparaturauftrag: Unterschied zwischen den Versionen
Zur Navigation springen
Zur Suche springen
Nimz (Diskussion | Beiträge) |
Nimz (Diskussion | Beiträge) |
||
Zeile 4: | Zeile 4: | ||
==Variablen== | ==Variablen== | ||
<syntaxhighlight lang="Delphi"> | <syntaxhighlight lang="Delphi"> | ||
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; | |||
</syntaxhighlight> | </syntaxhighlight> | ||
==Methoden== | ==Methoden== | ||
<syntaxhighlight lang="Delphi"> | <syntaxhighlight lang="Delphi"> | ||
constructor Create (oxDB: TxDB); overload; virtual; | |||
constructor Create (oxDB: TxDB; cAuftNr: String; lPos: boolean=false); overload; virtual; | |||
procedure FillPerson(cKdNr: String; lShop: Boolean=False); | |||
procedure FillVersand(cVaNrueber:String); | |||
procedure FillKopie(Query: TxQuery;cTable:String=''); | |||
function NeuePosition():TRepAuftragPos; | |||
function AuftNeuNum():String; | |||
procedure Assign(var oSrc: TRepAuftrag); reintroduce; | |||
function SaveRecord(cUid: string = '';lAlleAnzeigen : Boolean = true): Boolean; override; | |||
</syntaxhighlight> | </syntaxhighlight> | ||
==Properties== | ==Properties== | ||
<syntaxhighlight lang="Delphi"> | <syntaxhighlight lang="Delphi"> | ||
property GeraeteNr : string read cGeraeteNr write SetGeraeteNr; | |||
</syntaxhighlight> | </syntaxhighlight> | ||
Version vom 15. April 2019, 09:25 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 (oxDB: TxDB); overload; virtual;
constructor Create (oxDB: TxDB; cAuftNr: String; lPos: boolean=false); overload; virtual;
procedure FillPerson(cKdNr: String; lShop: Boolean=False);
procedure FillVersand(cVaNrueber:String);
procedure FillKopie(Query: TxQuery;cTable:String='');
function NeuePosition():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();