[Home] [Help]
418: null, null,
419: null, null,
420: sysdate, 5, sysdate, 5,
421: 'N'
422: from dual
423: where not exists (select 'Already exists'
424: from ad_appl_tops t
425: where t.name = 'GLOBAL'
426: and t.appl_top_type ='G'
458: sysdate, sysdate,
459: l_snapshot_type, 'Created from Current View Snapshots',
460: 'N',
461: sysdate, 5, 5, sysdate
462: from dual
463: where not exists (select 'Already exists'
464: from ad_snapshots
465: where appl_top_id = p_global_appl_top_id
466: and snapshot_type = l_snapshot_type
1700: /* Debugging code. Helps in validating the built SQL, as well as in
1701: sizing the vars appropriately.
1702:
1703: if G_DEBUG then
1704: put_line('@@INDIVIDUAL VC2 VARS:');
1705: put_line('l_ins_stmt1 (len='||to_char(length(l_ins_stmt1))||'): ');
1706: put_line(l_ins_stmt1);
1707: put_line('l_ins_stmt1_contd (len='||
1708: to_char(length(l_ins_stmt1_contd))||'): ');
2403: if l_curr_vw_snapshot_id = -1 then
2404:
2405: -- create new CV through pressed.
2406:
2407: select ad_snapshots_s.nextval into l_curr_vw_snapshot_id from dual;
2408:
2409: insert into ad_snapshots
2410: (
2411: snapshot_id,
2421: 'CURRENT_VIEW', 'Current View',
2422: sysdate, sysdate,
2423: l_snapshot_type, 'N',
2424: sysdate, sysdate, 5, 5
2425: from dual;
2426:
2427:
2428: -- select
2429: -- nvl(at1.server_type_admin_flag, 'N'), nvl(at1.server_type_forms_flag, 'N'),
2557: end if;
2558:
2559: p_return_code := G_INSTANTIATED_SNAPSHOT; -- Instantiated Snapshot
2560:
2561: select ad_snapshots_s.nextval into l_curr_vw_snapshot_id from dual;
2562:
2563: insert into ad_snapshots
2564: (
2565: snapshot_id,
2575: 'CURRENT_VIEW', 'Current View',
2576: sysdate, sysdate,
2577: l_snapshot_type, 'N',
2578: sysdate, sysdate, 5, 5
2579: from dual;
2580:
2581: else
2582:
2583: update ad_snapshots