1585: binds.SERVER_ID
1586: INTO
1587: l_server_id
1588: FROM
1589: IEU_UWQ_AGENT_BINDINGS binds,
1590: IEO_SVR_SERVERS srvrs,
1591: IEO_SVR_RT_INFO rti
1592: WHERE
1593: (binds.RESOURCE_ID = P_RESOURCE_ID) AND
1804: CURSOR c_binds(svr_type_id NUMBER) IS
1805: SELECT
1806: ab.SERVER_ID
1807: FROM
1808: IEU_UWQ_AGENT_BINDINGS ab,
1809: IEO_SVR_SERVERS srvrs
1810: WHERE
1811: ab.RESOURCE_ID = P_RESOURCE_ID AND
1812: ab.SERVER_ID = srvrs.SERVER_ID AND
1845: FOR cur in c_binds( l_svr_type_id )
1846: LOOP
1847:
1848: UPDATE
1849: IEU_UWQ_AGENT_BINDINGS ab
1850: SET
1851: ab.LAST_UPDATE_DATE = SYSDATE,
1852: ab.NOT_VALID = 'Y'
1853: WHERE
1856:
1857: END LOOP;
1858:
1859:
1860: UPDATE IEU_UWQ_AGENT_BINDINGS ab
1861: SET
1862: ab.LAST_UPDATE_DATE = SYSDATE,
1863: ab.NOT_VALID = NULL
1864: WHERE
1867:
1868:
1869: IF (SQL%NOTFOUND OR (SQL%ROWCOUNT <= 0)) THEN
1870:
1871: INSERT INTO IEU_UWQ_AGENT_BINDINGS
1872: ( RESOURCE_ID,
1873: SERVER_ID,
1874: LAST_UPDATE_DATE,
1875: NOT_VALID )
1906:
1907: SAVEPOINT start_unbind;
1908:
1909:
1910: UPDATE IEU_UWQ_AGENT_BINDINGS ab
1911: SET
1912: ab.LAST_UPDATE_DATE = SYSDATE,
1913: ab.NOT_VALID = 'Y'
1914: WHERE
1949:
1950: SAVEPOINT start_unbind;
1951:
1952:
1953: UPDATE IEU_UWQ_AGENT_BINDINGS ab
1954: SET
1955: ab.LAST_UPDATE_DATE = SYSDATE,
1956: ab.NOT_VALID = 'Y'
1957: WHERE
2032: (see BIND_AGENT proc.) so this case should never happen and we should get just
2033: one server. - ssk
2034: */
2035: l_binding_statement := 'SELECT bindings.server_id, svr_types.type_id FROM ' ||
2036: ' ieu_uwq_agent_bindings bindings, ' ||
2037: ' ieo_svr_types_b svr_types, ' ||
2038: ' ieo_svr_servers svrs ' ||
2039: ' WHERE bindings.resource_id = :1 ' ||
2040: ' AND bindings.server_id=svrs.server_id ' ||