<cmpAction name="SAVE_JOIN">
        <![CDATA[
DECLARE
  n_pc_id NUMERIC;
  n_csc_id NUMERIC;
BEGIN
  DECLARE
    l record;
  BEGIN
    FOR l IN
    (
      SELECT *
      FROM mis.v_mis_contract_agent_cons t
      WHERE t.lpu = :pn_lpu AND t.pid = :id

    ) loop
      perform mis.f_mis_contract_agent_cons8add(pnD_INSERT_ID := n_pc_id, pnLPU := l.lpu, pnPID := :new_id, pnAGENT := l.agent_id);
    END loop;
  END;
  DECLARE
    r record;
  BEGIN
    FOR r IN
    (
      SELECT *
      FROM mis.v_mis_contract_service_cons t
      WHERE t.pid = :id AND t.lpu = :pn_lpu

    ) loop
      perform mis.f_mis_contract_service_cons8add(pnD_INSERT_ID := n_csc_id, pnLPU := r.lpu, pnPID := :new_id, pnSERVICE := r.service_id, pnPRICE := r.price, pnQUANT := r.quant, pnSUMM := r.summ, psINTERNAL_CODE := r.internal_code);
    END loop;
  END;
END
]]>
        <cmpActionVar name="pn_lpu" src="LPU" srctype="session"/>
        <cmpActionVar name="new_id" src="NEW_ID" srctype="var"/>
        <cmpActionVar name="id" src="JOIN_ID" srctype="var"/>
    </cmpAction>