Sisis las dos formas andan.
Código Delphi
[-]DM.DSET_calendarioID_PROF.Value:=DM.DSET_profID_PROF.Value;
Código Delphi
[-]tblCalendarioProfesional.value := Form1.VariableCodigo
Código SQL
[-]...
with IBQuery1 do
begin
Close;
SQL.Text:= 'SELECT MAX(PROFESIONAL_ID) AS MAX_ID FROM PROFESIONALES';
Open;
Max_ID:= FieldByName('MAX_ID').AsInteger;
end;
...
Muchas gracias, ya me funciona... Aunque no fue necesario la consulta sql, con el primer odigo me funciono..
Saludos.~