11083: l_strQuery := l_strQuery || l_tempStr;
11084:
11085: -- Parse cursor
11086:
11087: l_CursorID := DBMS_SQL.Open_Cursor;
11088: DBMS_SQL.PARSE(l_CursorID, l_strQuery, DBMS_SQL.v7);
11089: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 1, v_delivery_id);
11090:
11091: IF l_debug_on THEN
11084:
11085: -- Parse cursor
11086:
11087: l_CursorID := DBMS_SQL.Open_Cursor;
11088: DBMS_SQL.PARSE(l_CursorID, l_strQuery, DBMS_SQL.v7);
11089: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 1, v_delivery_id);
11090:
11091: IF l_debug_on THEN
11092: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ITM_QUERY_CUSTOM.BIND_VALUES',WSH_DEBUG_SV.C_PROC_LEVEL);
11085: -- Parse cursor
11086:
11087: l_CursorID := DBMS_SQL.Open_Cursor;
11088: DBMS_SQL.PARSE(l_CursorID, l_strQuery, DBMS_SQL.v7);
11089: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 1, v_delivery_id);
11090:
11091: IF l_debug_on THEN
11092: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ITM_QUERY_CUSTOM.BIND_VALUES',WSH_DEBUG_SV.C_PROC_LEVEL);
11093: END IF;
11092: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ITM_QUERY_CUSTOM.BIND_VALUES',WSH_DEBUG_SV.C_PROC_LEVEL);
11093: END IF;
11094: WSH_ITM_QUERY_CUSTOM.BIND_VALUES(l_del_Table, l_CursorID);
11095:
11096: l_ignore := DBMS_SQL.EXECUTE(l_CursorID);
11097:
11098: l_rows_fetched := dbms_sql.fetch_rows(l_CursorID);
11099: DBMS_SQL.CLOSE_CURSOR(l_CursorID);
11100:
11094: WSH_ITM_QUERY_CUSTOM.BIND_VALUES(l_del_Table, l_CursorID);
11095:
11096: l_ignore := DBMS_SQL.EXECUTE(l_CursorID);
11097:
11098: l_rows_fetched := dbms_sql.fetch_rows(l_CursorID);
11099: DBMS_SQL.CLOSE_CURSOR(l_CursorID);
11100:
11101: IF (l_rows_fetched = 0) THEN
11102:
11095:
11096: l_ignore := DBMS_SQL.EXECUTE(l_CursorID);
11097:
11098: l_rows_fetched := dbms_sql.fetch_rows(l_CursorID);
11099: DBMS_SQL.CLOSE_CURSOR(l_CursorID);
11100:
11101: IF (l_rows_fetched = 0) THEN
11102:
11103: IF l_debug_on THEN