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

Aus OBS Wiki
Zur Navigation springen Zur Suche springen
(Die Seite wurde neu angelegt: „Use this to acquire financing that is certainly sufficient for your needs and comfy to repay. It's a breeze for lenders to de-activate credit lines and take li…“)
 
 
(5 dazwischenliegende Versionen desselben Benutzers werden nicht angezeigt)
Zeile 1: Zeile 1:
Use this to acquire financing that is certainly sufficient for your needs and comfy to repay. It's a breeze for lenders to de-activate credit lines and take limits away nonetheless it's very challenging to reinstate them. The loan seeker is needed to visit money lenders website and fill inside the application there for loans. Another option for single mother grants is the Iraq and Afghanistan Service Grant for students under 24 whose parents died in service after September 11, 2001. Paydayloanprovideris the answer for a emergency cash needs.<br><br>Also visit my web blog - [http://dualitymediagroup.com/UserProfile/tabid/62/userId/21310/Default.aspx amy schumer tour des moines iowa]
{{Makros und Scripting}}
=Basis TEKLieferschein=
==Variablen==
<syntaxhighlight lang="Delphi">
        aPositionen  : Array [1..POS_MAX_Positions] of TEKLieferscheinPos; // Rechnungspositionen
        nPosCnt      : Integer;                        // Anzahl der Positionen
        cLsNr        : String;                        // Rechnungsnummer
        cProjNr      : String;                        // Projektnummer
        cTyp          : String;                        // Rechnungstyp
        cStatus      : String;                        // Rechnungs-Status (0-22)
        cStatM        : String;                        // 1-stellig
        cStatS        : String;                        // 1-stellig
        cStatL        : String;                        // 2-stellig
        cStatR        : String;                        // 2-stellig
        dLsDat        : TDateTime;                      // Rechnungsdatum
        dFaelligDat  : TDateTime;                      // Fälligkeitsdatum
        dBuchDat      : TDateTime;                      // Buchungsdatum
        cKdNr        : String;                        // Kundennummer
        cAnrede      : String;                        // Kunde Anrede
        cName        : String;                        // Kunde Nachname
        cVorname      : String;                        // Kunde Vorname
        cZusatz1      : String;                        // Kunde Zusatz1
        cZusatz2      : String;                        // Kunde Zusatz2
        cStrasse      : String;                        // Kunde Straße
        cPostfach    : String;                        // Kunde Postfach
        cLK          : String;                        // Kunde Land
        cPLZ          : String;                        // Kunde PLZ
        cOrt          : String;                        // Kunde Ort
        cAngebNr      : String;                        // Angebotsnummer
        cAuftNr      : String;                        // Auftragsnummer
        cRepaNr      : String;                        // Reparaturauftragsnummer
        cEinkaufsNr  : String;                        // Einkaufsnummer
        cBestellNr    : String;                        // Bestellnummer
        cKopfNr      : String;                        // Kopftext-Nummer (00-999)
        cKopftext    : String;                        // Freier Kopftext
        cFusstext    : String;                        // Freier Fusstext
        cFussNr      : String;                        // Fusstext-Nummer (00-999)
        nNBetrag      : Double;                        // Nettobetrag der Rechnung
        nBBetrag      : Double;                        // Bruttobetrag der Rechnung
        nEKBetrag    : Double;                        // Einkaufsbetrag der Rechnung
        nRabattBetrag : Double;                        // Rabatt Betrag
        nRabattProz  : Double;                        // Rabatt Prozentual
        nPorto        : Double;                        // Portobetrag
        nVerpackung  : Double;                        // Verpackungskosten
        cVersand      : String;                        // Versand über (0-99)
        cZahlBed      : String;                        // Zahlungsbedingung (0-99)
        cWaehr        : String;                        // Währung (0-99)
        cFormul      : String;                        //
        cVKdNr        : String;                        // Versand Kundennummer
        cVName1      : String;                        // Versand Name
        cVName2      : String;                        // Versand Name
        cVZusatz      : String;                        // Versand Zusatz
        cVStrasse    : String;                        // Versand Straße
        cVLK          : String;                        // Versand Land
        cVPLZ        : String;                        // Versand PLZ
        cVOrt        : String;                        // Versand Ort
        cAuftNrKd    : String;                        // Auftragsnummer des Kunden
        cBesteller    : String;                        //
        dAufDat      : TDateTime;                      // Auftragsdatum
        cSachb        : String;                        // Sachbearbeiter (0-99)
        cRabPosJN    : String;                        // J oder N
        cMWSTJN      : String;                        // J oder N
        cSText1      : String;                        //
        cSText2      : String;                        //
        cSText3      : String;                        //
        cSText4      : String;                        //
        cSText5      : String;                        //
        cSText6      : String;                        //
        cSText7      : String;                        //
        cPreisJN      : String;                        // J oder N
        nNet1        : Double;                        //
        nNet2        : Double;                        //
        nNet3        : Double;                        //
        nMwSt1        : Double;                        //
        nMwSt2        : Double;                        //
        nMwSt3        : Double;                        //
        cMwStSchl1    : String;                        //
        cMwStSchl2    : String;                        //
        cMwStSchl3    : String;                        //
        cMwStAbs      : String;                        //
        dLiefDat      : TDateTime;                      // Lieferdatum
        cDeleted      : String;                        //
        dLDat2        : TDateTime;                      // Lieferdatum
        cSprache      : String;                        //
        cVertreter    : String;                        // Vertreter (000-9999)
        cVerbucht    : String;                        //
        cLager        : String;                        //
        cBonusJN      : String;                        // J oder N
        cWLiefNr      : String;                        //
        cRechFrei    : String;                        //
        cBonNr        : String;                        //
        cMandant      : String;                        // Mandant (00-999)
        nMwStDM      : Double;                        //
        nKursDM      : Double;                        //
        nAbschlag    : Double;                        //
        nZBetrag      : Double;                        //
        nZSkonto      : Double;                        //
        dZDatum      : TDateTime;                      //
        cMemo        : String;                        // Memofeld
        nValuta      : Integer;                        // Valuta in Tagen (max. 4 Stellen)
        cKostenst    : String;                        // Kostenstelle
        cKalkGr      : String;                        //
        cKalkRet      : String;                        //
        nOFBetrag    : Double;                        //
        cWKNr        : String;                        //
        cFrachtV      : String;                        //
        nFrachtK      : Double;                        //
        nFrachtG      : Integer;                        //
        cGruppe      : String;                        //
        cFiliale      : String;                        //
        cPosFormat    : String;                        // Format der Positionsnummerierung
        nAbsNr        : Integer;                        //
        cErfasser    : String;
        cMemoDruck    : String;                        // Positionslangtext drucken? Ja, Nein oder Voreinstellung
        oMyDB        : TxDB;
</syntaxhighlight>
==Methoden==
<syntaxhighlight lang="Delphi">
        constructor  Create (oxDB:TxDB); overload;  virtual;
        constructor  Create (oxDB:TxDB;cBestNr:String); overload;  virtual;
 
        procedure FillPerson(cKdNr:String);
        Procedure FillLieferant(cLieferNr:String);
 
        function  NeuePosition():TEKLieferscheinPos;
        function  LiefNeuNum():String;
        procedure SaveRecord();
 
        procedure Best2EKLiefKopf(cBestNr: String);
        procedure Best2EKLiefPos(cBestNr: String);
 
        function  IsPosBerechnung(cPosArt:String):Boolean;
        procedure KalkAll();
        function  CheckIfNotNull():Boolean;
        procedure GetEKLieferNrXML(cFile,cBestNr,cLiefNr,cUID : String);
</syntaxhighlight>
 
=Basis TEKLieferscheinPos=
==Variablen==
<syntaxhighlight lang="Delphi">
        cNr          : String;    //Rechnungsnummer
        cKundNr      : String;    //Kundennummer
        cLieferNr    : String;    //Liefernummer
        cAuftragsNr  : String;    //Auftragsnummer
        cBestellNr    : String;    //Bestellnummer
        cPosText      : String;
        cLProjNr      : String;
        cVersandNr    : String;    //Versandnummer
        cPosNr        : String;    //Positionsnummer
        cPosLaufend  : String;    //laufende Positionsnummer
        cTyp          : String;    //Typ
        cArtikelNr    : String;    //Artikel-Nummer
        cLeistungsNr  : String;    //Leistungs-Nummer
        cBezeichnung1 : String;    //Bezeichnung 1
        cBezeichnung2 : String;    //Bezeichnung 2
        nMenge        : Double;    //Menge
        cEinheit      : String;    //Einheit
        nMengeIn      : Double;    //MengeIn
        nMengeInFak  : Double;    //MengeIn Faktor
        nMengeG      : Integer;  //MengeG
        nKolli        : Integer;  //Kolli
        cVerpackung  : String;    //Verpackung
        nInhalt      : Double;    //Inhalt
        nEPreis      : Double;    //EPreis
        nUrPreis      : Double;    //UrPreis
        nUrPreisEK    : Double;    //UrPreisEK
        nGPreis      : Double;    //GPreis
        nEKPreis      : Double;    //EKPreis
        nRabatt      : Double;    //Rabatt
        nRabatt1      : Double;    //Rabatt
        cRabArt1      : String;    //RabattArt
        nRabatt2      : Double;    //Rabatt
        cRabArt2      : String;    //RabattArt
        nRabatt3      : Double;    //Rabatt
        cRabArt3      : String;    //RabattArt
        nRabatt4      : Double;    //Rabatt
        cRabArt4      : String;    //RabattArt
        nRabatt5      : Double;    //Rabatt
        cRabArt5      : String;    //RabattArt
        cMWSTSch      : String;    //Mehrwertsteuer-Schlüßel
        cKonto        : String;    //Konto
        cLagNr        : String;    //Lager-Nr
        cLagONr      : String;    //Lager-Ort
        cVerkaufer    : String;    //Sachbearbeiter
        cStatus      : String;    //Positionskennzeichen
        cAngebotsNr  : String;    //AngebotsNr
        cUID          : String;    //UID
        cSpNr        : String;    //SpNr
        cBestellUID  : String;    //BestellUID
        cMaterialUID  : String;    //MaterialUID
        cEiliUID      : String;    //EiliUID
        cXUID1        : String;    //XUID1
        cXUID2        : String;    //XUID2
        cXUID3        : String;    //XUID3
        cXUID4        : String;    //XUID4
        cMemofeld    : String;    //Memofeld
        nProvision    : Double;    //Provision
        cLiefKz      : String;    //LiefKz
        cProdGr      : String;    //ProdGr
        nFrachtV      : Double;    //FrachtV
        cLSNr        : String;    //EKLieferschein-Nummer
        dLSDatum      : TDateTime; //EKLieferschein-Datum
        cPosArt      : String;    //Positionsart
        cAusdruckJN  : String;    //Ausdruck Ja/Nein
        cEKHerkunft  : String;    //EK-Herkunft
        cLieNr        : String;
        cLagStreck    : String;
        cAufschlag    : String;
        cAufschUID    : String;
        cMemoDruck    : String;    //Positionslangtext drucken? Ja, Nein oder Voreinstellung
 
        oEKLief      : TEKLieferschein;
</syntaxhighlight>
==Methoden==
<syntaxhighlight lang="Delphi">
        constructor  Create (oxEKLief:TEKLieferschein);  virtual;
 
        function  BestPos2EKLiefPos(cUID:String; nPosMenge: Double):Boolean;
        procedure PositionsVorbelegung();
        procedure FillArtikel(cArtNr:String);
</syntaxhighlight>

Aktuelle Version vom 15. April 2019, 10:41 Uhr


Basis TEKLieferschein

Variablen

        aPositionen   : Array [1..POS_MAX_Positions] of TEKLieferscheinPos; // Rechnungspositionen
        nPosCnt       : Integer;                        // Anzahl der Positionen
        cLsNr         : String;                         // Rechnungsnummer
        cProjNr       : String;                         // Projektnummer
        cTyp          : String;                         // Rechnungstyp
        cStatus       : String;                         // Rechnungs-Status (0-22)
        cStatM        : String;                         // 1-stellig
        cStatS        : String;                         // 1-stellig
        cStatL        : String;                         // 2-stellig
        cStatR        : String;                         // 2-stellig
        dLsDat        : TDateTime;                      // Rechnungsdatum
        dFaelligDat   : TDateTime;                      // Fälligkeitsdatum
        dBuchDat      : TDateTime;                      // Buchungsdatum
        cKdNr         : String;                         // Kundennummer
        cAnrede       : String;                         // Kunde Anrede
        cName         : String;                         // Kunde Nachname
        cVorname      : String;                         // Kunde Vorname
        cZusatz1      : String;                         // Kunde Zusatz1
        cZusatz2      : String;                         // Kunde Zusatz2
        cStrasse      : String;                         // Kunde Straße
        cPostfach     : String;                         // Kunde Postfach
        cLK           : String;                         // Kunde Land
        cPLZ          : String;                         // Kunde PLZ
        cOrt          : String;                         // Kunde Ort
        cAngebNr      : String;                         // Angebotsnummer
        cAuftNr       : String;                         // Auftragsnummer
        cRepaNr       : String;                         // Reparaturauftragsnummer
        cEinkaufsNr   : String;                         // Einkaufsnummer
        cBestellNr    : String;                         // Bestellnummer
        cKopfNr       : String;                         // Kopftext-Nummer (00-999)
        cKopftext     : String;                         // Freier Kopftext
        cFusstext     : String;                         // Freier Fusstext
        cFussNr       : String;                         // Fusstext-Nummer (00-999)
        nNBetrag      : Double;                         // Nettobetrag der Rechnung
        nBBetrag      : Double;                         // Bruttobetrag der Rechnung
        nEKBetrag     : Double;                         // Einkaufsbetrag der Rechnung
        nRabattBetrag : Double;                         // Rabatt Betrag
        nRabattProz   : Double;                         // Rabatt Prozentual
        nPorto        : Double;                         // Portobetrag
        nVerpackung   : Double;                         // Verpackungskosten
        cVersand      : String;                         // Versand über (0-99)
        cZahlBed      : String;                         // Zahlungsbedingung (0-99)
        cWaehr        : String;                         // Währung (0-99)
        cFormul       : String;                         //
        cVKdNr        : String;                         // Versand Kundennummer
        cVName1       : String;                         // Versand Name
        cVName2       : String;                         // Versand Name
        cVZusatz      : String;                         // Versand Zusatz
        cVStrasse     : String;                         // Versand Straße
        cVLK          : String;                         // Versand Land
        cVPLZ         : String;                         // Versand PLZ
        cVOrt         : String;                         // Versand Ort
        cAuftNrKd     : String;                         // Auftragsnummer des Kunden
        cBesteller    : String;                         //
        dAufDat       : TDateTime;                      // Auftragsdatum
        cSachb        : String;                         // Sachbearbeiter (0-99)
        cRabPosJN     : String;                         // J oder N
        cMWSTJN       : String;                         // J oder N
        cSText1       : String;                         //
        cSText2       : String;                         //
        cSText3       : String;                         //
        cSText4       : String;                         //
        cSText5       : String;                         //
        cSText6       : String;                         //
        cSText7       : String;                         //
        cPreisJN      : String;                         // J oder N
        nNet1         : Double;                         //
        nNet2         : Double;                         //
        nNet3         : Double;                         //
        nMwSt1        : Double;                         //
        nMwSt2        : Double;                         //
        nMwSt3        : Double;                         //
        cMwStSchl1    : String;                         //
        cMwStSchl2    : String;                         //
        cMwStSchl3    : String;                         //
        cMwStAbs      : String;                         //
        dLiefDat      : TDateTime;                      // Lieferdatum
        cDeleted      : String;                         //
        dLDat2        : TDateTime;                      // Lieferdatum
        cSprache      : String;                         //
        cVertreter    : String;                         // Vertreter (000-9999)
        cVerbucht     : String;                         //
        cLager        : String;                         //
        cBonusJN      : String;                         // J oder N
        cWLiefNr      : String;                         //
        cRechFrei     : String;                         //
        cBonNr        : String;                         //
        cMandant      : String;                         // Mandant (00-999)
        nMwStDM       : Double;                         //
        nKursDM       : Double;                         //
        nAbschlag     : Double;                         //
        nZBetrag      : Double;                         //
        nZSkonto      : Double;                         //
        dZDatum       : TDateTime;                      //
        cMemo         : String;                         // Memofeld
        nValuta       : Integer;                        // Valuta in Tagen (max. 4 Stellen)
        cKostenst     : String;                         // Kostenstelle
        cKalkGr       : String;                         //
        cKalkRet      : String;                         //
        nOFBetrag     : Double;                         //
        cWKNr         : String;                         //
        cFrachtV      : String;                         //
        nFrachtK      : Double;                         //
        nFrachtG      : Integer;                        //
        cGruppe       : String;                         //
        cFiliale      : String;                         //
        cPosFormat    : String;                         // Format der Positionsnummerierung
        nAbsNr        : Integer;                        //
        cErfasser     : String;
        cMemoDruck    : String;                         // Positionslangtext drucken? Ja, Nein oder Voreinstellung
        oMyDB         : TxDB;

Methoden

        constructor  Create (oxDB:TxDB); overload;  virtual;
        constructor  Create (oxDB:TxDB;cBestNr:String); overload;  virtual;

        procedure FillPerson(cKdNr:String);
        Procedure FillLieferant(cLieferNr:String);

        function  NeuePosition():TEKLieferscheinPos;
        function  LiefNeuNum():String;
        procedure SaveRecord();

        procedure Best2EKLiefKopf(cBestNr: String);
        procedure Best2EKLiefPos(cBestNr: String);

        function  IsPosBerechnung(cPosArt:String):Boolean;
        procedure KalkAll();
        function  CheckIfNotNull():Boolean;
        procedure GetEKLieferNrXML(cFile,cBestNr,cLiefNr,cUID : String);

Basis TEKLieferscheinPos

Variablen

        cNr           : String;    //Rechnungsnummer
        cKundNr       : String;    //Kundennummer
        cLieferNr     : String;    //Liefernummer
        cAuftragsNr   : String;    //Auftragsnummer
        cBestellNr    : String;    //Bestellnummer
        cPosText      : String;
        cLProjNr      : String;
        cVersandNr    : String;    //Versandnummer
        cPosNr        : String;    //Positionsnummer
        cPosLaufend   : String;    //laufende Positionsnummer
        cTyp          : String;    //Typ
        cArtikelNr    : String;    //Artikel-Nummer
        cLeistungsNr  : String;    //Leistungs-Nummer
        cBezeichnung1 : String;    //Bezeichnung 1
        cBezeichnung2 : String;    //Bezeichnung 2
        nMenge        : Double;    //Menge
        cEinheit      : String;    //Einheit
        nMengeIn      : Double;    //MengeIn
        nMengeInFak   : Double;    //MengeIn Faktor
        nMengeG       : Integer;   //MengeG
        nKolli        : Integer;   //Kolli
        cVerpackung   : String;    //Verpackung
        nInhalt       : Double;    //Inhalt
        nEPreis       : Double;    //EPreis
        nUrPreis      : Double;    //UrPreis
        nUrPreisEK    : Double;    //UrPreisEK
        nGPreis       : Double;    //GPreis
        nEKPreis      : Double;    //EKPreis
        nRabatt       : Double;    //Rabatt
        nRabatt1      : Double;    //Rabatt
        cRabArt1      : String;    //RabattArt
        nRabatt2      : Double;    //Rabatt
        cRabArt2      : String;    //RabattArt
        nRabatt3      : Double;    //Rabatt
        cRabArt3      : String;    //RabattArt
        nRabatt4      : Double;    //Rabatt
        cRabArt4      : String;    //RabattArt
        nRabatt5      : Double;    //Rabatt
        cRabArt5      : String;    //RabattArt
        cMWSTSch      : String;    //Mehrwertsteuer-Schlüßel
        cKonto        : String;    //Konto
        cLagNr        : String;    //Lager-Nr
        cLagONr       : String;    //Lager-Ort
        cVerkaufer    : String;    //Sachbearbeiter
        cStatus       : String;    //Positionskennzeichen
        cAngebotsNr   : String;    //AngebotsNr
        cUID          : String;    //UID
        cSpNr         : String;    //SpNr
        cBestellUID   : String;    //BestellUID
        cMaterialUID  : String;    //MaterialUID
        cEiliUID      : String;    //EiliUID
        cXUID1        : String;    //XUID1
        cXUID2        : String;    //XUID2
        cXUID3        : String;    //XUID3
        cXUID4        : String;    //XUID4
        cMemofeld     : String;    //Memofeld
        nProvision    : Double;    //Provision
        cLiefKz       : String;    //LiefKz
        cProdGr       : String;    //ProdGr
        nFrachtV      : Double;    //FrachtV
        cLSNr         : String;    //EKLieferschein-Nummer
        dLSDatum      : TDateTime; //EKLieferschein-Datum
        cPosArt       : String;    //Positionsart
        cAusdruckJN   : String;    //Ausdruck Ja/Nein
        cEKHerkunft   : String;    //EK-Herkunft
        cLieNr        : String;
        cLagStreck    : String;
        cAufschlag    : String;
        cAufschUID    : String;
        cMemoDruck    : String;    //Positionslangtext drucken? Ja, Nein oder Voreinstellung

        oEKLief       : TEKLieferschein;

Methoden

        constructor  Create (oxEKLief:TEKLieferschein);   virtual;

        function  BestPos2EKLiefPos(cUID:String; nPosMenge: Double):Boolean;
        procedure PositionsVorbelegung();
        procedure FillArtikel(cArtNr:String);