コピーSTARTDATEおよびENDDATE他のライン

Question

にそして私はたstartDateと終了日は、他のラインにcopiingコピーしたい、

私はこれがあります。

GetDates(Bom : Record "BOM Component";VAR StartDateItem : Date;VAR EndDateItem : Date;RegelkortingItem : Decimal) 

IF GET(Bom."Parent Item No.",Bom."Line No.") THEN BEGIN 
    StartDateItem :=StartDate2; 
    EndDateItem := EndDate2; 
    RegelkortingItem := Regelkorting; 
END; 

SetDates(Bom : Record "BOM Component";VAR StartDateItem : Date;VAR EndDateItem : Date;RegelkortingItem : Decimal) 
"Parent Item No." := Bom."Parent Item No."; 
"Line No." := Bom."Line No."; 
StartDate2 := StartDateItem; 
EndDate2 := EndDateItem; 
Regelkorting := RegelkortingItem; 

IF NOT MODIFY THEN 
    INSERT; 

をそして、これは画像

です

黒いマーカーライン - 同じ日付がコピーされている必要があります。

はあなた

に感謝し、これはonvalidateです：

BeginDate - OnValidate() 
SetDates(Rec, StartDate2, EndDate2, Regelkorting); 

だから私はこれを試してみてください。

Rec.SETRANGE(StartDate2,StartDate2); 
IF StartDate2 <> StartDate2 THEN 
//IF (Rec.COUNT > 1) THEN //AND (FORMAT(Rec.StartDate2) = FORMAT(Rec.StartDate2))) THEN 
ERROR('The dates has to be the same!! '); 
//END; 

ので、日付が同じである必要があります。

私はこのように今それを持っている：

IF StartDate2 <> BOMB.StartDate2 THEN 
//IF (Rec.COUNT > 1) THEN //AND (FORMAT(Rec.StartDate2) = FORMAT(Rec.StartDate2))) THEN 
ERROR('The dates has to be the same!! '); 

しかし、私はちょうどそのエラーメッセージはすでに

OKを見せている、1 STARTDATEを入れた場合は、その後、私はこのようになりました完全なコードを持っている：

SetDates(Rec, StartDate2, EndDate2, Regelkorting); 
//StartDateInsert := Rec.StartDate2; 
BOMB.RESET; 
BOMB.SETRANGE(StartDate2,StartDate2); 
IF BOMB.FINDFIRST THEN; 
IF StartDate2 <> BOMB.StartDate2 
THEN ERROR('The dates has to be the same!! '); 

しかし、何も

参照画像が起こりません。最後の行の後、デバッグを終了します。そして、何も起こりません：このような：：私は日付を比較したい例えば

おけば、これは動作します。しかし、唯一のあなたはSetDates()機能StartDate2とEndDate2を呼び出すときFirtチェック

SetDates(Rec, StartDate2, EndDate2, Regelkorting); 
BOMB.RESET; 
BOMB.SETRANGE(StartDate2,StartDate2); 
IF BOMB.FINDFIRST THEN BEGIN 
IF BOMB.StartDate2 > BOMB.EndDate2 THEN BEGIN 
ERROR('startdatum kan niet groter zijn dan einddatum'); 
END; 
END 

Answer 1

最初のレコードには、正しい値を持っています。多分ここに誤りがある。あなたは彼らがRecの値ではなく、正しい値を持っているRec、StartDate2とEndDate2を渡すここ

BeginDate - OnValidate() 
SetDates(Rec, StartDate2, EndDate2, Regelkorting); 

：

次のコードはこれです。

てみてください、このコードを変更するには：

BeginDate - OnValidate() 
SetDates(Rec, StartDateItem, EndDateItem, Regelkorting);