[Home] [Help]
959: message => 'Inserting newly added/modified price factors...'
960: );
961: END IF;
962:
963: insert into PON_LARGE_NEG_PF_VALUES (auction_header_id,price_element_type_id,pricing_basis,
964: supplier_seq_number,value,creation_date,created_by,last_update_date,last_updated_by,last_update_login)
965: select distinct PPE.auction_header_id,PPE.price_element_type_id,PPE.pricing_basis,
966: PBP.sequence,null,sysdate,fnd_global.user_id,sysdate,fnd_global.user_id,fnd_global.login_id
967: from
973: PPE.pf_type = 'BUYER' and
974: not exists (
975: select pf_values.price_element_type_id,pf_values.pricing_basis
976: from
977: PON_LARGE_NEG_PF_VALUES pf_values
978: where auction_header_id = p_auction_header_id
979: and PPE.price_element_type_id = pf_values.price_element_type_id
980: and PPE.pricing_basis = pf_values.pricing_basis
981: and rownum = 1);
989: message => 'Removing the deleted/modified price factors...'
990: );
991: END IF;
992:
993: delete from PON_LARGE_NEG_PF_VALUES pf_values
994: where
995: auction_header_id = p_auction_header_id and
996: not exists (
997: select PPE.price_element_type_id,PPE.pricing_basis
1075: );
1076: END IF;
1077:
1078: --Please be CAREFUL here
1079: --In auto create the rows in PON_LARGE_NEG_PF_VALUES will get inserted by
1080: --SYNC_PF_VALUES_ITEM_PRICES (via the beforeCommit of AuctionItemPricesAllVO
1081: --So check here if the rows for this supplier sequence number exist. If yes,
1082: --then return with Success. We can be sure that if a single record for the
1083: --supplier exists, then all the distinct price factor and pricing basis
1084: --combinations exist for that supplier
1085: BEGIN
1086: SELECT 'Y'
1087: INTO l_supplier_exists
1088: FROM pon_large_neg_pf_values
1089: WHERE auction_header_id = p_auction_header_id and supplier_seq_number = p_supplier_seq_num and rownum = 1;
1090: EXCEPTION
1091: when NO_DATA_FOUND then
1092: l_supplier_exists := 'N';
1097: RETURN;
1098: END IF;
1099:
1100: BEGIN
1101: select supplier_seq_number into l_supplier_seq_num from PON_LARGE_NEG_PF_VALUES
1102: where auction_header_id = p_auction_header_id
1103: and rownum = 1;
1104: EXCEPTION
1105: when NO_DATA_FOUND then
1110:
1111: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
1112: FND_LOG.string (log_level => FND_LOG.level_statement,
1113: module => g_module_prefix || l_module_name,
1114: message => 'adding the price factors with the help of PON_LARGE_NEG_PF_VALUES table'
1115: );
1116: END IF;
1117:
1118: insert into PON_LARGE_NEG_PF_VALUES (auction_header_id,price_element_type_id,pricing_basis,
1114: message => 'adding the price factors with the help of PON_LARGE_NEG_PF_VALUES table'
1115: );
1116: END IF;
1117:
1118: insert into PON_LARGE_NEG_PF_VALUES (auction_header_id,price_element_type_id,pricing_basis,
1119: supplier_seq_number,value,creation_date,created_by,last_update_date,last_updated_by,last_update_login)
1120: select auction_header_id,price_element_type_id,pricing_basis,
1121: p_supplier_seq_num,null,sysdate,fnd_global.user_id,sysdate,fnd_global.user_id,fnd_global.login_id
1122: from
1119: supplier_seq_number,value,creation_date,created_by,last_update_date,last_updated_by,last_update_login)
1120: select auction_header_id,price_element_type_id,pricing_basis,
1121: p_supplier_seq_num,null,sysdate,fnd_global.user_id,sysdate,fnd_global.user_id,fnd_global.login_id
1122: from
1123: PON_LARGE_NEG_PF_VALUES
1124: where
1125: auction_header_id = p_auction_header_id and
1126: supplier_seq_number = l_supplier_seq_num;
1127: elsif l_supplier_seq_num is null then
1132: message => 'adding the price factors with the help of PON_PRICE_ELEMENTS'
1133: );
1134: END IF;
1135:
1136: insert into PON_LARGE_NEG_PF_VALUES (auction_header_id,price_element_type_id,pricing_basis,
1137: supplier_seq_number,value,creation_date,created_by,last_update_date,last_updated_by,last_update_login)
1138: select distinct auction_header_id,price_element_type_id,pricing_basis,
1139: p_supplier_seq_num,null,sysdate,fnd_global.user_id,sysdate,fnd_global.user_id,fnd_global.login_id
1140: from
1159: message => 'deleting price factors for the deleted supplier with sequence number: '||p_supplier_seq_num
1160: );
1161: END IF;
1162:
1163: delete from PON_LARGE_NEG_PF_VALUES
1164: where
1165: auction_header_id = p_auction_header_id AND
1166: supplier_seq_number = p_supplier_seq_num;
1167: end if;
1708: END LOOP;
1709:
1710: END IF;
1711:
1712: -- Call delete from pon_large_neg_pf_values only if this is
1713: -- a large negotiation
1714: IF (l_large_neg_enabled_flag = 'Y') THEN
1715:
1716: -- Delete the large neg pf values
1714: IF (l_large_neg_enabled_flag = 'Y') THEN
1715:
1716: -- Delete the large neg pf values
1717: DELETE FROM
1718: pon_large_neg_pf_values
1719: WHERE
1720: auction_header_id = p_auction_header_id;
1721:
1722: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN