Why do we need to make an copied var-record in this code?

jemmy

Folks,

Here's in the page#86 C/Side Solution Dev.

Need to save

SemRegHeader := Rec;

Then restore

Rec := SemRegHeader;

Why do we need to make an copied var-record in this code?

OnLookup Trigger

WITH SemRegHeader DO BEGIN

     SemRegHeader := Rec;

     SemSetup.GET;

     SemSetup.TESTFIELD(SemSetup."Seminar Registration Nos.");

     SemSetup.TESTFIELD(SemSetup."Posted Sem. Registration Nos.");

     IF NoSeriesMgt.LookupSeries(SemSetup."Posted Sem. Registration Nos.",

        "Posting No. Series") THEN

        VALIDATE ("Posting No. Series");

     Rec := SemRegHeader;

END;   

OnValidate Trigger of "Posting No. Series"

IF "Posting No. Series" <> '' THEN BEGIN

   SemSetup.GET;

   SemSetup.TESTFIELD(SemSetup."Seminar Registration Nos.");

   SemSetup.TESTFIELD(SemSetup."Posted Sem. Registration Nos.");

   NoSeriesMgt.TestSeries(SemSetup."Posted Sem. Registration Nos.", "Posting No. Series");

END;

TESTFIELD("Posting No.",'');

Thanks in advance as always,

Jemmy

kine

It seems, that it run testing on nos. series (the validate on the "Posting No. Series") but make no change in the record, because it want only to test the series....