DBA Data[Home] [Help]

APPS.INVPVHDR dependencies on DBMS_SQL

Line 490: ** dbms_sql.bind_variable(DSQL_c1, 'cr_segment1_bind', cr.segment1);

486:
487: /* This dynamic sql is trying to create entries in plsql tables
488: ** bindvarsX bindvalsX
489: ** to facilitate the dynamic binding of variables: For example:
490: ** dbms_sql.bind_variable(DSQL_c1, 'cr_segment1_bind', cr.segment1);
491: ** The code fragment here mimics the code in INVPUTLI.get_dynamic_sql_str()
492: */
493:
494: for n in 1..totalsegs loop

Line 771: DSQL_c1 := dbms_sql.open_cursor;

767: ** l_item_id_bind gets l_item_id
768: ** Now, open cursor DSQL_c1, parse it and bind the variables
769: */
770:
771: DSQL_c1 := dbms_sql.open_cursor;
772: dbms_sql.parse(DSQL_c1, DSQL_statement1, dbms_sql.native);
773: dbms_sql.define_column(DSQL_c1, 1, DSQL_inventory_item_id);
774: dbms_sql.bind_variable(DSQL_c1, 'organization_id_bind',
775: cr.organization_id);

Line 772: dbms_sql.parse(DSQL_c1, DSQL_statement1, dbms_sql.native);

768: ** Now, open cursor DSQL_c1, parse it and bind the variables
769: */
770:
771: DSQL_c1 := dbms_sql.open_cursor;
772: dbms_sql.parse(DSQL_c1, DSQL_statement1, dbms_sql.native);
773: dbms_sql.define_column(DSQL_c1, 1, DSQL_inventory_item_id);
774: dbms_sql.bind_variable(DSQL_c1, 'organization_id_bind',
775: cr.organization_id);
776: dbms_sql.bind_variable(DSQL_c1, 'l_item_id_bind', l_item_id);

Line 773: dbms_sql.define_column(DSQL_c1, 1, DSQL_inventory_item_id);

769: */
770:
771: DSQL_c1 := dbms_sql.open_cursor;
772: dbms_sql.parse(DSQL_c1, DSQL_statement1, dbms_sql.native);
773: dbms_sql.define_column(DSQL_c1, 1, DSQL_inventory_item_id);
774: dbms_sql.bind_variable(DSQL_c1, 'organization_id_bind',
775: cr.organization_id);
776: dbms_sql.bind_variable(DSQL_c1, 'l_item_id_bind', l_item_id);
777:

