Recent content by Rajshri

Thank you very much... Yes this code is working fine.

Did you mean by this code? if vlFLAG = False then do: run VALIDATE-PROJECT-MASTER inTHIS-PROCEDURE (input fb_pmac.pmkey, input fb_pmac.pm-code, input "pm-status":U, input true, output vl_Error, output vl_ErrMsg, output vl_ErrType, output vl_Return). if vl_Error or entry(1...

is it the correct way to handle this one?

does it make sense? run VALIDATE-PROJECT-MASTER inTHIS-PROCEDURE ( input fb_pmac.pmkey, input fb_pmac.pm-code, input"pm-status":U, inputtrue, output vl_Error, output vl_ErrMsg, output vl_ErrType, output vl_Return). if vl_Error or entry(1, vl_Return) lt"7":U or entry(1, vl_Return)...

it means if first-of (fb_pmac.pm-code) (PNO is B) then do: badproject = false. validate PROJECT-MASTER if vl_Error(i.e status is wrong for Project A - PNO B) then badproject = true. end. if badproject then next. (it means it reads the next record which is again Project A - PNO C) The...

Did you mean by this? if first-of(fb_pmac.pm-code) then do: run VALIDATE-PROJECT-MASTER in THIS-PROCEDURE (input fb_pmac.pmkey, input fb_pmac.pm-code, input "pm-status":U, input true, output vl_Error, output vl_ErrMsg, output...

Please have a look into the given example: Project A has two Pno's B and C for each pmac finds both PNO B and C the first-of pm-code (which is PNO B) checks status of the project and if not correct then does a next. the program then reads the next one (which is PNO C and belongs to the...

But if we validate Project-Master in first-of(fb_pmac.pm-code) then Now the way you have the program it doesn't check the project and includes the PNO on the report (it shouldn't).

for each fb_pmac no-lock where fb_pmac.pmkey eq vl_sc-proj-key and fb_pmac.pm-code ge vl_StartProject and fb_pmac.pm-code le vl_EndProject break by fb_pmac.pm-code: run VALIDATE-PROJECT-MASTER in THIS-PROCEDURE (input fb_pmac.pmkey...

Consider a table named "pmac" in the data base. Fields: (1) Project Code (2) PNO (3) Status A project may have many PNOs. Consider Project A has two PNOs 1 & 2. we have to validate project through procedure library VALIDATE-PROJECT-MASTER. run VALIDATE-PROJECT-MASTER...

Hello, run VALIDATE-PROJECT-MASTER inTHIS-PROCEDURE ( input fb_pmac.pmkey, input fb_pmac.pm-code, input "pm-status":U, input true, output vl_Error, output vl_ErrMsg, output vl_ErrType, output vl_Return). if vl_Error or entry(1, vl_Return) lt"7":U or entry(1, vl_Return) gt"k":U then...