Oke, I have it now like this: BetginDatumMessage := 'begindatum is yessss:'; Rec.SETRANGE("Parent Item No.","Parent Item No."); IF Rec.FIND() THEN; //Rec.SETRANGE("Parent Item No.","Parent Item No."); //Rec.SETRANGE("Item No.","Item No."); MESSAGE('Date is ok'); //BeginDate := TODAY + 1 ; //EndDate := TODAY + 2; MESSAGE(BetginDatumMessage + '' + FORMAT(Rec.BeginDate)); MESSAGE(FORMAT(TODAY)); IF (TODAY >= Rec.BeginDate) AND (TODAY 0) AND (LocRecSalesLine."BOM Item No." = '') THEN BEGIN LocRecSalesLine.FncExplodeBOM; END; END UNTIL LocRecSalesLine.NEXT = 0; LocRecSalesLine.RESET; LocRecSalesLine.SETRANGE("Document Type", Rec."Document Type"); LocRecSalesLine.SETRANGE("Document No.", Rec."No."); LocRecSalesLine.SETRANGE(Type,LocRecSalesLine.Type::" "); LocRecSalesLine.SETFILTER("Description 2", '*'+Description+'*'); IF LocRecSalesLine.FINDFIRST THEN REPEAT LocRecSalesLine.DELETE; UNTIL LocRecSalesLine.NEXT = 0; //AddItemDates.CheckDates(BeginDate, EndDate); COMMIT; But so if it is not in date range I want to skip this function. But how to do that in navision? Thank you
↧