Oracle Forms Developer – Form Builder Reference, Volume 1

378
new_date DATE ) IS
fnd_row NUMBER;
BEGIN
/*
** Try to lookup the part number among the temporary part list
** record group named ’TMPPART’ in its ’PARTNO’ column.
*/
fnd_row := Is_Value_In_List( part_no, ’TMPPART’, ’PARTNO’);
IF fnd_row = 0 THEN
Message(’Part Number ’||part_no||’ not found.’);
RETURN;
ELSE
/*
** Set the corresponding Date cell value from the
** matching row.
*/
Set_Group_Date_Cell(’TMPPART.MAXORDDATE’,fnd_row,new_date );
END IF;
END;