Codeblock Onlinehilfe
Codeblock Onlinehilfe
Breadcrumbs

ProdPosBuch()

ProdPosBuch() – Produktionsauftragsposition buchen


Die Funktion dient zum manuellen Buchen von Material auf eine Produktionsauftrags-Position.

Parameter

Beschreibung

oBeDBGet:O

Kontainer-Objekt (TBeDBGet-Objekt)

nAufNr:N

Auftragsnummer

nAufPos:N

Unter-Auftragsposition

nPosNr:N

Positions-Nr.

nMenge:N

Zu buchende Menge (Positiv oder Negativ)

nLager:N

Material kommt von Lager

cHauptSerNr:C

Seriennummer des Fertigteils (nur bei Vorabvergabe von Fertigteil-Seriennummer); default = Leerstring

caTeileSerNr:U

Seriennummer/Charge des Materials oder Array mit Seriennummer/Charge, Menge, Platz;
default = Leerstring;
Array-Format:
{
{ <Kommission>, <Menge>,
[,<Platz> [,<Verfallsdatum> [,<BehälterNr> [,<EinwegBehälterTyp> ] ] ] ] },
{ . . . }
}
Wichtig: Für Erstellung neuer Einwegbehälter <BehälterNr> 0 übergeben

lKeinLS:L

kein Lagerschein drucken; default = false

lReserv:L

Menge wieder reservieren (nur bei Rückbuchung von Material); default = true

cProgID:C

individuelle Prog.ID; default = 'ProdPosBuch'

lPostOrder:L

Auftragskopf speichern (default = false)


Rückgabewert


keiner

Beispiel 

| m_oDM |

m_oDM := CreateObject("TBeDBGet"),
startseq
   DBStartTrans(m_oDM.ADSConnection),
   startseq
      ProdPosBuch(m_oDM, 405595, 0, 2, 2, 4, "",
                  {{"213170", 1, "PLATZ1"}, {"100003", 1, "PLATZ2"}},
                  False, True, 'XXX'),

      ProdPosBuch(m_oDM, 405627, 0, 5, -5, 4, "",
                  {{"04052284003", -5, "TOLVE"}},
                  False, True, 'XXX'),

      ProdPosBuch(m_oDM, 600631, 0, 1, 1, 0),

      DBCommit(m_oDM.ADSConnection),
   always
      if DBInTrans(m_oDM.ADSConnection) then
         DBRollBack(m_oDM.ADSConnection),
      endif,
   stopseq,
always
   DestroyObject(m_oDM),
stopseq,


Weitere Verknüpfungen