[Home] [Help]
579:
580: if (p_retropay_method = 1 AND l_rule_found = 'N') then /* Replacement Method */
581: insert into pay_legislation_rules(legislation_code,rule_type,rule_mode) values ('NL','RETRO_COMP_DFLT_OVERRIDE','Y');
582: fnd_file.put_line(FND_FILE.LOG,'Legislation Rule Added,Retropay method is now REPLACEMENT');
583: else /*Standard Method*/
584: IF (p_retropay_method = 0 AND l_rule_found = 'Y') then
585: delete from pay_legislation_rules
586: where legislation_code='NL'
587: and rule_type='RETRO_COMP_DFLT_OVERRIDE';
584: IF (p_retropay_method = 0 AND l_rule_found = 'Y') then
585: delete from pay_legislation_rules
586: where legislation_code='NL'
587: and rule_type='RETRO_COMP_DFLT_OVERRIDE';
588: fnd_file.put_line(FND_FILE.LOG,'Legislation Rule Removed,Retropay method is now STANDARD');
589: END if;
590: end if;
591: fnd_file.put_line(FND_FILE.LOG,'Leaving Procedure pay_nl_general.insert_leg_rule');
592: END insert_leg_rule;
611: is
612: SELECT prd.retro_definition_id
613: FROM pay_retro_definitions prd
614: WHERE prd.legislation_code = 'NL'
615: AND prd.definition_name='Standard Retropay';
616:
617: CURSOR c_rep_retro_definition
618: is
619: SELECT prd.retro_definition_id
665: Open c_retro_method(p_business_group_id);
666: Fetch c_retro_method into l_retro_method;
667: Close c_retro_method;
668:
669: IF l_retro_method='Y' THEN /* override replacement method, use standard retro definition*/
670: RETURN l_std_retro_definition_id;
671: else
672: RETURN l_rep_retro_definition_id;
673: END if;
786: The routine has been enhanced to loop around to create dbitems
787: for each of the legislations which use the flex_num passed in.
788: NOTES
789: It is intended that this creation procedure be run from the
790: Standard Report Submission (SRS) form.
791: */
792: procedure create_scl_flex_dict
793: (
794: p_id_flex_num in number