DBA Data[Home] [Help]

APPS.CSM_ACC_PKG dependencies on DBMS_SQL

Line 360: l_tab_mobile_user_id dbms_sql.Number_Table;

356: IS
357: l_stmt VARCHAR2(4000);
358: l_cursor INTEGER;
359: l_count INTEGER;
360: l_tab_mobile_user_id dbms_sql.Number_Table;
361: l_tab_access_id dbms_sql.Number_Table;
362: l_pk1_value VARCHAR2(4000);
363: l_pk2_value VARCHAR2(4000);
364: l_pk3_value VARCHAR2(4000);

Line 361: l_tab_access_id dbms_sql.Number_Table;

357: l_stmt VARCHAR2(4000);
358: l_cursor INTEGER;
359: l_count INTEGER;
360: l_tab_mobile_user_id dbms_sql.Number_Table;
361: l_tab_access_id dbms_sql.Number_Table;
362: l_pk1_value VARCHAR2(4000);
363: l_pk2_value VARCHAR2(4000);
364: l_pk3_value VARCHAR2(4000);
365: l_pk1_string VARCHAR2(4000);

Line 413: l_cursor := dbms_sql.open_cursor;

409: l_stmt := l_stmt ||' AND ' || p_pk3_name || ' = ' || l_pk3_string;
410: END IF;
411: END IF;
412:
413: l_cursor := dbms_sql.open_cursor;
414:
415: /*** was user_id provided? ***/
416: IF p_user_id IS NOT NULL THEN
417: /*** yes -> add p_operator filter on mobile_user_id to WHERE clause ***/

Line 419: dbms_sql.parse( l_cursor, l_stmt, dbms_sql.v7);

415: /*** was user_id provided? ***/
416: IF p_user_id IS NOT NULL THEN
417: /*** yes -> add p_operator filter on mobile_user_id to WHERE clause ***/
418: l_stmt := l_stmt || ' AND USER_ID ' || p_operator || ' :P4 ';
419: dbms_sql.parse( l_cursor, l_stmt, dbms_sql.v7);
420: dbms_sql.bind_variable( l_cursor, 'P4', p_user_id );
421: ELSE
422: /*** no -> delete all ACC records ***/
423: dbms_sql.parse( l_cursor, l_stmt, dbms_sql.v7);

Line 420: dbms_sql.bind_variable( l_cursor, 'P4', p_user_id );

416: IF p_user_id IS NOT NULL THEN
417: /*** yes -> add p_operator filter on mobile_user_id to WHERE clause ***/
418: l_stmt := l_stmt || ' AND USER_ID ' || p_operator || ' :P4 ';
419: dbms_sql.parse( l_cursor, l_stmt, dbms_sql.v7);
420: dbms_sql.bind_variable( l_cursor, 'P4', p_user_id );
421: ELSE
422: /*** no -> delete all ACC records ***/
423: dbms_sql.parse( l_cursor, l_stmt, dbms_sql.v7);
424: END IF;

Line 423: dbms_sql.parse( l_cursor, l_stmt, dbms_sql.v7);

419: dbms_sql.parse( l_cursor, l_stmt, dbms_sql.v7);
420: dbms_sql.bind_variable( l_cursor, 'P4', p_user_id );
421: ELSE
422: /*** no -> delete all ACC records ***/
423: dbms_sql.parse( l_cursor, l_stmt, dbms_sql.v7);
424: END IF;
425:
426: dbms_sql.bind_variable( l_cursor, 'P1', l_pk1_value );
427: IF p_pk2_name IS NOT NULL THEN

Line 426: dbms_sql.bind_variable( l_cursor, 'P1', l_pk1_value );

422: /*** no -> delete all ACC records ***/
423: dbms_sql.parse( l_cursor, l_stmt, dbms_sql.v7);
424: END IF;
425:
426: dbms_sql.bind_variable( l_cursor, 'P1', l_pk1_value );
427: IF p_pk2_name IS NOT NULL THEN
428: dbms_sql.bind_variable( l_cursor, 'P2', l_pk2_value );
429: IF p_pk3_name IS NOT NULL THEN
430: dbms_sql.bind_variable( l_cursor, 'P3', l_pk3_value );

Line 428: dbms_sql.bind_variable( l_cursor, 'P2', l_pk2_value );

424: END IF;
425:
426: dbms_sql.bind_variable( l_cursor, 'P1', l_pk1_value );
427: IF p_pk2_name IS NOT NULL THEN
428: dbms_sql.bind_variable( l_cursor, 'P2', l_pk2_value );
429: IF p_pk3_name IS NOT NULL THEN
430: dbms_sql.bind_variable( l_cursor, 'P3', l_pk3_value );
431: END IF;
432: END IF;

