[Home] [Help]
1464: /* B2989806 Added inline tables and outer joins to select aps_fmeff_id */
1465:
1466: /* NAMIT UOM Change, This should come from source */
1467: um_code_cursor := ' select fnd_profile.VALUE' ||at_apps_link
1468: ||' (''SY$UOM_HOURS'') from dual ' ; /* OPM UOM */
1469:
1470: OPEN um_code_ref FOR um_code_cursor ;
1471: FETCH um_code_ref INTO l_gmp_um_code;
1472: CLOSE um_code_ref;
2696: uom_conv_cursor :=
2697: 'SELECT '
2698: ||' GMICUOM.uom_conversion'||at_apps_link
2699: ||' (:pitem, 0, :pqty, :pfrom_um, :pto_um, 0) '
2700: ||'FROM dual';
2701: v_matl_qty := -1;
2702: OPEN c_uom_conv FOR uom_conv_cursor USING
2703: formula_detail_tab(j).opm_item_id,
2704: formula_detail_tab(j).primary_qty,
6366: BEGIN
6367: cur_time := NULL ;
6368:
6369: SELECT to_char(sysdate,'DD-MON-RRRR HH24:MI:SS')
6370: INTO cur_time FROM sys.dual ;
6371:
6372: log_message(cur_time);
6373: EXCEPTION
6374: WHEN OTHERS THEN
7132: Zero_tran := NULL ;
7133: fact_tran := NULL ;
7134: rsrc_setup := NULL ;
7135: um_code_cursor := ' select fnd_profile.VALUE' ||at_apps_link
7136: ||' (''BOM:HOUR_UOM_CODE'') from dual ' ;
7137:
7138: OPEN um_code_ref FOR um_code_cursor ;
7139: FETCH um_code_ref INTO l_profile;
7140: CLOSE um_code_ref;
8110: END IF;
8111:
8112: /* NAMIT UOM Change, This should come from source */
8113: um_code_cursor := ' select fnd_profile.VALUE' ||pdblink
8114: ||' (''SY$UOM_HOURS'') from dual ' ; /* OPM UOM */
8115:
8116: OPEN um_code_ref FOR um_code_cursor ;
8117: FETCH um_code_ref INTO l_gmp_um_code;
8118: CLOSE um_code_ref;
10192:
10193: SELECT DECODE(porigination_type,1,NULL,porder_no) ,
10194: DECODE(porigination_type,1,porder_no,NULL)
10195: INTO t_order_number, t_wip_entity_name
10196: FROM dual ;
10197:
10198: statement_demands :=
10199: ' INSERT INTO msc_st_demands ( '
10200: ||' organization_id, inventory_item_id, sr_instance_id, '
10421:
10422: /* Bug # 5238790 */
10423: l_profile := 0 ;
10424: ex_code_cursor := ' select NVL(fnd_profile.VALUE' ||pdblink
10425: ||' (''GMP_COLLECT_EXPR_ONHAND''),0) from dual ' ;
10426:
10427: OPEN ex_code_ref FOR ex_code_cursor ;
10428: FETCH ex_code_ref INTO l_profile;
10429: CLOSE ex_code_ref;
10429: CLOSE ex_code_ref;
10430:
10431: /* B5501754 */
10432: mx_code_cursor := ' select to_date(fnd_profile.VALUE' ||pdblink
10433: ||' (''SY$MAX_DATE''),''YYYY/MM/DD'') from dual ' ;
10434:
10435: OPEN mx_code_ref FOR mx_code_cursor ;
10436: FETCH mx_code_ref INTO sy_max_date;
10437: CLOSE mx_code_ref;
10810: pdoc_type := 'XFER';
10811: /* Bug # 5238790 */
10812: l_profile := 0 ;
10813: ex_code_cursor := ' select NVL(fnd_profile.VALUE' ||pdblink
10814: ||' (''GMP_COLLECT_EXPR_ONHAND''),0) from dual ' ;
10815:
10816: OPEN ex_code_ref FOR ex_code_cursor ;
10817: FETCH ex_code_ref INTO l_profile;
10818: CLOSE ex_code_ref;
10913:
10914: /* Bug # 5238790 */
10915: l_profile := 0 ;
10916: ex_code_cursor := ' select NVL(fnd_profile.VALUE' ||pdblink
10917: ||' (''GMP_COLLECT_EXPR_ONHAND''),0) from dual ' ;
10918:
10919: OPEN ex_code_ref FOR ex_code_cursor ;
10920: FETCH ex_code_ref INTO l_profile;
10921: CLOSE ex_code_ref;
11315:
11316: /* Bug # 5238790 */
11317: l_profile := 0 ;
11318: ex_code_cursor := ' select NVL(fnd_profile.VALUE' ||pdblink
11319: ||' (''GMP_COLLECT_EXPR_ONHAND''),0) from dual ' ;
11320:
11321: OPEN ex_code_ref FOR ex_code_cursor ;
11322: FETCH ex_code_ref INTO l_profile;
11323: CLOSE ex_code_ref;
11706: l_profile := NULL ;
11707:
11708: /* This profile value holds the Defualt Location */
11709: ic_code_cursor := ' select fnd_profile.VALUE' ||pdblink
11710: ||' (''IC$DEFAULT_LOCT'') from dual ' ;
11711:
11712: OPEN ic_code_ref FOR ic_code_cursor ;
11713: FETCH ic_code_ref INTO l_profile;
11714: CLOSE ic_code_ref;
11713: FETCH ic_code_ref INTO l_profile;
11714: CLOSE ic_code_ref;
11715:
11716: bs_code_cursor := ' select fnd_profile.VALUE' ||pdblink
11717: ||' (''BIS_PRIMARY_RATE_TYPE'') from dual ' ;
11718:
11719: OPEN bs_code_ref FOR bs_code_cursor ;
11720: FETCH bs_code_ref INTO b_profile;
11721: CLOSE bs_code_ref;
14561: || ' from_time, '
14562: || ' to_time ';
14563:
14564: /* The cursor is opened and the values are stored in a PL/SQL table
14565: for further processing If Pl/SQL Tbl new_rec has any residual rows,
14566: we Need to clean before populating the New Table - 12/17/99 */
14567:
14568: IF new_rec.COUNT > 0 THEN
14569: new_rec.delete;
14827: period_char := TO_CHAR(new_rec(old_period).cal_date,'MON-YYYY');
14828: weekly_seq := 0;
14829: period_seq := 0;
14830:
14831: SELECT to_char(new_rec(old_weekly).cal_date,'D') INTO week_num FROM dual;
14832: week_num := (week_num - 7) * -1;
14833: week_end := new_rec(old_weekly).cal_date + week_num;
14834:
14835: /*
14968: 2,
14969: p_INSTANCE_ID) ;
14970:
14971: week_num := 0;
14972: SELECT TO_CHAR(new_rec(j).cal_date,'D') INTO week_num FROM dual;
14973: week_num := (week_num - 7) * -1;
14974: prior_weekly := old_weekly;
14975: old_weekly := j;
14976: week_end := new_rec(old_weekly).cal_date + week_num;
16360:
16361: l_opm_org := plsqltbl_rec(k).organization_id ;
16362:
16363: IF MSC_CL_GMP_UTILITY.g_in_str_org IS NOT NULL THEN
16364: l_stmt := 'SELECT 1 FROM dual WHERE '||
16365: l_opm_org||MSC_CL_GMP_UTILITY.g_in_str_org ;
16366: OPEN l_cur for l_stmt ;
16367: FETCH l_cur INTO l_org_specific ;
16368: IF l_cur%NOTFOUND THEN
18060: org_str := NULL ;
18061: in_position := -10 ;
18062:
18063: SELECT MSC_CL_GMP_UTILITY.is_aps_compatible
18064: INTO l_aps_compatible FROM DUAL ;
18065:
18066: IF l_aps_compatible = 1 THEN
18067:
18068: /*sql_stmt := 'SELECT MSC_CL_PULL.get_org_str(' || instance_id || ') FROM dual ' ;
18064: INTO l_aps_compatible FROM DUAL ;
18065:
18066: IF l_aps_compatible = 1 THEN
18067:
18068: /*sql_stmt := 'SELECT MSC_CL_PULL.get_org_str(' || instance_id || ') FROM dual ' ;
18069: OPEN c_str FOR sql_stmt ;
18070: FETCH c_str INTO org_str ;
18071: log_message(' String From APS : ' || org_str);
18072: CLOSE c_str ;*/