SAP ABAP IMG Activity PAY_PT_SGL11 (BAdI: Unique Report - Attachment D)

Hierarchy

☛

SAP_HRCPT (Software Component) Sub component SAP_HRCPT of SAP_HR
⤷

PY-PT (Application Component) Portugal
⤷

PC19 (Package) HR settlement: Portugal

IMG Activity

ID	PAY_PT_SGL11	BAdI: Unique Report - Attachment D
Transaction Code	S_L4H_49001745	(empty)
Created on	20101216
Customizing Attributes	PAY_PT_SGL11	BAdI: Unique Report - Attachment D
Customizing Activity	PAY_PT_SGL11	BAdI: Unique Report - Attachment D

Document

Document Class	SIMG	Hypertext: Object Class - Class to which a document belongs.
Document Name	HR_PT_UNIQUE_RP_SST

Use

This Business Add-In (BAdI) is used in component Payroll - Portugal (PY-PT). This BAdI allows customizings of Attachment D of program Unique Report (RPCUNRP0). The filling in of this BAdI is mandatory to inform the government on activities of safety and health at work.

The Average number of workers and Total number of effective worked hours fields are filled in by the standard system. However, you can use this BAdI to change the filling of these fields.

The BAdI is composed by the following methods:

Fills in data for attachment D of the Unique Report (GET_DATA_ANEXO_SST): this method adds or changes additional data to the Unique Report. This method is called at the end of the END-OF-SELECTION processing block of the program.
Fills in data by employee for attachment D of the UR (Azores) (GET_DATA_ANEXO_SST_EE_AZ): this method reads data by establishment and employee and allows you to change them. The method is called in the GET PERNR processing block of the program and covers only workers from Azores.
Fills in data for attachment D of the UR (Azores) (GET_DATA_ANEXO_SST_AZ): this method adds or changes additional data to the Unique Report. This method is called at the end of the END-OF-SELECTION processing block of the program and it covers only workers from Azores.

Requirements

Standard settings

To get more information on standard settings (filters, individual or multiple use), see the tab Characts. in BAdI Builder (transaction SE18).

Activities

Example

Implementation example of method GET_DATA_ANEXO_SST_EE_AZ:

METHOD cl_hr_pt_unique_rp_sst~get_data_anexo_sst_ee_az.

DATA lt_ee_estabs TYPE pptt_unique_rp_ee_estabs_az.

DATA ls_ee_estabs TYPE ppts_unique_rp_ee_estabs_az.

************************************************************

DATA ls_n_medio_trab TYPE ppts_unique_rp_sst_av_ee_az.

ls_n_medio_trab-vinc_trab_fora_tmp-nmen = '3'.

ls_n_medio_trab-vinc_trab_fora_tmp-nwomen = '4'.

ls_n_medio_trab-vinc_trab_fora_ocas-nmen = '5'.

ls_n_medio_trab-vinc_trab_fora_ocas-nwomen = '6'.

ls_n_medio_trab-vinc_trab_fora_outros-nmen = '7'.

ls_n_medio_trab-vinc_trab_fora_outros-nwomen = '8'.

ls_n_medio_trab-outros_ced-nmen = '9'.

ls_n_medio_trab-outros_ced-nwomen = '10'.

ls_n_medio_trab-outros_ind-nmen = '11'.

ls_n_medio_trab-outros_ind-nwomen = '12'.

ls_n_medio_trab-outros_ocas-nmen = '13'.

ls_n_medio_trab-outros_ocas-nwomen = '14'.

************************************************************

DATA ls_nat_mod TYPE ppts_unique_rp_sst_nat_mod_az.

ls_nat_mod-organi_serv_seg = '1'.

ls_nat_mod-organi_serv_saude = '1'.

ls_nat_mod-n_trab_afect = '2'.

ls_nat_mod-org_no_estab = 'C'.

ls_nat_mod-organi_dom_seg = '1'.

ls_nat_mod-organi_dom_saude = '2'.

ls_nat_mod-compl = '1'.

************************************************************

DATA ls_pes_serv TYPE ppts_unique_rp_sst_pes_ser_az.

DATA lt_medicos TYPE pptt_unique_rp_sst_medicos_az.

DATA ls_medicos TYPE ppts_unique_rp_sst_medicos_az.

DATA lt_tec_shts TYPE pptt_unique_rp_sst_tec_shts.

DATA ls_tec_shts TYPE ppts_unique_rp_sst_tec_shts.

DATA lt_servicos_seg TYPE pptt_unique_rp_sst_ser_seg_az.

DATA ls_servicos_seg TYPE ppts_unique_rp_sst_ser_seg_az.

DATA lt_servicos_sau TYPE pptt_unique_rp_sst_ser_sau_az.

DATA ls_servicos_sau TYPE ppts_unique_rp_sst_ser_sau_az.

ls_pes_serv-n_medicos = '1'.

ls_pes_serv-n_enfer = '2'.

ls_pes_serv-n_tec_sup_sht = '3'.

ls_pes_serv-n_tec_sht = '4'.

ls_pes_serv-outro_pess = '5'.

ls_medicos-nome = 'Physician name'.

ls_medicos-n_cedula = '12345'.

