[Home] [Help]
398: l_message_name VARCHAR2(30):= NULL;
399: l_msg_text fnd_new_messages.message_text%TYPE;
400: l_source_subinv_error BOOLEAN := FALSE; -- Bug 4489727
401: l_source_restrict_sub number; -- Bug 4489727
402: l_inv_debug_level NUMBER := INVPUTLI.get_debug_level; --Bug: 4667452
403: l_prev_org_id NUMBER := -1; -- Bug: 4654433
404:
405: begin
406:
436: */
437: -- Validate first group of foreign keys
438:
439: IF l_inv_debug_level IN(101, 102) THEN
440: INVPUTLI.info('INVPVDR5: Validating foreign keys set 1');
441: END IF;
442:
443:
444: stmt := 11;
493: if cr.costing_enabled_flag = 'N' AND -- Bug 14614669
494: (cr.purchasing_item_flag = 'N' AND
495: cr.purchasing_enabled_flag = 'N') then
496:
497: INVPUTLI.info('Do not do the Cost of Sales Account checking for the item which is not costed or purchased');
498:
499: elsif cr.COST_OF_SALES_ACCOUNT is not null then
500: begin
501: select 'x' into temp
536: if cr.costing_enabled_flag = 'N' AND -- Bug 14614669
537: (cr.purchasing_item_flag = 'N' AND
538: cr.purchasing_enabled_flag = 'N') then
539:
540: INVPUTLI.info('Do not do the Sales Account checking for the item which is not costed or purchased');
541:
542: elsif cr.SALES_ACCOUNT is not null then
543: begin
544: select 'x' into temp
580: if cr.costing_enabled_flag = 'N' AND -- Bug 14614669
581: (cr.purchasing_item_flag = 'N' AND
582: cr.purchasing_enabled_flag = 'N') then
583:
584: INVPUTLI.info('Do not do the Expense Account checking for the item which is not costed or purchased');
585:
586: elsif cr.EXPENSE_ACCOUNT is not null then
587: begin
588: select 'x' into temp
1138: end;
1139: end if; */
1140:
1141: IF l_inv_debug_level IN(101, 102) THEN
1142: INVPUTLI.info('INVPVDR5: Validating foreign keys set 2');
1143: END IF;
1144:
1145: stmt := 21;
1146: -- validate foreign keys