OBS/Preislisten/Preislisten per Macro kopieren

Aus OBS Wiki
Zur Navigation springen Zur Suche springen
Die druckbare Version wird nicht mehr unterstützt und kann Darstellungsfehler aufweisen. Bitte aktualisiere deine Browser-Lesezeichen und verwende stattdessen die Standard-Druckfunktion des Browsers.
Kostenpflichtige Module

Internet-Shop
Der modified ECommerce Shop
Shop-Menü
Automatische Vorgänge
modified eCommerce 2.0
Der Büroring-ShopV4
Einrichtung
Eigene Artikel
brShop24
Einstellungen und Automatiken
Funktionen
Preislisten
Preislistenverwaltung
F10 Weitere Funktionen
Automatiken Kommandos
ZUGFeRD
Factoring
UPS
DHL
IMS Professional
TAPI
SMS
Fleet Management
Mehrlager-Verwaltung
Mehrsprachen Modul
Multilanguage Modul
Einfache Produktionsnachverfolgung
DMS - Dokumenten Management System
DMS Dokumente
Tasten und Schaltflächen
F10 Weit.
E DMS Definitionen
QR Zeiterfassung
EVA Marketing Tool
Technikersteuerung
Termin-Projekte
Edifact-Schnittstelle
Backup Überwachung Email
Anlagenbuchhaltung
OBS Geo Daten
DeliSprint / DPD
Filialen
Auto-Waagen
Cashback
Moebelschnittstelle
OBS-Waage
Tourenplanung
Tourenplanung
Dokumenten Manager
DocuWare-Schnittstelle
OFML-Kalkulation
Pascom
Versicherungsschaden
Gutschriftsanzeigen
OCPP Ladestationen
Kameraverwaltung
DataInOut
REST-Schnittstelle
Beispiele
Sammelverträge


5 Freie Srcipter Lib Commandos

CMD_COPY_MACRO1 - CMD_COPY_MACRO5

Name ScriptLib: PL_CMD1 - PL_CMD5
Methodenname "Preisliste"
Parameter Methode [oMyDB, cPlNr, cPara]

Beispiel

 
//---------------------------------------------------------------
// Preisliste kopieren
// aktive Lagerartikel in eine andere Preisliste kopieren
//
// 27-10-2022 Jörg Hoheneder
//---------------------------------------------------------------
function Preisliste(oMyDB:TxDB;cPL:String; cParam:String):boolean;
var cSQL : String;
begin
    cSQL := 'DELETE FROM arti_pl WHERE pl_nr='+DB_SQLVal(cParam);
    
    DB_SQLExec(oMyDB,cSQL);
    
    cSQL := 'INSERT INTO arti_pl (pl_nr,pl_artnr,pl_vk1,pl_staffmenge,sys_uid)'+
            ' SELECT '+DB_SQLVal(cParam)+','+
            ' a.a_nr,'+
            ' b.pl_vk1,'+
            ' b.pl_staffmenge,'+
            ' RIGHT(UUID_SHORT(),10)'+  
            ' FROM artikel AS a LEFT JOIN arti_pl AS b ON a.a_nr=b.pl_artnr AND'+
            '                                             b.pl_nr='+DB_SQLVal(cPL)+' AND'+
            '                                             b.pl_staffmenge=1'+
            ' WHERE a_inaktiv<>"1" AND'+
            '       a_lager="1"';
            
    DB_SQLExec(oMyDB,cSQL);
end;
Abgerufen von „http:///index.php?title=OBS/Preislisten/Preislisten_per_Macro_kopieren&oldid=61524“