[Home] [Help]
705: END IF;
706: END IF;
707: END IF;
708:
709: /* Update the XDP_ORDER_HEADERS table with the User defined Workitem Item Type and Item Key */
710:
711: update XDP_ORDER_HEADERS
712: set WF_ITEM_TYPE = lv_item_type,
713: WF_ITEM_KEY = lv_item_key,
707: END IF;
708:
709: /* Update the XDP_ORDER_HEADERS table with the User defined Workitem Item Type and Item Key */
710:
711: update XDP_ORDER_HEADERS
712: set WF_ITEM_TYPE = lv_item_type,
713: WF_ITEM_KEY = lv_item_key,
714: LAST_UPDATE_DATE = sysdate, LAST_UPDATED_BY = FND_GLOBAL.USER_ID,
715: LAST_UPDATE_LOGIN = FND_GLOBAL.LOGIN_ID
808: --*********************************************************************
809: -- Definition of Procedure Validate_Order_Header:-validates Order Number
810: --Validates Customer Account Id, Argument null Conditions
811: -- and calls Service Validation
812: --Note:- Order Id validation is checked during insert in XDP_ORDER_HEADERS
813: --************************************************************************
814:
815: PROCEDURE Validate_Order_Header(
816: P_ORDER_HEADER IN OUT NOCOPY XDP_TYPES.SERVICE_ORDER_HEADER,
1891: END IF;
1892: END IF;
1893:
1894: BEGIN
1895: insert into xdp_order_headers
1896: (
1897: order_id,
1898: external_order_number,
1899: status_code,
1944: last_update_login
1945: )
1946: values
1947: (
1948: XDP_ORDER_HEADERS_S.NEXTVAL,
1949: p_order_header.order_number,
1950: 'STANDBY',
1951: sysdate,
1952: lv_date,
2005: END IF;
2006:
2007: EXCEPTION
2008: WHEN DUP_VAL_ON_INDEX THEN
2009: IF INSTR(SQLERRM,'XDP_ORDER_HEADERS_U2')>0 THEN
2010: RAISE e_order_num_duplicate;
2011: END IF;
2012:
2013: WHEN OTHERS THEN