400: | |
401: | SCOPE - PRIVATE |
402: | |
403: | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
404: | dbms_sql.open_cursor |
405: | dbms_sql.close_cursor |
406: | dbms_sql.parse |
407: | dbms_sql.execute_and_fetch |
408: | arp_util.debug |
401: | SCOPE - PRIVATE |
402: | |
403: | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
404: | dbms_sql.open_cursor |
405: | dbms_sql.close_cursor |
406: | dbms_sql.parse |
407: | dbms_sql.execute_and_fetch |
408: | arp_util.debug |
409: | |
402: | |
403: | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
404: | dbms_sql.open_cursor |
405: | dbms_sql.close_cursor |
406: | dbms_sql.parse |
407: | dbms_sql.execute_and_fetch |
408: | arp_util.debug |
409: | |
410: | ARGUMENTS : IN: |
403: | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
404: | dbms_sql.open_cursor |
405: | dbms_sql.close_cursor |
406: | dbms_sql.parse |
407: | dbms_sql.execute_and_fetch |
408: | arp_util.debug |
409: | |
410: | ARGUMENTS : IN: |
411: | p_cursor |
442: BEGIN
443:
444: arp_util.debug('arp_trans_flex.check_uniqueness()+');
445:
446: dbms_sql.define_column( p_cursor, 1, l_customer_trx_id);
447: dbms_sql.define_column( p_cursor, 2, l_customer_trx_line_id);
448:
449: l_dummy := dbms_sql.execute(p_cursor);
450: l_rows := dbms_sql.fetch_rows(p_cursor);
443:
444: arp_util.debug('arp_trans_flex.check_uniqueness()+');
445:
446: dbms_sql.define_column( p_cursor, 1, l_customer_trx_id);
447: dbms_sql.define_column( p_cursor, 2, l_customer_trx_line_id);
448:
449: l_dummy := dbms_sql.execute(p_cursor);
450: l_rows := dbms_sql.fetch_rows(p_cursor);
451:
445:
446: dbms_sql.define_column( p_cursor, 1, l_customer_trx_id);
447: dbms_sql.define_column( p_cursor, 2, l_customer_trx_line_id);
448:
449: l_dummy := dbms_sql.execute(p_cursor);
450: l_rows := dbms_sql.fetch_rows(p_cursor);
451:
452:
453: /*-------------------------------------------------------------+
446: dbms_sql.define_column( p_cursor, 1, l_customer_trx_id);
447: dbms_sql.define_column( p_cursor, 2, l_customer_trx_line_id);
448:
449: l_dummy := dbms_sql.execute(p_cursor);
450: l_rows := dbms_sql.fetch_rows(p_cursor);
451:
452:
453: /*-------------------------------------------------------------+
454: | If any matching rows are found then the flex is non-unique, |
456: +-------------------------------------------------------------*/
457:
458: IF (l_rows > 0)
459: THEN
460: dbms_sql.column_value( p_cursor, 1, l_customer_trx_id);
461: dbms_sql.column_value( p_cursor, 2, l_customer_trx_line_id);
462: p_customer_trx_id := l_customer_trx_id;
463: p_customer_trx_line_id := l_customer_trx_line_id;
464:
457:
458: IF (l_rows > 0)
459: THEN
460: dbms_sql.column_value( p_cursor, 1, l_customer_trx_id);
461: dbms_sql.column_value( p_cursor, 2, l_customer_trx_line_id);
462: p_customer_trx_id := l_customer_trx_id;
463: p_customer_trx_line_id := l_customer_trx_line_id;
464:
465: arp_util.debug('arp_trans_flex.check_uniqueness()-');
474: arp_util.debug('EXCEPTION : arp_trans_flex.check_uniqueness()');
475: arp_util.debug('p_cursor : '|| p_cursor);
476:
477: IF (p_cursor IS NOT NULL)
478: THEN dbms_sql.close_cursor(p_cursor);
479: END IF;
480:
481: RAISE;
482: END;
589: /*---------------------------------------------------+
590: | Open, Parse and Execute the constructed SQL stmt |
591: +---------------------------------------------------*/
592:
593: l_cursor := dbms_sql.open_cursor;
594: dbms_sql.parse(l_cursor, l_stmt, dbms_sql.v7);
595:
596: IF (p_table_name = 'RA_CUSTOMER_TRX_LINES')
597: THEN pg_ctl_cursors( p_context_index ) := l_cursor;
590: | Open, Parse and Execute the constructed SQL stmt |
591: +---------------------------------------------------*/
592:
593: l_cursor := dbms_sql.open_cursor;
594: dbms_sql.parse(l_cursor, l_stmt, dbms_sql.v7);
595:
596: IF (p_table_name = 'RA_CUSTOMER_TRX_LINES')
597: THEN pg_ctl_cursors( p_context_index ) := l_cursor;
598: ELSE pg_ril_cursors( p_context_index ) := l_cursor;
651: BEGIN
652:
653: arp_util.debug('arp_trans_flex.Bind_Variables()+');
654:
655: dbms_sql.bind_variable( p_cursor,
656: p_bind_variable,
657: p_value );
658:
659: arp_util.debug('arp_trans_flex.Bind_Variables()-');