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

Aus OBS Wiki
Zur Navigation springen Zur Suche springen
Keine Bearbeitungszusammenfassung
Zeile 26: Zeile 26:
=Allgemeine Funktionen=
=Allgemeine Funktionen=
<syntaxhighlight lang="Delphi">
<syntaxhighlight lang="Delphi">
procedure UebernahmeMaterial(cAuftNr: String; lDatum: Boolean = True);
procedure UebernahmeMaterialDB(oMyDB:TxDB;cAuftNr: String; lDatum: Boolean = True);
procedure MateSave(cMaterUnr:String;lNew:Boolean;lRead:Boolean=False);
procedure MateSaveDB(oMyDB:TxDB;cMaterUnr:String;lNew:Boolean;lRead:Boolean=False);
procedure MateArtiGet(cKnr:String;qArtiQuery:TxFQuery;var qMaterData:TqSQL);
procedure MateArtiGetDB(oMyDB:TxDB;cKuNr:String;qArtiQuery:TxFQuery;var qMaterData:TqSQL);
function  MakeNewAuftPos(cAuftNr : String) : String;                //Erstellen der neuen Auftragspositionen
function  MakeNewAuftPosDB(oMyDB:TxDB;cAuftNr : String) : String;
function  MakeNewRaufPos(cRaufNr : String) : String;              //Erstellen der neuen Rechnungspositionen
function  MakeNewRaufPosDB(oMyDB:TxDB;cRaufNr : String) : String;
procedure AutragAusFiliale(oFiliDB:TxDB;cBestNr:String;cKuNr:String);
function  Auftrag_MaterMD5(oDB:TxDB;Const cAuftNr:String;nMode:TVB_MaterMode;var cUIDs:String;var cAuftNrs:String):Boolean;
function  Auftrag_Rohertrag(oMyDB:TxDB; cAuftNr:String;nNettoBetrag:Double):String;
function  CreateNewProdAuftrNr(oMyDB:TxDB): String;      //Erzeugt eine neue Produktionsauftragsnummer
function  CreateProdAuftMater(oMyDB:TxDB; cAuftNr:String): String;
</syntaxhighlight>
</syntaxhighlight>
zu ''Auftrag_MaterMD5'' siehe [[OBS/Makros_und_Scripting/Allgemeines/Klassen/Vorgänge#TVB_MaterMode|TVB_MaterMode]]

Version vom 15. April 2019, 10:30 Uhr


Basis TProdAuftrag

Variablen

Methoden

Properties

Basis TProdAuftragPos

Variablen

Methoden

Properties

Allgemeine Konstanten

Allgemeine Funktionen

procedure UebernahmeMaterial(cAuftNr: String; lDatum: Boolean = True);
procedure UebernahmeMaterialDB(oMyDB:TxDB;cAuftNr: String; lDatum: Boolean = True);

procedure MateSave(cMaterUnr:String;lNew:Boolean;lRead:Boolean=False);
procedure MateSaveDB(oMyDB:TxDB;cMaterUnr:String;lNew:Boolean;lRead:Boolean=False);

procedure MateArtiGet(cKnr:String;qArtiQuery:TxFQuery;var qMaterData:TqSQL);
procedure MateArtiGetDB(oMyDB:TxDB;cKuNr:String;qArtiQuery:TxFQuery;var qMaterData:TqSQL);

function  MakeNewAuftPos(cAuftNr : String) : String;                //Erstellen der neuen Auftragspositionen
function  MakeNewAuftPosDB(oMyDB:TxDB;cAuftNr : String) : String;

function  MakeNewRaufPos(cRaufNr : String) : String;               //Erstellen der neuen Rechnungspositionen
function  MakeNewRaufPosDB(oMyDB:TxDB;cRaufNr : String) : String;

procedure AutragAusFiliale(oFiliDB:TxDB;cBestNr:String;cKuNr:String);
function  Auftrag_MaterMD5(oDB:TxDB;Const cAuftNr:String;nMode:TVB_MaterMode;var cUIDs:String;var cAuftNrs:String):Boolean;

function  Auftrag_Rohertrag(oMyDB:TxDB; cAuftNr:String;nNettoBetrag:Double):String;
function  CreateNewProdAuftrNr(oMyDB:TxDB): String;      //Erzeugt eine neue Produktionsauftragsnummer
function  CreateProdAuftMater(oMyDB:TxDB; cAuftNr:String): String;

zu Auftrag_MaterMD5 siehe TVB_MaterMode