cancel
Showing results for 
Search instead for 
Did you mean: 

V_T7XSSPERSUBTY doesnot show read-only check box

Former Member
0 Kudos

Hi,

  The view V_T7XSSPERSUBTY is not showing the check box to make the subtype read only. I want the entire bank details and personnel information screen to be in read only mode. In personnel information i should be able to change the photo, and the rest has to be in read only mode.

Is this possible in customizing, or i have to make use of the BADI HRXSS_PER_SUBTYPE. We are using EHP 5.

Regards

Govind

Accepted Solutions (0)

Answers (3)

Answers (3)

Former Member
0 Kudos

HI GOVIND ,

can u chk once in the table sm30----- V_T7XSSPERSUBTY

or go to ess > service specific settings > own data > reuse country specific applications > Determine Active Subtypes and Make Settings in this u can do settings ...once try this

siddharthrajora
Product and Topic Expert
Product and Topic Expert
0 Kudos
Former Member
0 Kudos

Readonly feature is present from EhP6, its not there in EhP5, so u might have to create a custom conig to make the apps readonly.

former_member182426
Active Contributor
0 Kudos

There is no option available in configuration level in EHP5. It's available from EHP6.

you have to do enhance at application level for making read only personal information.

And if you want to do at subtype level you can create enhancement at Method IF_FPM_GUIBB_FORM~GET_DATA in class CL_HRESS_PER_DETAIL

For example: IT0105 - Communication data making read only based on subtypes.

DATA : ls_pa0105 TYPE pa0105,

      ls_FPMGB_T_FIELDUSAGE TYPE LINE OF FPMGB_T_FIELDUSAGE,
      lv_sytabx
TYPE sy-tabix,
      ls_fpmgb_t_selected_fields
TYPE LINE OF fpmgb_t_selected_fields.

*** Check event and infotype service ***
*This event is triggered when user selects the edit button
IF io_event->mv_event_id = 'FPM_CALL_DEFAULT_EDIT_PAGE' OR io_event->mv_event_id = 'FPM_BACK_TO_MAIN'.

 
MOVE-CORRESPONDING cs_data TO ls_pa0105.
***  If subtypes are 0010 / 0020 then disable the Save and Back , Save buttons ***
 
IF ls_pa0105-usrty EQ '0010' OR ls_pa0105-usrty EQ '0020'.
    modify_cnr_button
( iv_event_id = if_fpm_constants=>gc_event-save
                       iv_visibility
= '01' ).
    modify_cnr_button
( iv_event_id = if_fpm_constants=>gc_event-save_and_back_to_main
                       iv_visibility
= '01' ).
 
ENDIF.
*** In following conditions, system will make the fields read only.
 
IF ls_pa0105-usrty EQ '0010'.
  
READ TABLE ct_field_usage INTO ls_FPMGB_T_FIELDUSAGE WITH KEY NAME = 'USRID_LONG'.
  
MOVE sy-tabix TO lv_sytabx.
  
MOVE: 'X' TO ls_fpmgb_t_fieldusage-read_only,
        
'' TO ls_fpmgb_t_fieldusage-mandatory,
        
'X' TO ls_fpmgb_t_fieldusage-enabled.
  
MODIFY ct_field_usage INDEX lv_sytabx FROM ls_fpmgb_t_fieldusage TRANSPORTING read_only mandatory enabled.
 
ENDIF.
 
IF ls_pa0105-usrty EQ '0020'.
  
READ TABLE ct_field_usage INTO ls_FPMGB_T_FIELDUSAGE WITH KEY NAME = 'TEL_NUMBER'.
  
MOVE sy-tabix TO lv_sytabx.
  
MOVE: 'X' TO ls_fpmgb_t_fieldusage-read_only,
        
'' TO ls_fpmgb_t_fieldusage-mandatory,
        
'X' TO ls_fpmgb_t_fieldusage-enabled.
  
MODIFY ct_field_usage INDEX lv_sytabx FROM ls_fpmgb_t_fieldusage TRANSPORTING read_only mandatory enabled.
  
READ TABLE ct_field_usage INTO ls_FPMGB_T_FIELDUSAGE WITH KEY NAME = 'TEL_EXTENS'.
  
MOVE sy-tabix TO lv_sytabx.
  
MOVE: 'X' TO ls_fpmgb_t_fieldusage-read_only,
        
'' TO ls_fpmgb_t_fieldusage-mandatory,
        
'X' TO ls_fpmgb_t_fieldusage-enabled.
  
MODIFY ct_field_usage INDEX lv_sytabx FROM ls_fpmgb_t_fieldusage TRANSPORTING read_only mandatory enabled.
  
ENDIF.
 
CLEAR: ls_pa0105, ls_fpmgb_t_fieldusage.
ENDIF.