112: IF (l_reqclrt_id IS NULL) THEN
113:
114:
115: BEGIN
116: SELECT WSH_ITM_RESPONSE_HEADERS_S.NEXTVAL INTO l_response_header_id FROM DUAL;
117: INSERT INTO WSH_ITM_RESPONSE_HEADERS
118: (
119: RESPONSE_HEADER_ID,
120: REQUEST_CONTROL_ID,
113:
114:
115: BEGIN
116: SELECT WSH_ITM_RESPONSE_HEADERS_S.NEXTVAL INTO l_response_header_id FROM DUAL;
117: INSERT INTO WSH_ITM_RESPONSE_HEADERS
118: (
119: RESPONSE_HEADER_ID,
120: REQUEST_CONTROL_ID,
121: VENDOR_ID,
162: ELSE
163:
164: BEGIN
165:
166: SELECT WSH_ITM_RESPONSE_HEADERS_S.NEXTVAL INTO l_response_header_id FROM DUAL;
167: INSERT INTO WSH_ITM_RESPONSE_HEADERS
168: (
169: RESPONSE_HEADER_ID,
170: REQUEST_CONTROL_ID,
163:
164: BEGIN
165:
166: SELECT WSH_ITM_RESPONSE_HEADERS_S.NEXTVAL INTO l_response_header_id FROM DUAL;
167: INSERT INTO WSH_ITM_RESPONSE_HEADERS
168: (
169: RESPONSE_HEADER_ID,
170: REQUEST_CONTROL_ID,
171: VENDOR_ID,
451: x_response_header_id := NULL;
452: END;
453:
454: IF x_response_header_id IS NULL THEN
455: SELECT WSH_ITM_RESPONSE_HEADERS_S.NEXTVAL INTO
456: x_response_header_id FROM DUAL;
457: x_create_resp_hdr := 1;
458: ELSE
459: x_create_resp_hdr := NULL;