[morza]

Всем большое спасибо.разобрался)

dialog.run();

    if (dialog.closedOk())
    {
        cmpl = dlgComplaint.value();
    }


        ttsbegin;
        if (cmpl)
        {
            hotelComplaints.Complain      = cmpl;
            hotelComplaints.HotelRoomId   = RHotelRoomTable.HotelRoomId;
            hotelComplaints.HotelRoomType = RHotelRoomTable.HotelRoomType;
            hotelComplaints.insert();
        }
        ttscommit;
        RHotelComplaints_ds.reread();
        RHotelComplaints_ds.refresh();