R_BANKADDRESSTP

@AbapCatalog.viewEnhancementCategory: [#NONE]
@AccessControl.authorizationCheck: #MANDATORY
@EndUserText.label: 'Bank Address'
@Metadata.ignorePropagatedAnnotations: true
@ObjectModel.usageType:{
  serviceQuality: #A,
  sizeCategory: #S,
  dataClass: #MIXED
}

@VDM: {
  lifecycle.contract.type: #SAP_INTERNAL_API,
  viewType: #TRANSACTIONAL
}
define view entity R_BankAddressTP
   as select from I_Bank_2                  as Bank
  left outer join I_BankOrganizationAddress as Address on  Bank.AddressID = Address.AddressID
                                                   and Address.AddressPersonID is initial
                                                   and Address.AddressRepresentationCode is initial
  composition [0..*] of R_BankScriptedAddressTP     as _BankScriptVariant
  association to parent R_BankTP                    as _Bank    on  $projection.BankCountry    = _Bank.BankCountry
                                                                and $projection.BankInternalID = _Bank.BankInternalID
  association [0..1] to I_Region                    as _Region  on  $projection.Region  = _Region.Region
                                                                and $projection.Country = _Region.Country
  association [0..1] to I_BusPartTelCountryPrefix   as _TelCountryPrefix on $projection.phonenumbercountry = _TelCountryPrefix.Country

{
  key Bank.BankCountry,
  key Bank.BankInternalID,
/*
      concat( rpad(Address.AddresseeName1, 40, 'a'), Address.AddresseeName2)  as LongBankName_rpad,
      concat( lpad(Address.AddresseeName1, 40, 'a'), Address.AddresseeName2)  as LongBankName_lpad,

      concat( rpad(Address.AddresseeName1, 40, ' '), Address.AddresseeName2)  as LongBankName_rpads,
      concat( rpad(Address.AddresseeName1, 40, ''), Address.AddresseeName2)   as LongBankName_rpads2,
      concat( lpad(Address.AddresseeName1, 40, ' '), Address.AddresseeName2)  as LongBankName_lpads,
      replace( concat( rpad(Address.AddresseeName1, 40, 'a'), Address.AddresseeName2), 'a', '')  as LongBankName_rpad2,
      //https://answers.sap.com/questions/13429299/abap-cds-concat-with-space-concatenate-with-dynami.html?childToView=13427486

      replace( replace( concat_with_space( rpad( ltrim(Address.AddresseeName1, '0'), 40 , '#' ), Address.AddresseeName2, 1 ), '#', ' #' ), '#', '')
              as LongBankName_rpad3,
      replace( replace( concat( rpad( ltrim(Address.AddresseeName1, '0'), 40 , '#' ), Address.AddresseeName2 ), '#', ' #' ), '#', '')
              as LongBankName_rpad6,
*/
      cast( concat(Address.AddresseeName1, Address.AddresseeName2)
        as bf_bank_name_in_local_script preserving type )   as LongBankName,   //char80

      cast( concat(Address.AddresseeName3, Address.AddresseeName4)
        as bf_bank_branch_in_local_script preserving type ) as LongBankBranch, //char80


      //Address.StreetName,

      case
        when ( Address.StreetName is null or Address.StreetName is initial ) then Bank.ShortStreetName
        else Address.StreetName
      end
      as StreetName,

      Address.HouseNumber,
      Address.HouseNumberSupplementText,

      //Address.CityName,

      case
        when ( Address.CityName is null or Address.CityName is initial ) then Bank.ShortCityName
        else Address.CityName
      end
      as CityName,

      Address.PostalCode,
      @ObjectModel.foreignKey.association: '_Country'
      Address.Country,

      @ObjectModel.foreignKey.association: '_Region'
      //Address.Region                            ,

      case
        when ( Address.Region is null or Address.Region is initial ) then Bank.Region
        else Address.Region
      end
      as Region,


      Address.AddressObjectType,
      @Semantics.language: true
      @ObjectModel.foreignKey.association: '_CorrespondenceLanguage'
      Address.CorrespondenceLanguage,
      Address.PrfrdCommMediumType,
      Address.AddresseeFullName,
      Address.DistrictName,
      Address.VillageName,
      Address.CompanyPostalCode,
      Address.StreetAddrNonDeliverableReason,
      Address.StreetPrefixName1,
      Address.StreetPrefixName2,
      Address.StreetSuffixName1,
      Address.StreetSuffixName2,
      Address.Building,
      Address.Floor,
      Address.RoomNumber,
      @ObjectModel.foreignKey.association: '_FormOfAddress'
      Address.FormOfAddress,
//      Address.AddresseeName1,

//      Address.AddresseeName2,

//      Address.AddresseeName3,

//      Address.AddresseeName4,

      Address.TaxJurisdiction,
      Address.TransportZone,

      Address.AddressSearchTerm1,
      Address.AddressSearchTerm2,

      Address.POBox,
      Address.POBoxAddrNonDeliverableReason,
      Address.POBoxIsWithoutNumber,
      Address.POBoxPostalCode,
      Address.POBoxLobbyName,
      Address.POBoxDeviatingCityName,
      Address.POBoxDeviatingRegion,
      Address.POBoxDeviatingCountry,
      Address.CareOfName,
      Address.DeliveryServiceTypeCode,
      Address.DeliveryServiceNumber,
      Address.AddressTimeZone,
      Address.SecondaryRegionName,
      Address.TertiaryRegionName,

//      Address.EmailAddress,

//      Address.BankMainIntlPhNmbr,

//      Address.InternationalPhoneNumber,


      Address.AddressRepresentationCode,
      Address.AddressID,
      Address.AddressPersonID,     //Added because of _CurrentDfltEmailAddress and other communication fields

// < ------------  Verified against GTNC please do not change

      Address._CurrentDfltEmailAddress.EmailAddress,

      Address._CurrentDfltLandlinePhoneNmbr.PhoneNumberCountry,
      Address._CurrentDfltLandlinePhoneNmbr.PhoneAreaCodeSubscriberNumber as PhoneNumber,
      Address._CurrentDfltLandlinePhoneNmbr.PhoneExtensionNumber,
      Address._CurrentDfltLandlinePhoneNmbr.InternationalPhoneNumber,
      //concat('+' , _TelCountryPrefix.TelephoneCountryPrefix)    as  TelephoneCountryPrefix,


      Address._CurrentDfltMobilePhoneNumber.PhoneNumberCountry            as MobilePhoneCountry,
      Address._CurrentDfltMobilePhoneNumber.PhoneAreaCodeSubscriberNumber as MobilePhoneNumber,
      cast( Address._CurrentDfltMobilePhoneNumber.InternationalPhoneNumber as bf_bank_address_mobile preserving type ) as InternationalMobilePhoneNumber,


      Address._CurrentDfltFaxNumber.FaxNumberCountry,
      Address._CurrentDfltFaxNumber.FaxAreaCodeSubscriberNumber,
      Address._CurrentDfltFaxNumber.FaxExtensionNumber,
      Address._CurrentDfltFaxNumber.InternationalFaxNumber,
// ----------- >

      //  Address._MainWebsiteURL.UniformResourceIdentifier as UniformResourceIdentifier,


      //    Address._CurrentDfltEmailAddress as _BankMainEmailAddress,

      //    Address._CurrentDfltLandlinePhoneNmbr as _BankMainPhoneNmbr,

      //    Address._CurrentDfltMobilePhoneNumber as _BankMainMobilePhoneNmbr,

      //    Address._CurrentDfltFaxNumber as _BankMainFaxNumber,

      //    Address._MainWebsiteURL as _BankMainWebsiteURL,


      // Address._Region,

      _Region,

      Address._Country,
      Address._FormOfAddress,
      Address._AddressRepresentationCode,
      Address._CorrespondenceLanguage,

// Try to add phones

      Address._AddressObjectType,
      Address._AddressPersonName,
      Address._CurrentDfltEmailAddress,
      Address._CurrentDfltFaxNumber,
      Address._CurrentDfltLandlinePhoneNmbr,
      Address._CurrentDfltMobilePhoneNumber,
      Address._DeliveryServiceTypeCode,
      Address._EmailAddress,
      Address._FaxNumber,
      Address._MainWebsiteURL,
      Address._PhoneNumber,
      Address._POBoxAddrNonDeliverableReason,
      Address._POBoxDeviatingCountry,
      Address._POBoxDeviatingRegion,
      Address._PrfrdCommMediumType,
      Address._StreetAddrNonDeliverableRsn,
      Address._TimeZone,
      Address._TransportationZone,
      Address._UniformResourceIdentifier,

      _Bank,
      _BankScriptVariant,
      _TelCountryPrefix

}