331: END IF;
332: END IF;
333:
334: TABLE_NAME := 'bom_lists';
335: CURSOR_NAME := DBMS_SQL.OPEN_CURSOR;
336: /***** Commented out to fix bug #6769853 ********
337: P_ASS_BETWEEN := BOMRBOMS_NEW.P_ASS_BETWEEN;
338: P_CAT_BETWEEN := BOMRBOMS_NEW.P_CAT_BETWEEN;
339: ***** Commented out to fix bug #6769853 ********/
392: (' || ':b_P_BOM_OR_ENG' || ' = ''ENG'')
393: )';
394:
395:
396: DBMS_SQL.PARSE(CURSOR_NAME
397: ,L_STR
398: ,1);
399: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
400: ,':b_l_seq_id'
395:
396: DBMS_SQL.PARSE(CURSOR_NAME
397: ,L_STR
398: ,1);
399: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
400: ,':b_l_seq_id'
401: ,L_SEQ_ID);
402: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
403: ,':b_P_ALT_OPTION_TYPE'
398: ,1);
399: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
400: ,':b_l_seq_id'
401: ,L_SEQ_ID);
402: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
403: ,':b_P_ALT_OPTION_TYPE'
404: ,P_ALT_OPTION_TYPE);
405: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
406: ,':b_P_ALTERNATE_DESG'
401: ,L_SEQ_ID);
402: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
403: ,':b_P_ALT_OPTION_TYPE'
404: ,P_ALT_OPTION_TYPE);
405: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
406: ,':b_P_ALTERNATE_DESG'
407: ,P_ALTERNATE_DESG);
408: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
409: ,':b_P_BOM_OR_ENG'
404: ,P_ALT_OPTION_TYPE);
405: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
406: ,':b_P_ALTERNATE_DESG'
407: ,P_ALTERNATE_DESG);
408: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
409: ,':b_P_BOM_OR_ENG'
410: ,P_BOM_OR_ENG);
411: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
412: ,':b_P_ORGANIZATION_ID'
407: ,P_ALTERNATE_DESG);
408: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
409: ,':b_P_BOM_OR_ENG'
410: ,P_BOM_OR_ENG);
411: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
412: ,':b_P_ORGANIZATION_ID'
413: ,LP_ORGANIZATION_ID);
414: IF (FLAG = TRUE) THEN
415: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
411: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
412: ,':b_P_ORGANIZATION_ID'
413: ,LP_ORGANIZATION_ID);
414: IF (FLAG = TRUE) THEN
415: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
416: ,':b_P_ITEM_ID'
417: ,P_ITEM_ID);
418: ELSIF (FLAG = FALSE) THEN
419: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
415: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
416: ,':b_P_ITEM_ID'
417: ,P_ITEM_ID);
418: ELSIF (FLAG = FALSE) THEN
419: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
420: ,':b_P_CATEGORY_SET_ID'
421: ,P_CATEGORY_SET_ID);
422: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
423: ,':b_P_CATEGORY_STRUCTURE_ID'
418: ELSIF (FLAG = FALSE) THEN
419: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
420: ,':b_P_CATEGORY_SET_ID'
421: ,P_CATEGORY_SET_ID);
422: DBMS_SQL.BIND_VARIABLE(CURSOR_NAME
423: ,':b_P_CATEGORY_STRUCTURE_ID'
424: ,P_CATEGORY_STRUCTURE_ID);
425: END IF;
426:
423: ,':b_P_CATEGORY_STRUCTURE_ID'
424: ,P_CATEGORY_STRUCTURE_ID);
425: END IF;
426:
427: ROWS_PROCESSED := DBMS_SQL.EXECUTE(CURSOR_NAME);
428: DBMS_SQL.CLOSE_CURSOR(CURSOR_NAME);
429: TABLE_NAME := 'exploder';
430:
431: IF LP_REVISION_DATE IS NULL THEN
424: ,P_CATEGORY_STRUCTURE_ID);
425: END IF;
426:
427: ROWS_PROCESSED := DBMS_SQL.EXECUTE(CURSOR_NAME);
428: DBMS_SQL.CLOSE_CURSOR(CURSOR_NAME);
429: TABLE_NAME := 'exploder';
430:
431: IF LP_REVISION_DATE IS NULL THEN
432: LP_REVISION_DATE := TO_CHAR(SYSDATE