Ansicht
Dokumentation

SOLMAN_CM_REL_NUMBER - BAdI: Define Release Number

SOLMAN_CM_REL_NUMBER - BAdI: Define Release Number

SUBST_MERGE_LIST - merge external lists to one complete list with #if... logic for R3up   CPI1466 during Backup  
This documentation is copyright by SAP AG.
SAP E-Book

Use this Business Add-In (BAdI) AIC_RELEASE_NUMBERING_BADI to define your own pattern for release numbers.

You need development authorization to perform this activity. As a configuration user, you cannot follow the link to BAdI AIC_RELEASE_NUMBERING_BADI.

The default pattern is:

..

The default numbering pattern starts with 1.0.0 and increases by 1 for each new release. For example, if the current release number is 1.3.0, then the next minor release is 1.4.0 and the next major release is 2.0.0.

In some contexts, only the first two digits are displayed (release number short form) - for example, 1.3

Create your own BAdI implementation with these parameters:

  • IV_RELEASE_COMPONENT - importing - GUID of change control landscape

  • IV_RELEASE_TYPE - importing - Release Type

  • EV_RELEASE_NUMBER - exporting - generated release number

This is the standard generation of the release number:

* read the current release numbers

SELECT * FROM aic_release_cycl INTO TABLE lt_release_cycle

WHERE release_component = iv_release_component

AND ( release_type = /tmwflow/cl_constants=>con_cycle_ty-major_rel

OR release_type = /tmwflow/cl_constants=>con_cycle_ty-minor_rel

OR release_type = /tmwflow/cl_constants=>con_cycle_ty-emergncy_rel ).

IF lt_release_cycle IS INITIAL.

* first entry

CASE iv_release_type.

WHEN /tmwflow/cl_constants=>con_cycle_ty-major_rel. " major release

ev_release_number = '1.0.0'.

WHEN /tmwflow/cl_constants=>con_cycle_ty-minor_rel. " minor release

ev_release_number = '0.1.0'.

WHEN /tmwflow/cl_constants=>con_cycle_ty-emergncy_rel. " emergency release

ev_release_number = '0.0.1'.

ENDCASE.

ELSE.

* other entries existing.

IF iv_release_number IS INITIAL.

SORT lt_release_cycle BY golive_date DESCENDING.

READ TABLE lt_release_cycle INTO DATA(ls_release_cycle) INDEX 1.

lv_release_number = ls_release_cycle-release_number.

* SORT lt_release_no DESCENDING.

* READ TABLE lt_release_no INDEX 1 INTO lv_release_number.

ELSE.

lv_release_number = iv_release_number.

ENDIF.

SPLIT lv_release_number AT '.' INTO lv_major lv_minor lv_emergency IN CHARACTER MODE.

CASE iv_release_type.

WHEN /tmwflow/cl_constants=>con_cycle_ty-major_rel. " major release

lv_major = lv_major + 1.

lv_minor = 0.

lv_emergency = 0.

WHEN /tmwflow/cl_constants=>con_cycle_ty-minor_rel. " minor release

lv_minor = lv_minor + 1.

lv_emergency = 0.

WHEN /tmwflow/cl_constants=>con_cycle_ty-emergncy_rel. " emergency release

lv_emergency = lv_emergency + 1.

ENDCASE.

* format output string

MOVE lv_major TO lv_major_str.

SHIFT lv_major_str LEFT DELETING LEADING '0'.

IF lv_major_str IS INITIAL. lv_major_str = '0'. ENDIF.

MOVE lv_minor TO lv_minor_str.

SHIFT lv_minor_str LEFT DELETING LEADING '0'.

IF lv_minor_str IS INITIAL. lv_minor_str = '0'. ENDIF.

MOVE lv_emergency TO lv_emergency_str.

SHIFT lv_emergency_str LEFT DELETING LEADING '0'.

IF lv_emergency_str IS INITIAL. lv_emergency_str = '0'. ENDIF.

CONCATENATE lv_major_str lv_minor_str lv_emergency_str INTO ev_release_number SEPARATED BY '.'.

CONDENSE ev_release_number NO-GAPS.

ENDIF.






RFUMSV00 - Advance Return for Tax on Sales/Purchases   SUBST_MERGE_LIST - merge external lists to one complete list with #if... logic for R3up  
This documentation is copyright by SAP AG.

Length: 4876 Date: 20240523 Time: 164301     sap01-206 ( 44 ms )