Dokumentfelder prüfen und Verarbeitung verhindern

[Dennis Balzuweit]

Hier ein Beispiel um die Felder eines Dokuments individuell zu prüfen und die weitere Verarbeitung ggf. zu verhindern.
Die Dokumente bleiben im Fehlerfall dann in der Verarbeitungsqueue stehen und können hier ggf. nachbearbeitet oder gelöscht werden.

Code: Alles auswählen

CustNr := ccDocument.GetFieldValue('CustomerNumber');
InvNr  := ccDocument.GetFieldValue('InvoiceNumber');
                                                       
if (length(CustNr) < 8) or (IsNumeric(CustNr) = false) or
   (length(InvNr) < 10) or (IsNumeric(InvNr)  = false) then
begin
  ccDocument.AllowProcessing := false;
end else
begin
  ccDocument.AllowProcessing := true;
end;

[Dennis Balzuweit]

Sollen die entsprechenden Dokumente direkt und ohne weitere Sichtprüfung gelöscht werden, kann dies über die Option "DeleteFromQueue" gesetzt werden.

Code: Alles auswählen

CustNr := ccDocument.GetFieldValue('CustomerNumber');
InvNr  := ccDocument.GetFieldValue('InvoiceNumber');
                                                                                                           
if (length(CustNr) = 0) or (length(InvNr)  = 0) then
begin                                   
  ccDocument.DeleteFromQueue := true;
  ccDocument.AllowProcessing := false;
end else
begin                                       
  ccDocument.AllowProcessing := true;             
end;