[Home] [Help]
19: V_orgn_id IN NUMBER,V_update_inv_ind IN VARCHAR2,
20: V_plant_id IN NUMBER) IS
21: BEGIN
22: DELETE FROM gmd_material_details_gtmp;
23: DELETE FROM gmd_technical_data_gtmp;
24: IF (V_sprd_id IS NOT NULL) THEN
25: gmd_spread_fetch_pkg.load_spread_details(V_entity_id,V_sprd_id,V_orgn_id);
26: ELSIF (V_batch_id IS NOT NULL AND V_spec_id IS NULL) THEN
27: gmd_spread_fetch_pkg.load_batch_details(V_entity_id,V_batch_id,V_orgn_id,V_update_inv_ind,V_plant_id);
1085: ORDER BY line_type;
1086: BEGIN
1087: /* Inserting the technical parameter data of item and lot to temp tables*/
1088: IF (V_sprd_id IS NOT NULL) THEN
1089: INSERT INTO GMD_TECHNICAL_DATA_GTMP
1090: (ENTITY_ID,LINE_ID,TECH_PARM_NAME,TECH_PARM_ID,
1091: VALUE,SORT_SEQ,NUM_DATA,TEXT_DATA,BOOLEAN_DATA)
1092: SELECT a.sprd_id,c.line_id,a.tech_parm_name,a.tech_parm_id,
1093: DECODE(B.DATA_TYPE,0,TEXT_DATA,2,TEXT_DATA,3,BOOLEAN_DATA,NUM_DATA) VALUE,
1124: ORDER BY line_type;
1125: BEGIN
1126: /* Inserting the technical parameter data of item and lot to temp tables*/
1127: IF (V_batch_id IS NOT NULL) THEN
1128: INSERT INTO GMD_TECHNICAL_DATA_GTMP
1129: (ENTITY_ID,LINE_ID,TECH_PARM_NAME,TECH_PARM_ID,
1130: VALUE,SORT_SEQ,NUM_DATA,TEXT_DATA,BOOLEAN_DATA)
1131: SELECT V_entity_id,c.line_id,a.tech_parm_name, a.tech_parm_id,
1132: DECODE(B.DATA_TYPE,0,TEXT_DATA,2,TEXT_DATA,3,BOOLEAN_DATA,NUM_DATA) VALUE,
1187: ORDER BY line_type;
1188: BEGIN
1189: /* Inserting the technical parameter data of item and lot to temp tables*/
1190: IF (V_formula_id IS NOT NULL) THEN
1191: INSERT INTO GMD_TECHNICAL_DATA_GTMP
1192: (ENTITY_ID,LINE_ID,TECH_PARM_NAME,TECH_PARM_ID,
1193: VALUE,SORT_SEQ,NUM_DATA,TEXT_DATA,BOOLEAN_DATA)
1194: SELECT V_entity_id,c.line_id,a.tech_parm_name,a.tech_parm_id,
1195: DECODE(B.DATA_TYPE,0,TEXT_DATA,2,TEXT_DATA,3,BOOLEAN_DATA,NUM_DATA) VALUE,
1336: boolean_data,last_updated_by,last_update_date,created_by,creation_date)
1337: SELECT X_line_id, V_orgn_id, tech_parm_name,tech_parm_id,
1338: X_sprd_id,sort_seq,num_data,text_data,boolean_data,
1339: l_user_id,sysdate,l_user_id,sysdate
1340: FROM gmd_technical_data_gtmp
1341: WHERE entity_id = V_entity_id
1342: AND line_id = l_rec.line_id;
1343: END LOOP;
1344: EXCEPTION
1358: FUNCTION get_density_value (V_line_id IN NUMBER,
1359: V_density_parameter IN VARCHAR2) RETURN NUMBER IS
1360: CURSOR Cur_density IS
1361: SELECT value
1362: FROM gmd_technical_data_gtmp
1363: WHERE line_id = V_line_id
1364: AND tech_parm_name = V_density_parameter;
1365: l_value NUMBER;
1366: BEGIN
1576: l_inv_val_out_rec_type GMD_QUALITY_GRP.inv_val_out_rec_type;
1577:
1578: CURSOR Cur_get_value(Pline_id NUMBER,Pparm_id NUMBER) IS
1579: SELECT value
1580: FROM gmd_technical_data_gtmp
1581: WHERE line_id = Pline_id
1582: AND tech_parm_id = Pparm_id;
1583:
1584: l_temp VARCHAR2(80);
1619: ELSE
1620: l_char_value := l_value;
1621: l_num_value := NULL;
1622: END IF;
1623: UPDATE gmd_technical_data_gtmp
1624: SET value = l_inv_val_out_rec_type.entity_value,
1625: num_data = l_num_value,
1626: qm_entity_id = l_inv_val_out_rec_type.entity_id,
1627: qm_level = l_inv_val_out_rec_type.level,
1628: text_data = l_char_value
1629: WHERE line_id = V_line_id
1630: AND tech_parm_id = l_qmrec.tech_parm_id;
1631: IF SQL%NOTFOUND THEN
1632: INSERT INTO GMD_TECHNICAL_DATA_GTMP
1633: (ENTITY_ID,LINE_ID,TECH_PARM_NAME,TECH_PARM_ID,VALUE,SORT_SEQ,NUM_DATA,
1634: TEXT_DATA,QM_ENTITY_ID,QM_LEVEL,COMP_IND,MIN_VALUE,MAX_VALUE,SPEC_ID)
1635: VALUES (l_rec.entity_id,V_line_id,l_qmrec.tech_parm_name,l_qmrec.tech_parm_id,l_inv_val_out_rec_type.entity_value,
1636: l_qmrec.sort_seq,l_num_value,l_char_value,
1637: l_inv_val_out_rec_type.entity_id,l_inv_val_out_rec_type.level,l_inv_val_out_rec_type.composite_ind,
1638: l_inv_val_out_rec_type.entity_min_value,l_inv_val_out_rec_type.entity_max_value,l_inv_val_out_rec_type.spec_id);
1639: END IF;
1640: ELSE
1641: UPDATE gmd_technical_data_gtmp
1642: SET value = l_inv_val_out_rec_type.entity_value,
1643: num_data = l_num_value,
1644: qm_entity_id = l_inv_val_out_rec_type.entity_id,
1645: qm_level = l_inv_val_out_rec_type.level,
1678: AND organization_id = P_orgn_id;
1679:
1680: CURSOR cur_get_value (v_tech_parm_id NUMBER) IS
1681: SELECT a.value
1682: FROM gmd_technical_data_gtmp a, gmd_material_details_gtmp c
1683: WHERE a.tech_parm_id = v_tech_parm_id
1684: AND c.parent_line_id = P_parent_detl_id
1685: AND a.line_id = c.line_id
1686: AND c.line_type <> 3;
1690: FROM gmd_material_details_gtmp p
1691: WHERE parent_line_id = P_parent_detl_id
1692: AND line_type = 3
1693: AND NOT EXISTS ( SELECT 1
1694: FROM gmd_technical_data_gtmp g
1695: WHERE p.line_id = g.line_id
1696: AND g.tech_parm_id = v_tech_parm_id);
1697:
1698: /* Local variables */
1712: CLOSE cur_get_value;
1713:
1714: IF (l_value IS NOT NULL) THEN
1715: FOR l_rec IN cur_get_data (l_tech_parm_id) LOOP
1716: INSERT INTO gmd_technical_data_gtmp
1717: (entity_id, line_id, tech_parm_name, tech_parm_id,
1718: Value, sort_seq, num_data, TEXT_DATA, BOOLEAN_DATA)
1719: VALUES
1720: (P_entity_id, l_rec.line_id, l_density, l_tech_parm_id,
1829: ORDER BY line_type;
1830: BEGIN
1831: /* Inserting the technical parameter data of item and lot to temp tables*/
1832: IF (V_entity_id IS NOT NULL) THEN
1833: INSERT INTO GMD_TECHNICAL_DATA_GTMP
1834: (ENTITY_ID,LINE_ID,TECH_PARM_NAME,TECH_PARM_ID,
1835: VALUE,SORT_SEQ,NUM_DATA,TEXT_DATA,BOOLEAN_DATA)
1836: SELECT V_entity_id,c.line_id,b.tech_parm_name,a.tech_parm_id,
1837: DECODE(B.DATA_TYPE,0,TEXT_DATA,2,TEXT_DATA,3,BOOLEAN_DATA,NUM_DATA) VALUE,
1912: plab_id => V_orgn_id);
1913: IF (l_qty > 0 AND l_value > 0) THEN
1914: l_value := (l_value * l_qty);
1915: END IF;
1916: INSERT INTO GMD_TECHNICAL_DATA_GTMP (ENTITY_ID,LINE_ID,TECH_PARM_NAME,
1917: TECH_PARM_ID,VALUE,NUM_DATA,SORT_SEQ)
1918: VALUES (V_entity_id,l_rec.line,l_rec.name,l_rec.tech,l_value,l_value,l_rec.sort_seq);
1919: END IF;
1920: END LOOP;
2096: ORDER BY line_type;
2097:
2098:
2099: BEGIN
2100: DELETE FROM GMD_TECHNICAL_DATA_GTMP
2101: WHERE ENTITY_ID = V_entity_id
2102: AND LINE_ID = V_line_id;
2103:
2104: /* Updating the technical parameter data of item and lot to temp tables*/
2103:
2104: /* Updating the technical parameter data of item and lot to temp tables*/
2105: IF (V_formula_id IS NOT NULL) THEN
2106:
2107: /* INSERT INTO GMD_TECHNICAL_DATA_GTMP
2108: (ENTITY_ID,LINE_ID,TECH_PARM_NAME,TECH_PARM_ID,
2109: VALUE,SORT_SEQ,NUM_DATA,TEXT_DATA,BOOLEAN_DATA)
2110: SELECT V_entity_id,c.line_id,a.tech_parm_name,a.tech_parm_id,
2111: DECODE(B.DATA_TYPE,0,TEXT_DATA,2,TEXT_DATA,3,BOOLEAN_DATA,NUM_DATA) VALUE,
2127: AND e.organization_id = V_orgn_id)))
2128:
2129: AND a.batch_id IS NULL
2130: AND NVL(c.lot_id,-1) = NVL(a.lot_id,-1); */
2131: INSERT INTO GMD_TECHNICAL_DATA_GTMP
2132: (ENTITY_ID,LINE_ID,TECH_PARM_NAME,TECH_PARM_ID,
2133: VALUE,SORT_SEQ,NUM_DATA,TEXT_DATA,BOOLEAN_DATA)
2134: SELECT V_entity_id,c.line_id,a.tech_parm_name,a.tech_parm_id,
2135: DECODE(B.DATA_TYPE,0,TEXT_DATA,2,TEXT_DATA,3,BOOLEAN_DATA,NUM_DATA) VALUE,
2158: P_parent_detl_id => V_formulaline_id,
2159: P_entity_id => V_entity_id);
2160:
2161: ELSE
2162: INSERT INTO GMD_TECHNICAL_DATA_GTMP
2163: (ENTITY_ID,LINE_ID,TECH_PARM_NAME,TECH_PARM_ID,
2164: VALUE,SORT_SEQ,NUM_DATA,TEXT_DATA,BOOLEAN_DATA)
2165: SELECT V_entity_id,V_line_id,a.tech_parm_name,a.tech_parm_id,
2166: DECODE(B.DATA_TYPE,0,TEXT_DATA,2,TEXT_DATA,3,BOOLEAN_DATA,NUM_DATA) VALUE,