10731: x_return_status OUT NOCOPY VARCHAR2) RETURN VARCHAR2 IS
10732:
10733: l_strQuery VARCHAR2(12000);
10734: l_tempStr VARCHAR2(12000);
10735: l_del_Table WSH_ITM_QUERY_CUSTOM.g_CondnValTableType;
10736: l_Item_Condn1Tab WSH_ITM_QUERY_CUSTOM.g_ValueTableType;
10737:
10738: l_CursorID NUMBER;
10739: l_ignore NUMBER;
10732:
10733: l_strQuery VARCHAR2(12000);
10734: l_tempStr VARCHAR2(12000);
10735: l_del_Table WSH_ITM_QUERY_CUSTOM.g_CondnValTableType;
10736: l_Item_Condn1Tab WSH_ITM_QUERY_CUSTOM.g_ValueTableType;
10737:
10738: l_CursorID NUMBER;
10739: l_ignore NUMBER;
10740: v_delivery_id NUMBER := 0;
10780: l_Item_Condn1Tab(1).g_number_val := p_delivery_id;
10781: l_Item_Condn1Tab(1).g_Bind_Literal := ':b_delivery_id';
10782:
10783: IF l_debug_on THEN
10784: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ITM_QUERY_CUSTOM.ADD_CONDITION',WSH_DEBUG_SV.C_PROC_LEVEL);
10785: END IF;
10786: WSH_ITM_QUERY_CUSTOM.ADD_CONDITION(l_del_Table, ' AND WND.delivery_id = :b_delivery_id', l_Item_Condn1Tab, 'NUMBER');
10787:
10788:
10782:
10783: IF l_debug_on THEN
10784: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ITM_QUERY_CUSTOM.ADD_CONDITION',WSH_DEBUG_SV.C_PROC_LEVEL);
10785: END IF;
10786: WSH_ITM_QUERY_CUSTOM.ADD_CONDITION(l_del_Table, ' AND WND.delivery_id = :b_delivery_id', l_Item_Condn1Tab, 'NUMBER');
10787:
10788:
10789:
10790: --Call the customized API
10816: DBMS_SQL.PARSE(l_CursorID, l_strQuery, DBMS_SQL.v7);
10817: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 1, v_delivery_id);
10818:
10819: IF l_debug_on THEN
10820: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ITM_QUERY_CUSTOM.BIND_VALUES',WSH_DEBUG_SV.C_PROC_LEVEL);
10821: END IF;
10822: WSH_ITM_QUERY_CUSTOM.BIND_VALUES(l_del_Table, l_CursorID);
10823:
10824: l_ignore := DBMS_SQL.EXECUTE(l_CursorID);
10818:
10819: IF l_debug_on THEN
10820: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ITM_QUERY_CUSTOM.BIND_VALUES',WSH_DEBUG_SV.C_PROC_LEVEL);
10821: END IF;
10822: WSH_ITM_QUERY_CUSTOM.BIND_VALUES(l_del_Table, l_CursorID);
10823:
10824: l_ignore := DBMS_SQL.EXECUTE(l_CursorID);
10825:
10826: l_rows_fetched := dbms_sql.fetch_rows(l_CursorID);