Line 774: dbms_sql.bind_variable(DSQL_c1, 'organization_id_bind',

770:
771: DSQL_c1 := dbms_sql.open_cursor;
772: dbms_sql.parse(DSQL_c1, DSQL_statement1, dbms_sql.native);
773: dbms_sql.define_column(DSQL_c1, 1, DSQL_inventory_item_id);
774: dbms_sql.bind_variable(DSQL_c1, 'organization_id_bind',
775: cr.organization_id);
776: dbms_sql.bind_variable(DSQL_c1, 'l_item_id_bind', l_item_id);
777:
778: /* The following is to facilitate the dynamic binding

Line 776: dbms_sql.bind_variable(DSQL_c1, 'l_item_id_bind', l_item_id);

772: dbms_sql.parse(DSQL_c1, DSQL_statement1, dbms_sql.native);
773: dbms_sql.define_column(DSQL_c1, 1, DSQL_inventory_item_id);
774: dbms_sql.bind_variable(DSQL_c1, 'organization_id_bind',
775: cr.organization_id);
776: dbms_sql.bind_variable(DSQL_c1, 'l_item_id_bind', l_item_id);
777:
778: /* The following is to facilitate the dynamic binding
779: ** of the where clause variables:
780: ** dbms_sql.bind_variable(DSQL_c1,

Line 780: ** dbms_sql.bind_variable(DSQL_c1,

776: dbms_sql.bind_variable(DSQL_c1, 'l_item_id_bind', l_item_id);
777:
778: /* The following is to facilitate the dynamic binding
779: ** of the where clause variables:
780: ** dbms_sql.bind_variable(DSQL_c1,
781: ** 'cr_segment1_bind', cr.segment1);
782: ** The PL/SQL tables bindvars1 and bindvals1 have alreadey
783: ** been populated before.
784: */

Line 793: dbms_sql.bind_variable(DSQL_c1, bindvars1(n), bindvals1(n) );

789: INVPUTLI.info('INVPVHDR: BIND values ' ||
790: bindvars1(n)||' gets '|| bindvals1(n));
791: END IF;
792:
793: dbms_sql.bind_variable(DSQL_c1, bindvars1(n), bindvals1(n) );
794:
795: EXCEPTION
796: when others then
797: err_text:= substr('validate_item_header DSQL 1'|| SQLERRM, 1, 240);

Line 805: DSQL_rows_processed := dbms_sql.execute(DSQL_c1);

801: end loop;
802:
803:
804: Begin
805: DSQL_rows_processed := dbms_sql.execute(DSQL_c1);
806: Exception
807: when others then
808: err_text:= substr('validate_item_header DSQL 2'|| SQLERRM , 1, 240) ;
809: return(SQLCODE);

Line 836: if dbms_sql.fetch_rows(DSQL_c1) > 0 then /* BIG If*/

832: ** returned from the MSI table because of the distinct
833: ** clause
834: */
835:
836: if dbms_sql.fetch_rows(DSQL_c1) > 0 then /* BIG If*/
837:
838: Begin
839: dbms_sql.column_value(DSQL_c1,1,DSQL_inventory_item_id);
840:

Line 839: dbms_sql.column_value(DSQL_c1,1,DSQL_inventory_item_id);

835:
836: if dbms_sql.fetch_rows(DSQL_c1) > 0 then /* BIG If*/
837:
838: Begin
839: dbms_sql.column_value(DSQL_c1,1,DSQL_inventory_item_id);
840:
841: dup_item_id := DSQL_inventory_item_id;
842:
843: update mtl_system_items_interface

Line 859: dbms_sql.close_cursor(DSQL_c1);

855: raise VALIDATE_ERR;
856: End;
857:
858: else /*The cursor DSQL_c1 fetched no rows at all*/
859: dbms_sql.close_cursor(DSQL_c1);
860: IF l_inv_debug_level IN(101, 102) THEN
861: INVPUTLI.info('INVPVHDR: entering DSQL2 ');
862: END IF;
863:

Line 895: DSQL_c2 := dbms_sql.open_cursor;

891: and set_process_id = :xset_id_bind
892: and msii.organization_id = mp.organization_id
893: and ' || statement_temp2;
894:
895: DSQL_c2 := dbms_sql.open_cursor;
896: dbms_sql.parse(DSQL_c2, DSQL_statement2, dbms_sql.native);
897: dbms_sql.define_column(DSQL_c2, 1, DSQL2_inventory_item_id);
898: dbms_sql.define_column(DSQL_c2, 2, DSQL2_transaction_id);
899: dbms_sql.define_column(DSQL_c2, 3, DSQL2_organization_id);

Line 896: dbms_sql.parse(DSQL_c2, DSQL_statement2, dbms_sql.native);

892: and msii.organization_id = mp.organization_id
893: and ' || statement_temp2;
894:
895: DSQL_c2 := dbms_sql.open_cursor;
896: dbms_sql.parse(DSQL_c2, DSQL_statement2, dbms_sql.native);
897: dbms_sql.define_column(DSQL_c2, 1, DSQL2_inventory_item_id);
898: dbms_sql.define_column(DSQL_c2, 2, DSQL2_transaction_id);
899: dbms_sql.define_column(DSQL_c2, 3, DSQL2_organization_id);
900: dbms_sql.bind_variable(DSQL_c2, 'l_item_id_bind', l_item_id);

Line 897: dbms_sql.define_column(DSQL_c2, 1, DSQL2_inventory_item_id);

893: and ' || statement_temp2;
894:
895: DSQL_c2 := dbms_sql.open_cursor;
896: dbms_sql.parse(DSQL_c2, DSQL_statement2, dbms_sql.native);
897: dbms_sql.define_column(DSQL_c2, 1, DSQL2_inventory_item_id);
898: dbms_sql.define_column(DSQL_c2, 2, DSQL2_transaction_id);
899: dbms_sql.define_column(DSQL_c2, 3, DSQL2_organization_id);
900: dbms_sql.bind_variable(DSQL_c2, 'l_item_id_bind', l_item_id);
901: dbms_sql.bind_variable(DSQL_c2, 'xset_id_bind', xset_id);

Line 898: dbms_sql.define_column(DSQL_c2, 2, DSQL2_transaction_id);

894:
895: DSQL_c2 := dbms_sql.open_cursor;
896: dbms_sql.parse(DSQL_c2, DSQL_statement2, dbms_sql.native);
897: dbms_sql.define_column(DSQL_c2, 1, DSQL2_inventory_item_id);
898: dbms_sql.define_column(DSQL_c2, 2, DSQL2_transaction_id);
899: dbms_sql.define_column(DSQL_c2, 3, DSQL2_organization_id);
900: dbms_sql.bind_variable(DSQL_c2, 'l_item_id_bind', l_item_id);
901: dbms_sql.bind_variable(DSQL_c2, 'xset_id_bind', xset_id);
902:

Line 899: dbms_sql.define_column(DSQL_c2, 3, DSQL2_organization_id);

895: DSQL_c2 := dbms_sql.open_cursor;
896: dbms_sql.parse(DSQL_c2, DSQL_statement2, dbms_sql.native);
897: dbms_sql.define_column(DSQL_c2, 1, DSQL2_inventory_item_id);
898: dbms_sql.define_column(DSQL_c2, 2, DSQL2_transaction_id);
899: dbms_sql.define_column(DSQL_c2, 3, DSQL2_organization_id);
900: dbms_sql.bind_variable(DSQL_c2, 'l_item_id_bind', l_item_id);
901: dbms_sql.bind_variable(DSQL_c2, 'xset_id_bind', xset_id);
902:
903: for n in 1..totalsegs loop

Line 900: dbms_sql.bind_variable(DSQL_c2, 'l_item_id_bind', l_item_id);

896: dbms_sql.parse(DSQL_c2, DSQL_statement2, dbms_sql.native);
897: dbms_sql.define_column(DSQL_c2, 1, DSQL2_inventory_item_id);
898: dbms_sql.define_column(DSQL_c2, 2, DSQL2_transaction_id);
899: dbms_sql.define_column(DSQL_c2, 3, DSQL2_organization_id);
900: dbms_sql.bind_variable(DSQL_c2, 'l_item_id_bind', l_item_id);
901: dbms_sql.bind_variable(DSQL_c2, 'xset_id_bind', xset_id);
902:
903: for n in 1..totalsegs loop
904: BEGIN

Line 901: dbms_sql.bind_variable(DSQL_c2, 'xset_id_bind', xset_id);

897: dbms_sql.define_column(DSQL_c2, 1, DSQL2_inventory_item_id);
898: dbms_sql.define_column(DSQL_c2, 2, DSQL2_transaction_id);
899: dbms_sql.define_column(DSQL_c2, 3, DSQL2_organization_id);
900: dbms_sql.bind_variable(DSQL_c2, 'l_item_id_bind', l_item_id);
901: dbms_sql.bind_variable(DSQL_c2, 'xset_id_bind', xset_id);
902:
903: for n in 1..totalsegs loop
904: BEGIN
905: IF l_inv_debug_level IN(101, 102) THEN

Line 910: dbms_sql.bind_variable(DSQL_c2, bindvars1(n), bindvals1(n) );

906: INVPUTLI.info('INVPVHDR: BIND2 values ' ||
907: bindvars1(n)||' gets '|| bindvals1(n));
908: END IF;
909:
910: dbms_sql.bind_variable(DSQL_c2, bindvars1(n), bindvals1(n) );
911: EXCEPTION
912: when others then
913: err_text:= substr('validate_item_header DSQL 2'|| SQLERRM , 1, 240);
914: return(SQLCODE);

Line 919: DSQL_rows_processed := dbms_sql.execute(DSQL_c2);

915: END;
916: end loop;
917:
918: begin
919: DSQL_rows_processed := dbms_sql.execute(DSQL_c2);
920: exception
921: when others then
922: err_text:= substr('validate_item_header DSQL 2.2'|| SQLERRM , 1, 240);
923: return(SQLCODE);

Line 927: if dbms_sql.fetch_rows(DSQL_c2) > 0 then

923: return(SQLCODE);
924: end;
925:
926: loop
927: if dbms_sql.fetch_rows(DSQL_c2) > 0 then
928: dbms_sql.column_value(DSQL_c2, 1, DSQL2_inventory_item_id);
929: dbms_sql.column_value(DSQL_c2, 2, DSQL2_transaction_id);
930: dbms_sql.column_value(DSQL_c2, 3, DSQL2_organization_id);
931:

Line 928: dbms_sql.column_value(DSQL_c2, 1, DSQL2_inventory_item_id);

924: end;
925:
926: loop
927: if dbms_sql.fetch_rows(DSQL_c2) > 0 then
928: dbms_sql.column_value(DSQL_c2, 1, DSQL2_inventory_item_id);
929: dbms_sql.column_value(DSQL_c2, 2, DSQL2_transaction_id);
930: dbms_sql.column_value(DSQL_c2, 3, DSQL2_organization_id);
931:
932:

Line 929: dbms_sql.column_value(DSQL_c2, 2, DSQL2_transaction_id);

925:
926: loop
927: if dbms_sql.fetch_rows(DSQL_c2) > 0 then
928: dbms_sql.column_value(DSQL_c2, 1, DSQL2_inventory_item_id);
929: dbms_sql.column_value(DSQL_c2, 2, DSQL2_transaction_id);
930: dbms_sql.column_value(DSQL_c2, 3, DSQL2_organization_id);
931:
932:
933: /* update item header with new item id

Line 930: dbms_sql.column_value(DSQL_c2, 3, DSQL2_organization_id);

926: loop
927: if dbms_sql.fetch_rows(DSQL_c2) > 0 then
928: dbms_sql.column_value(DSQL_c2, 1, DSQL2_inventory_item_id);
929: dbms_sql.column_value(DSQL_c2, 2, DSQL2_transaction_id);
930: dbms_sql.column_value(DSQL_c2, 3, DSQL2_organization_id);
931:
932:
933: /* update item header with new item id
934: ** This is for updating the III for similar

Line 987: dbms_sql.close_cursor(DSQL_c2);

983: and set_process_id = xset_id;
984:
985: else
986: -- no more rows, Close cursor and exit
987: dbms_sql.close_cursor(DSQL_c2);
988: exit;
989: end if;
990: end loop;
991: EXCEPTION

Line 993: if dbms_sql.is_open(DSQL_c2) then

989: end if;
990: end loop;
991: EXCEPTION
992: WHEN NO_DATA_FOUND THEN
993: if dbms_sql.is_open(DSQL_c2) then
994: dbms_sql.close_cursor(DSQL_c2);
995: end if;
996: WHEN OTHERS THEN
997: if dbms_sql.is_open(DSQL_c2) then

Line 994: dbms_sql.close_cursor(DSQL_c2);

990: end loop;
991: EXCEPTION
992: WHEN NO_DATA_FOUND THEN
993: if dbms_sql.is_open(DSQL_c2) then
994: dbms_sql.close_cursor(DSQL_c2);
995: end if;
996: WHEN OTHERS THEN
997: if dbms_sql.is_open(DSQL_c2) then
998: dbms_sql.close_cursor(DSQL_c2);

Line 997: if dbms_sql.is_open(DSQL_c2) then

993: if dbms_sql.is_open(DSQL_c2) then
994: dbms_sql.close_cursor(DSQL_c2);
995: end if;
996: WHEN OTHERS THEN
997: if dbms_sql.is_open(DSQL_c2) then
998: dbms_sql.close_cursor(DSQL_c2);
999: end if;
1000: err_text:= substr('validate_item_header DSQL STMT2 '|| SQLERRM , 1,240) ;
1001: return(SQLCODE);

Line 998: dbms_sql.close_cursor(DSQL_c2);

994: dbms_sql.close_cursor(DSQL_c2);
995: end if;
996: WHEN OTHERS THEN
997: if dbms_sql.is_open(DSQL_c2) then
998: dbms_sql.close_cursor(DSQL_c2);
999: end if;
1000: err_text:= substr('validate_item_header DSQL STMT2 '|| SQLERRM , 1,240) ;
1001: return(SQLCODE);
1002: END; /*PLSQL Block 2 (inside block 1)*/

Line 1007: if dbms_sql.is_open(DSQL_c1) then

1003:
1004:
1005: end if; /*BIG if from BLOCK 1*/
1006:
1007: if dbms_sql.is_open(DSQL_c1) then
1008: dbms_sql.close_cursor(DSQL_c1);
1009: end if;
1010:
1011: EXCEPTION

Line 1008: dbms_sql.close_cursor(DSQL_c1);

1004:
1005: end if; /*BIG if from BLOCK 1*/
1006:
1007: if dbms_sql.is_open(DSQL_c1) then
1008: dbms_sql.close_cursor(DSQL_c1);
1009: end if;
1010:
1011: EXCEPTION
1012:

Line 1014: if dbms_sql.is_open(DSQL_c1) then

1010:
1011: EXCEPTION
1012:
1013: WHEN NO_DATA_FOUND THEN
1014: if dbms_sql.is_open(DSQL_c1) then
1015: dbms_sql.close_cursor(DSQL_c1);
1016: end if;
1017: WHEN OTHERS THEN
1018: if dbms_sql.is_open(DSQL_c1) then

Line 1015: dbms_sql.close_cursor(DSQL_c1);

1011: EXCEPTION
1012:
1013: WHEN NO_DATA_FOUND THEN
1014: if dbms_sql.is_open(DSQL_c1) then
1015: dbms_sql.close_cursor(DSQL_c1);
1016: end if;
1017: WHEN OTHERS THEN
1018: if dbms_sql.is_open(DSQL_c1) then
1019: dbms_sql.close_cursor(DSQL_c1);

Line 1018: if dbms_sql.is_open(DSQL_c1) then

1014: if dbms_sql.is_open(DSQL_c1) then
1015: dbms_sql.close_cursor(DSQL_c1);
1016: end if;
1017: WHEN OTHERS THEN
1018: if dbms_sql.is_open(DSQL_c1) then
1019: dbms_sql.close_cursor(DSQL_c1);
1020: end if;
1021: err_text:= substr('validate_item_header DSQL STMT1'|| SQLERRM , 1,240);
1022: return(SQLCODE);

Line 1019: dbms_sql.close_cursor(DSQL_c1);

1015: dbms_sql.close_cursor(DSQL_c1);
1016: end if;
1017: WHEN OTHERS THEN
1018: if dbms_sql.is_open(DSQL_c1) then
1019: dbms_sql.close_cursor(DSQL_c1);
1020: end if;
1021: err_text:= substr('validate_item_header DSQL STMT1'|| SQLERRM , 1,240);
1022: return(SQLCODE);
1023:

Line 1147: DSQL_c3 := dbms_sql.open_cursor;

1143: where organization_id = :organization_id_bind
1144: and :transaction_type_bind = ''CREATE''
1145: and ' || statement_temp3;
1146:
1147: DSQL_c3 := dbms_sql.open_cursor;
1148: dbms_sql.parse(DSQL_c3, DSQL_statement3, dbms_sql.native);
1149: dbms_sql.define_column(DSQL_c3, 1, DSQL_count_star);
1150:
1151: /* Now bind the variables*/

Line 1148: dbms_sql.parse(DSQL_c3, DSQL_statement3, dbms_sql.native);

1144: and :transaction_type_bind = ''CREATE''
1145: and ' || statement_temp3;
1146:
1147: DSQL_c3 := dbms_sql.open_cursor;
1148: dbms_sql.parse(DSQL_c3, DSQL_statement3, dbms_sql.native);
1149: dbms_sql.define_column(DSQL_c3, 1, DSQL_count_star);
1150:
1151: /* Now bind the variables*/
1152: dbms_sql.bind_variable(DSQL_c3, 'organization_id_bind',

Line 1149: dbms_sql.define_column(DSQL_c3, 1, DSQL_count_star);

1145: and ' || statement_temp3;
1146:
1147: DSQL_c3 := dbms_sql.open_cursor;
1148: dbms_sql.parse(DSQL_c3, DSQL_statement3, dbms_sql.native);
1149: dbms_sql.define_column(DSQL_c3, 1, DSQL_count_star);
1150:
1151: /* Now bind the variables*/
1152: dbms_sql.bind_variable(DSQL_c3, 'organization_id_bind',
1153: cr.organization_id);

Line 1152: dbms_sql.bind_variable(DSQL_c3, 'organization_id_bind',

1148: dbms_sql.parse(DSQL_c3, DSQL_statement3, dbms_sql.native);
1149: dbms_sql.define_column(DSQL_c3, 1, DSQL_count_star);
1150:
1151: /* Now bind the variables*/
1152: dbms_sql.bind_variable(DSQL_c3, 'organization_id_bind',
1153: cr.organization_id);
1154: dbms_sql.bind_variable(DSQL_c3, 'transaction_type_bind',
1155: cr.transaction_type);
1156: /*

Line 1154: dbms_sql.bind_variable(DSQL_c3, 'transaction_type_bind',

1150:
1151: /* Now bind the variables*/
1152: dbms_sql.bind_variable(DSQL_c3, 'organization_id_bind',
1153: cr.organization_id);
1154: dbms_sql.bind_variable(DSQL_c3, 'transaction_type_bind',
1155: cr.transaction_type);
1156: /*
1157: ** The following binding for
1158: ** DSQL_c3 is exactly the same as for DSQL_c1

Line 1165: dbms_sql.bind_variable(DSQL_c3, bindvars1(n), bindvals1(n) );

1161: */
1162:
1163: for n in 1..totalsegs loop
1164: BEGIN
1165: dbms_sql.bind_variable(DSQL_c3, bindvars1(n), bindvals1(n) );
1166: EXCEPTION
1167: when others then
1168: err_text:= substr('validate_item_header DSQL 1.1'|| SQLERRM , 1, 240);
1169: return(SQLCODE);

Line 1174: DSQL_rows_processed := dbms_sql.execute(DSQL_c3);

1170: END;
1171: end loop;
1172:
1173: BEGIN
1174: DSQL_rows_processed := dbms_sql.execute(DSQL_c3);
1175: EXCEPTION
1176: when others then
1177: err_text:= substr('validate_item_header DSQL 1.2'|| SQLERRM , 1, 240);
1178: return(SQLCODE);

Line 1182: if dbms_sql.fetch_rows(DSQL_c3) > 0 then

1178: return(SQLCODE);
1179: END;
1180:
1181: ext_flag := 0;
1182: if dbms_sql.fetch_rows(DSQL_c3) > 0 then
1183: dbms_sql.column_value(DSQL_c3,1,DSQL_count_star);
1184: ext_flag := DSQL_count_star;
1185: else
1186: dbms_sql.close_cursor(DSQL_c3);

Line 1183: dbms_sql.column_value(DSQL_c3,1,DSQL_count_star);

1179: END;
1180:
1181: ext_flag := 0;
1182: if dbms_sql.fetch_rows(DSQL_c3) > 0 then
1183: dbms_sql.column_value(DSQL_c3,1,DSQL_count_star);
1184: ext_flag := DSQL_count_star;
1185: else
1186: dbms_sql.close_cursor(DSQL_c3);
1187: end if;

Line 1186: dbms_sql.close_cursor(DSQL_c3);

1182: if dbms_sql.fetch_rows(DSQL_c3) > 0 then
1183: dbms_sql.column_value(DSQL_c3,1,DSQL_count_star);
1184: ext_flag := DSQL_count_star;
1185: else
1186: dbms_sql.close_cursor(DSQL_c3);
1187: end if;
1188:
1189: if dbms_sql.is_open(DSQL_c3) then
1190: dbms_sql.close_cursor(DSQL_c3);

Line 1189: if dbms_sql.is_open(DSQL_c3) then

1185: else
1186: dbms_sql.close_cursor(DSQL_c3);
1187: end if;
1188:
1189: if dbms_sql.is_open(DSQL_c3) then
1190: dbms_sql.close_cursor(DSQL_c3);
1191: end if;
1192:
1193:

Line 1190: dbms_sql.close_cursor(DSQL_c3);

1186: dbms_sql.close_cursor(DSQL_c3);
1187: end if;
1188:
1189: if dbms_sql.is_open(DSQL_c3) then
1190: dbms_sql.close_cursor(DSQL_c3);
1191: end if;
1192:
1193:
1194: EXCEPTION

Line 1196: if dbms_sql.is_open(DSQL_c3) then

1192:
1193:
1194: EXCEPTION
1195: WHEN OTHERS THEN
1196: if dbms_sql.is_open(DSQL_c3) then
1197: dbms_sql.close_cursor(DSQL_c3);
1198: end if;
1199: err_text:= substr('validate_item_header DSQL STMT3'|| SQLERRM , 1,240);
1200: return(SQLCODE);

Line 1197: dbms_sql.close_cursor(DSQL_c3);

1193:
1194: EXCEPTION
1195: WHEN OTHERS THEN
1196: if dbms_sql.is_open(DSQL_c3) then
1197: dbms_sql.close_cursor(DSQL_c3);
1198: end if;
1199: err_text:= substr('validate_item_header DSQL STMT3'|| SQLERRM , 1,240);
1200: return(SQLCODE);
1201:

Line 1259: ** and so on., and then use dbms_sql.bind_variable to bind the

1255: **where organization_id = cr.organization_id
1256: **and nvl(msii.segment1, '.') = nvl(cr.segment1,'.');
1257: **and so on......
1258: ** intermediate step: ...... = nvl(:cr_segment1_bind, '.')
1259: ** and so on., and then use dbms_sql.bind_variable to bind the
1260: ** values to the cursor DSQL_c4
1261: ** 03MAY96 Added xset_id processing to this dynamic sql stmt.
1262: */
1263:

Line 1273: DSQL_c4 := dbms_sql.open_cursor;

1269: and set_process_id = :xset_id_bind
1270: and process_flag = 2
1271: and ' || statement_temp4;
1272:
1273: DSQL_c4 := dbms_sql.open_cursor;
1274: dbms_sql.parse(DSQL_c4, DSQL_statement4, dbms_sql.native);
1275: dbms_sql.define_column(DSQL_c4, 1, DSQL_count_star);
1276: dbms_sql.bind_variable(DSQL_c4, 'xset_id_bind', xset_id);
1277: dbms_sql.bind_variable(DSQL_c4, 'organization_id_bind',

Line 1274: dbms_sql.parse(DSQL_c4, DSQL_statement4, dbms_sql.native);

1270: and process_flag = 2
1271: and ' || statement_temp4;
1272:
1273: DSQL_c4 := dbms_sql.open_cursor;
1274: dbms_sql.parse(DSQL_c4, DSQL_statement4, dbms_sql.native);
1275: dbms_sql.define_column(DSQL_c4, 1, DSQL_count_star);
1276: dbms_sql.bind_variable(DSQL_c4, 'xset_id_bind', xset_id);
1277: dbms_sql.bind_variable(DSQL_c4, 'organization_id_bind',
1278: cr.organization_id);

Line 1275: dbms_sql.define_column(DSQL_c4, 1, DSQL_count_star);

1271: and ' || statement_temp4;
1272:
1273: DSQL_c4 := dbms_sql.open_cursor;
1274: dbms_sql.parse(DSQL_c4, DSQL_statement4, dbms_sql.native);
1275: dbms_sql.define_column(DSQL_c4, 1, DSQL_count_star);
1276: dbms_sql.bind_variable(DSQL_c4, 'xset_id_bind', xset_id);
1277: dbms_sql.bind_variable(DSQL_c4, 'organization_id_bind',
1278: cr.organization_id);
1279:

Line 1276: dbms_sql.bind_variable(DSQL_c4, 'xset_id_bind', xset_id);

1272:
1273: DSQL_c4 := dbms_sql.open_cursor;
1274: dbms_sql.parse(DSQL_c4, DSQL_statement4, dbms_sql.native);
1275: dbms_sql.define_column(DSQL_c4, 1, DSQL_count_star);
1276: dbms_sql.bind_variable(DSQL_c4, 'xset_id_bind', xset_id);
1277: dbms_sql.bind_variable(DSQL_c4, 'organization_id_bind',
1278: cr.organization_id);
1279:
1280: /*

Line 1277: dbms_sql.bind_variable(DSQL_c4, 'organization_id_bind',

1273: DSQL_c4 := dbms_sql.open_cursor;
1274: dbms_sql.parse(DSQL_c4, DSQL_statement4, dbms_sql.native);
1275: dbms_sql.define_column(DSQL_c4, 1, DSQL_count_star);
1276: dbms_sql.bind_variable(DSQL_c4, 'xset_id_bind', xset_id);
1277: dbms_sql.bind_variable(DSQL_c4, 'organization_id_bind',
1278: cr.organization_id);
1279:
1280: /*
1281: ** The following binding for

Line 1289: dbms_sql.bind_variable(DSQL_c4, bindvars1(n), bindvals1(n) );

1285: */
1286:
1287: for n in 1..totalsegs loop
1288: begin
1289: dbms_sql.bind_variable(DSQL_c4, bindvars1(n), bindvals1(n) );
1290: exception
1291: when others then
1292: err_text:= substr('validate_item_header DSQL 4.1'|| SQLERRM,1,240);
1293: return(SQLCODE);

Line 1298: DSQL_rows_processed := dbms_sql.execute(DSQL_c4);

1294: end;
1295: end loop;
1296:
1297: begin
1298: DSQL_rows_processed := dbms_sql.execute(DSQL_c4);
1299: exception
1300: when others then
1301: err_text:= substr('validate_item_header DSQL 4.2'|| SQLERRM , 1 , 240);
1302: return(SQLCODE);

Line 1308: if dbms_sql.fetch_rows(DSQL_c4) > 0 then

1304:
1305: ext_flag := 0;
1306: --Bug 8520379, see description above
1307: /*
1308: if dbms_sql.fetch_rows(DSQL_c4) > 0 then
1309: dbms_sql.column_value(DSQL_c4,1,DSQL_count_star);
1310: ext_flag := DSQL_count_star;
1311:
1312: else

Line 1309: dbms_sql.column_value(DSQL_c4,1,DSQL_count_star);

1305: ext_flag := 0;
1306: --Bug 8520379, see description above
1307: /*
1308: if dbms_sql.fetch_rows(DSQL_c4) > 0 then
1309: dbms_sql.column_value(DSQL_c4,1,DSQL_count_star);
1310: ext_flag := DSQL_count_star;
1311:
1312: else
1313: dbms_sql.close_cursor(DSQL_c4);

Line 1313: dbms_sql.close_cursor(DSQL_c4);

1309: dbms_sql.column_value(DSQL_c4,1,DSQL_count_star);
1310: ext_flag := DSQL_count_star;
1311:
1312: else
1313: dbms_sql.close_cursor(DSQL_c4);
1314: end if;
1315: */
1316: if dbms_sql.fetch_rows(DSQL_c4) > 0 then
1317: if dbms_sql.fetch_rows(DSQL_c4) > 0 then

Line 1316: if dbms_sql.fetch_rows(DSQL_c4) > 0 then

1312: else
1313: dbms_sql.close_cursor(DSQL_c4);
1314: end if;
1315: */
1316: if dbms_sql.fetch_rows(DSQL_c4) > 0 then
1317: if dbms_sql.fetch_rows(DSQL_c4) > 0 then
1318: ext_flag := 2;
1319: end if;
1320: end if;

Line 1317: if dbms_sql.fetch_rows(DSQL_c4) > 0 then

1313: dbms_sql.close_cursor(DSQL_c4);
1314: end if;
1315: */
1316: if dbms_sql.fetch_rows(DSQL_c4) > 0 then
1317: if dbms_sql.fetch_rows(DSQL_c4) > 0 then
1318: ext_flag := 2;
1319: end if;
1320: end if;
1321:

Line 1322: if dbms_sql.is_open(DSQL_c4) then

1318: ext_flag := 2;
1319: end if;
1320: end if;
1321:
1322: if dbms_sql.is_open(DSQL_c4) then
1323: dbms_sql.close_cursor(DSQL_c4);
1324: end if;
1325:
1326: EXCEPTION

Line 1323: dbms_sql.close_cursor(DSQL_c4);

1319: end if;
1320: end if;
1321:
1322: if dbms_sql.is_open(DSQL_c4) then
1323: dbms_sql.close_cursor(DSQL_c4);
1324: end if;
1325:
1326: EXCEPTION
1327: WHEN OTHERS THEN

Line 1328: if dbms_sql.is_open(DSQL_c4) then

1324: end if;
1325:
1326: EXCEPTION
1327: WHEN OTHERS THEN
1328: if dbms_sql.is_open(DSQL_c4) then
1329: dbms_sql.close_cursor(DSQL_c4);
1330: dbms_sql.close_cursor(DSQL_c4);
1331: end if;
1332: err_text:= substr('validate_item_header DSQL STMT4'|| SQLERRM , 1,240);

Line 1329: dbms_sql.close_cursor(DSQL_c4);

1325:
1326: EXCEPTION
1327: WHEN OTHERS THEN
1328: if dbms_sql.is_open(DSQL_c4) then
1329: dbms_sql.close_cursor(DSQL_c4);
1330: dbms_sql.close_cursor(DSQL_c4);
1331: end if;
1332: err_text:= substr('validate_item_header DSQL STMT4'|| SQLERRM , 1,240);
1333: return(SQLCODE);

Line 1330: dbms_sql.close_cursor(DSQL_c4);

1326: EXCEPTION
1327: WHEN OTHERS THEN
1328: if dbms_sql.is_open(DSQL_c4) then
1329: dbms_sql.close_cursor(DSQL_c4);
1330: dbms_sql.close_cursor(DSQL_c4);
1331: end if;
1332: err_text:= substr('validate_item_header DSQL STMT4'|| SQLERRM , 1,240);
1333: return(SQLCODE);
1334: