Create missing BBV

Get delivery system info

Loop new created BBV description

si_vers_ref-create_bbvs_from_predecessor

BB_VERS_FACTORY~COPY_BB_VERS

CREATE OBJECT ro_bb_vers EXPORTING iv_bb_id = iv_bb_id_copy iv_bb_country = iv_bb_country_copy iv_bb_lead_prod_vers = iv_bb_lead_prod_vers_copy iv_owner = mv_owner iv_is_new = abap_true io_bb_db = mo_bb_db io_bb_vers_db = mo_bb_vers_db io_rfc_connect_ol = mo_rfc_connect_ol iv_pred_bb_id = mv_bb_id iv_pred_bb_country = mv_bb_country iv_pred_bb_lead_prod_vers = mv_bb_lead_prod_vers io_bb_factory = io_bb_factory io_prod_prodvers = mo_prod_prodvers.

Start

Loop BBV

Get Pred. SiV key of current SiV

Get Pred. SiV

End

Get Original BBV reference

Check if new BBV exist

Add message

Pred. SiV is not initail

Check new create BBV exist

Not exist

Loop at SiV

Loop finished

Exist

Set predecessor BBV description to created BBV

Get BBV of Pred. SIV from source system

/S1R/IF_PKG_VERS~CREATE_BBVS_FROM_PRED_SIVS

Insert BBV to class attribute

Not found

Load existing Pred. SiV reference

Create new BBV base on predecessor BBV

Build new BBV

Get delivery system of Pred. SiV

Loop at SiVs

Get all SiV of the PkgV

Loop each SiV

/S1R/CL_BB_VERS-COPY

Load Pred. SiV of current SiV

Delete current SiV

Original BBV-Copy

create BBVs with new Country/ProdVers IF -bb_country EQ /s1r/if_constants=co_cross_country. ls_bb_vers-bb_country = /s1r/if_constants=co_cross_country.ELSE. ls_bb_vers-bb_country = mv_si_country. ENDIF. ls_bb_vers-bb_lead_prod_vers = mv_si_lead_prod_vers.

Not found delivery system