procedure TFDDAptTableAdapter.ProcessUpdate(ARow: TFDDatSRow; var AAction: TFDErrorAction;
  ARequest: TFDUpdateRequest; AUpdRowOptions: TFDUpdateRowOptions;
  AFillRowOptions: TFDPhysFillRowOptions; AColumn: Integer);
begin
...
      GetUpdateHandler.UpdateRow(ARow, ARequest, AUpdRowOptions, AAction); // ARequest = arInsert, AAction = eaApplied т.к. сами вставили запись
      if AAction in [eaRetry, eaDefault] then begin // не выполнится AAction = eaApplied
          ...
          // build command if required
          if oCmd = nil then
            case ARequest of
          ...
            arInsert:
              begin
                if not oUpdOpts.EnableInsert then
                  FDException(Self, [S_FD_LDApt], er_FD_DAptCantInsert, []);
                oCmd := GetUpdateRowCommand(ARow, AUpdRowOptions, arInsert, // т.к. сюда не заходим oCmd = nil
                  [], -1, lCacheUpdateCommand, eCmdFlags);
                if gfFetchGenerator in eCmdFlags then begin
                  ProcessUpdate(ARow, AAction, arFetchGenerators,
                    AUpdRowOptions + [uoDeferredGenGet], [], -1);
                  if not (AAction in [eaApplied, eaDefault]) then
                    oCmd := nil;
                end;
              end;
      end;
...

        else if (ARequest in [arInsert, arUpdate]) then begin
          if oCmd <> nil then begin  // oCmd = nil
            lCustomFetchRow := not (arFetchRow in FGeneratedCommands) and (GetFetchRowCommand <> nil);
            if not lCustomFetchRow and not oMeta.InlineRefresh and (oUpdOpts.RefreshMode <> rmManual) or
               lCustomFetchRow and (oUpdOpts.RefreshMode = rmAll) then begin
              eFillOpts := FDGetFillRowOptions(GetOptions.FetchOptions);
              if ARequest = arInsert then
                Include(eFillOpts, foAfterIns)
              else if ARequest = arUpdate then
                Include(eFillOpts, foAfterUpd);
              if gfIdentityInsert in eCmdFlags then
                Include(eFillOpts, foNoIdentity);
              Fetch(ARow, AAction, -1, eFillOpts);
            end;
            if (ARequest = arInsert) and (gfHasHBlob in eCmdFlags) and
               (oMeta.InsertHBlobMode = hmUpdateAfterInsert) then
              ProcessUpdate(ARow, AAction, arUpdateHBlobs,
                AUpdRowOptions - [uoNoSrvRecord], [], -1)
            else
              AAction := eaApplied;
            if (ARequest = arInsert) and
               ((AAction = eaApplied) or (AAction = eaDefault)) then
              if uoImmediateUpd in AUpdRowOptions then
                ARow.AcceptChanges; // не выполнится, состояние у записи так и останется rsInserted
          end;
        end
...
end;