Line 430: dbms_sql.bind_variable( l_cursor, 'P3', l_pk3_value );

426: dbms_sql.bind_variable( l_cursor, 'P1', l_pk1_value );
427: IF p_pk2_name IS NOT NULL THEN
428: dbms_sql.bind_variable( l_cursor, 'P2', l_pk2_value );
429: IF p_pk3_name IS NOT NULL THEN
430: dbms_sql.bind_variable( l_cursor, 'P3', l_pk3_value );
431: END IF;
432: END IF;
433:
434: l_index := 1;

Line 435: dbms_sql.define_array( l_cursor, 1, l_tab_mobile_user_id, 10, l_index);

431: END IF;
432: END IF;
433:
434: l_index := 1;
435: dbms_sql.define_array( l_cursor, 1, l_tab_mobile_user_id, 10, l_index);
436: dbms_sql.define_array( l_cursor, 2, l_tab_access_id, 10, l_index);
437:
438:
439: CSM_UTIL_PKG.LOG( 'executing:' || l_stmt || fnd_global.local_chr(10) ||

Line 436: dbms_sql.define_array( l_cursor, 2, l_tab_access_id, 10, l_index);

432: END IF;
433:
434: l_index := 1;
435: dbms_sql.define_array( l_cursor, 1, l_tab_mobile_user_id, 10, l_index);
436: dbms_sql.define_array( l_cursor, 2, l_tab_access_id, 10, l_index);
437:
438:
439: CSM_UTIL_PKG.LOG( 'executing:' || l_stmt || fnd_global.local_chr(10) ||
440: ':P1 = ' || l_pk1_value || fnd_global.local_chr(10) ||

Line 446: l_count := dbms_sql.execute( l_cursor );

442: ':P3 = ' || l_pk3_value || fnd_global.local_chr(10) ||
443: ':P4 = ' || p_user_id, 'CSM_ACC_PKG.DELETE_ACC',FND_LOG.LEVEL_PROCEDURE);
444:
445:
446: l_count := dbms_sql.execute( l_cursor );
447: LOOP
448: l_count := dbms_sql.fetch_rows(l_cursor);
449:
450: dbms_sql.column_value( l_cursor, '1', l_tab_mobile_user_id);

Line 448: l_count := dbms_sql.fetch_rows(l_cursor);

444:
445:
446: l_count := dbms_sql.execute( l_cursor );
447: LOOP
448: l_count := dbms_sql.fetch_rows(l_cursor);
449:
450: dbms_sql.column_value( l_cursor, '1', l_tab_mobile_user_id);
451: dbms_sql.column_value( l_cursor, '2', l_tab_access_id);
452:

Line 450: dbms_sql.column_value( l_cursor, '1', l_tab_mobile_user_id);

446: l_count := dbms_sql.execute( l_cursor );
447: LOOP
448: l_count := dbms_sql.fetch_rows(l_cursor);
449:
450: dbms_sql.column_value( l_cursor, '1', l_tab_mobile_user_id);
451: dbms_sql.column_value( l_cursor, '2', l_tab_access_id);
452:
453: EXIT WHEN l_count <> 10;
454: END LOOP;

Line 451: dbms_sql.column_value( l_cursor, '2', l_tab_access_id);

447: LOOP
448: l_count := dbms_sql.fetch_rows(l_cursor);
449:
450: dbms_sql.column_value( l_cursor, '1', l_tab_mobile_user_id);
451: dbms_sql.column_value( l_cursor, '2', l_tab_access_id);
452:
453: EXIT WHEN l_count <> 10;
454: END LOOP;
455: dbms_sql.close_cursor( l_cursor );

Line 455: dbms_sql.close_cursor( l_cursor );

451: dbms_sql.column_value( l_cursor, '2', l_tab_access_id);
452:
453: EXIT WHEN l_count <> 10;
454: END LOOP;
455: dbms_sql.close_cursor( l_cursor );
456:
457: /*** were any records deleted? ***/
458: IF l_tab_mobile_user_id.COUNT > 0 THEN
459: /*** yes -> loop over arrays containing mobile_user_id and access_id and notify oLite ***/

Line 538: dbms_sql.close_cursor( l_cursor );

534: END IF;
535:
536: EXCEPTION WHEN OTHERS THEN
537: IF l_cursor <> 0 THEN
538: dbms_sql.close_cursor( l_cursor );
539: END IF;
540: CSM_UTIL_PKG.LOG( 'Exception occurred in CSM_ACC_PKG.DELETE_ACC' || sqlerrm, 'CSM_ACC_PKG.DELETE_ACC',FND_LOG.LEVEL_EXCEPTION);
541: /*** Raise any other error ***/
542: RAISE;