ls_medicos-n_horas_mes = '20'.

ls_medicos-n_minutos_mes = '30'.

APPEND ls_medicos TO lt_medicos.

ls_medicos-n_cedula = '12346'.

APPEND ls_medicos TO lt_medicos.

ls_pes_serv-medicos = lt_medicos.

ls_tec_shts-nome = 'Technical name'.

ls_tec_shts-cap = '4321'.

APPEND ls_tec_shts TO lt_tec_shts.

ls_tec_shts-cap = '4322'.

APPEND ls_tec_shts TO lt_tec_shts.

ls_pes_serv-tec_shts = lt_tec_shts.

ls_pes_serv-nif_segu = '123456789'.

ls_pes_serv-nome_segu = 'safety'.

ls_pes_serv-nif_saude = '123456789'.

ls_pes_serv-nome_saude = 'health'.

ls_pes_serv-nome_empregador = 'employer'.

ls_pes_serv-n_autorizacao = ''. "0123456789

ls_pes_serv-nome_trab_desig = 'worker's name'.

ls_pes_serv-n_aut_trab_desig = ''. "123

ls_pes_serv-nome_repr = 'repres.name'.

ls_servicos_seg-nif = '123456789'.

ls_servicos_seg-denominacao = 'denomination'.

ls_servicos_seg-tipo = '1'.

APPEND ls_servicos_seg TO lt_servicos_seg.

ls_pes_serv-servicos_seg = lt_servicos_seg.

ls_servicos_sau-nif = '123456789'.

ls_servicos_sau-denominacao = 'denomination'.

ls_servicos_sau-tipo = '2'.

APPEND ls_servicos_sau TO lt_servicos_sau.

ls_pes_serv-servicos_sau = lt_servicos_sau.

************************************************************

DATA ls_servicos_sst TYPE ppts_unique_rp_act_ser_sst_az.

ls_servicos_sst-org_prog_prev = '0'.

ls_servicos_sst-org_prom_saude = '0'.

ls_servicos_sst-org_vigil_saude = '0'.

ls_servicos_sst-org_audit = '0'.

ls_servicos_sst-org_insp = '0'.

************************************************************

DATA ls_acoes_inf TYPE ppts_unique_rp_ac_inf_sst_az.

DATA ls_acoes_con TYPE ppts_unique_rp_ac_con_sst_az.

DATA ls_acoes_for TYPE ppts_unique_rp_ac_form_sst_az.

ls_acoes_inf-SITUACAO = '01'.

ls_acoes_inf-N_ACCOES = '1'.

ls_acoes_inf-N_DESTINAT = '1'.

APPEND ls_acoes_inf TO ls_servicos_sst-accoes_inf.

ls_acoes_inf-SITUACAO = '02'.

APPEND ls_acoes_inf TO ls_servicos_sst-accoes_inf.

APPEND ls_acoes_con TO ls_servicos_sst-accoes_con.

APPEND ls_acoes_for TO ls_servicos_sst-accoes_for.

************************************************************

DATA ls_riscos TYPE ppts_unique_rp_sst_riscos_az.

DATA ls_riscos_qui TYPE ppts_unique_rp_sst_risc_qui_az.

APPEND ls_riscos TO ls_servicos_sst-riscos_fisic.

APPEND ls_riscos TO ls_servicos_sst-riscos_bio.

APPEND ls_riscos TO ls_servicos_sst-riscos_mus.

APPEND ls_riscos TO ls_servicos_sst-riscos_psi.

APPEND ls_riscos TO ls_servicos_sst-riscos_sst.

APPEND ls_riscos_qui TO ls_servicos_sst-riscos_quim.

************************************************************

DATA ls_exames TYPE ppts_unique_rp_sst_ex_compl_az.

APPEND ls_exames TO ls_servicos_sst-exames_compl.

************************************************************

`Business Attributes`


                            
                                
                                     ASAP Roadmap ID 
                                         105  
                                         Define functions and processes 
                                    
                                     Mandatory / Optional 
                                         2  
                                         Optional activity 
                                    
                                     Critical / Non-Critical 
                                         2  
                                         Non-critical 
                                    
                                     Country-Dependency 
                                         I  
                                         Valid for countries specified 
                                    
                                
                            
                                                            
                                    
                                         Customizing Attributes 
                                         Country Key 
                                         Country Name 
                                    
                                                                            PAY_PT_SGL11 
                                            PT 
                                            Portugal 
                                        
                                                                    
                            

                            
                             Maintenance Objects 
                            
                                
                                     Maintenance object type 
                                         E  
                                         Business Add-In - Definition 
                                    
                                
                            
                            
                              History 
                            
                                
                                     Last changed by/on      SAP   20101216 
                                     SAP Release Created in

Object Hierarchy

Used by

Advertise Links

Hierarchy

IMG Activity

Document

Use

Requirements

Standard settings

Activities

See also

Example

`Business Attributes`

Maintenance Objects

History

Related Links

Advertise Links

ASAP Roadmap ID	105	Define functions and processes
Mandatory / Optional	2	Optional activity
Critical / Non-Critical	2	Non-critical
Country-Dependency	I	Valid for countries specified