Skip to main content
Skip table of contents

ArtLoesch()

ArtLoesch() – Artikel löschen

Die Funktion dient dem Löschen eines Artikels inkl. vorheriger Löschprüfung.
Diese Funktion ist in beas nicht freigeschaltet. Bitte TbeArticleBusinessController benutzen.

Parameter

Beschreibung

cArtNr:C

Artikelnummer

lShowMsg:L

Meldungen/Fragen anzeigen; default = true

lBewLoe:L

Bewegungen (Einzel-Umsätze) löschen; default = false
Achtung: True ist nicht mehr zulässig. Bei True wird diese Exception ausgelöst:
Es ist ein Codeblock-Laufzeitfehler aufgetreten. ( Code: 42 )

lNurCheck:L

Nur prüfen, ob Löschung erlaubt, kein echter Löschvorgang; default = false

oDab010:O

Dab010 Tabelle (Artikelstamm)

lSendUpdateMsg:L

Update Message senden; default = true

lShowProgress:L

Progressbar anzeigen; default = true

Rückgabewert

Logisch / Boolean -
      true   -   Löschvorgang war erfolgreich (lNurCheck = false)
                   Löschen wäre möglich (lNurCheck = true)
      false  -  Löschvorgang fehlgeschlagen (lNurCheck = false)
                   Löschen nicht möglich (lNurCheck = true)

Beispiel

CODE
| oDab010:DB := 'waDAB010', nAnz:N, nGesAnz:N |

DBFilter("SubStr(ARTNR, 4) = '0053'", oDab010),
DBGoTop(oDab010),
while !EoF(oDab010) do
   if ArtLoesch(oDab010:ARTNR, false, false, false, oDab010, false, false) then
      nAnz++
   endif,
   nGesAnz++,
   DBSkip(1, oDab010),
end,
WriteLn('Es konnte(n) ' + Str(nAnz) + ' von ' + Str(nGesAnz) + 
        ' Artikel(n) gelöscht werden!')

// Ergebnis: Es wird versucht, alle Artikel zu löschen, deren Artikelnummer
// mit '0053' beginnt. Am Ende wird ausgegeben, wie viele Artikel gelöscht
// werden konnten.

Weitere Verknüpfungen


JavaScript errors detected

Please note, these errors can depend on your browser setup.

If this problem persists, please contact our support.