The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT item_id
FROM ic_item_mst
WHERE item_no = v_item_no;
| and delete_valueset for R11 changes |
+========================================================================+ */
PROCEDURE create_val_sets IS
BEGIN
FND_FLEX_VAL_API.SET_SESSION_MODE('customer_data');
/* delete valuesets if they exist */
IF fnd_flex_val_api.valueset_exists('CPG_CO_CODE') THEN
fnd_flex_val_api.delete_valueset('CPG_CO_CODE');
fnd_flex_val_api.delete_valueset('CPG_QC_GRADE');
fnd_flex_val_api.delete_valueset('CPG_BASE_UOM');
fnd_flex_val_api.delete_valueset('CPG_SEC_UOM');
fnd_flex_val_api.delete_valueset('CPG_PO_NO');
fnd_flex_val_api.delete_valueset('CPG_PO_QTY');
where_order_by => 'Where co_code in (select co_code from gl_plcy_mst where org_id=:$PROFILES$.ORG_ID) Order by ORGN_CODE');
| delete_segments |
| |
| DESCRIPTION |
| This procedure is called from the script to set up flexfields. |
| |
| This procedure deletes the new descriptive flexfield segments, in |
| order to create new ones. |
| |
| MODIFICATION HISTORY |
| 23-SEP-97 Kristie Chen Created. |
| 17-NOV-98 Tony Ricci removed application parameter (was 1st) for |
| R11 changes to fnd_flex_dsc_api.delete_segment |
+========================================================================+
*/
procedure delete_segments IS
BEGIN
fnd_flex_dsc_api.set_session_mode('customer_data');
fnd_flex_dsc_api.delete_segment('PO', 'PO_HEADERS', 'Global Data Elements', 'GEMMS Organization');
fnd_flex_dsc_api.delete_segment('PO', 'PO_LINES', 'Global Data Elements', 'QC Grade');
fnd_flex_dsc_api.delete_segment('PO', 'PO_LINES', 'Global Data Elements', 'Base UOM');
fnd_flex_dsc_api.delete_segment('PO', 'PO_LINES', 'Global Data Elements', 'Base Qty');
fnd_flex_dsc_api.delete_segment('PO', 'PO_LINES', 'Global Data Elements', 'Secondary UOM');
fnd_flex_dsc_api.delete_segment('PO', 'PO_LINES', 'Global Data Elements', 'Secondary Qty');
end delete_segments;
default_value => 'select qc_grade from gms_item_mst where item_no=decode(:system.current_block, ''PO_LINES'', :po_lines.item_number, null)',
required => 'N',
security_enabled => 'N',
display_size => 8,
description_size => 8,
concatenated_description_size => 8,
list_of_values_prompt => 'QC Grade',
window_prompt => 'QC Grade',
range => NULL,
srw_parameter => NULL);
default_value => 'select item_um from gms_item_mst where item_no=decode(:system.current_block, ''PO_LINES'', :po_lines.item_number, null)',
required => 'N',
security_enabled => 'N',
display_size => 8,
description_size => 8,
concatenated_description_size => 8,
list_of_values_prompt => 'Base UOM',
window_prompt => 'Base UOM',
range => NULL,
srw_parameter => NULL);
default_value => 'select gml_po_create_flexfields.compute_duom_qty(decode(:system.current_block, ''PO_LINES'', :po_lines.item_number, null),
decode(:system.current_block, ''PO_LINES'', :po_lines.unit_meas_lookup_code, null) ,
decode(:system.current_block, ''PO_LINES'', :po_lines.quantity, null), :$FLEX$.CPG_BASE_UOM) from dual',
required => 'N',
security_enabled => 'N',
display_size => 8,
description_size => 8,
concatenated_description_size => 8,
list_of_values_prompt => 'Base Qty',
window_prompt => 'Base Qty',
range => NULL,
srw_parameter => NULL);
default_value => 'select item_um2 from gms_item_mst where item_no=decode(:system.current_block, ''PO_LINES'', :po_lines.item_number, null)',
required => 'N',
security_enabled => 'N',
display_size => 8,
description_size => 8,
concatenated_description_size => 8,
list_of_values_prompt => 'Secondary UOM',
window_prompt => 'Secondary UOM',
range => NULL,
srw_parameter => NULL);
default_value => 'select gml_po_create_flexfields.compute_duom_qty(decode(:system.current_block, ''PO_LINES'', :po_lines.item_number, null),:po_lines.unit_meas_lookup_code,
decode(:system.current_block, ''PO_LINES'', :po_lines.quantity, null), :$FLEX$.CPG_SEC_UOM) from dual',
required => 'N',
security_enabled => 'N',
display_size => 8,
description_size => 8,
concatenated_description_size => 8,
list_of_values_prompt => 'Secondary Qty',
window_prompt => 'Secondary Qty',
range => NULL,
srw_parameter => NULL);
SELECT item_um2
FROM ic_item_mst
WHERE item_no = v_item_no;