I_PT_SAFTDeliveryOneTimeCust_2

@VDM.viewType:#COMPOSITE // #BASIC

@AccessControl.authorizationCheck: #MANDATORY
@Metadata.ignorePropagatedAnnotations:true
@ObjectModel.usageType.sizeCategory: #XL
@ObjectModel.usageType.serviceQuality: #X
@ObjectModel.usageType.dataClass: #MIXED
@AccessControl.personalData.blocking: #REQUIRED
@EndUserText.label:'One Time Customer for SAFT'

define view entity I_PT_SAFTDeliveryOneTimeCust_2
  as select from I_PT_SAFTCustPartnerFunction as cust 
{

  key Customer                              as Customer,
  key CompanyCode                           as CompanyCode,
  key PortugueseDeliveryNumber              as PortugueseDeliveryNumber,
  key cust.DeliveryDocument,
      DeliveryDate                          as DeliveryDate,

      cast( cust.IsOneTimeAccount as xcpdk) as IsOneTimeAccount,
      CustomerVATRegistration,

   /* case
        when cust.VATRegistration is initial or cust.VATRegistration is null
         then concat(cust.Customer, concat('/',  '999999990'))
        else concat(cust.Customer, concat('/',  cust.VATRegistration))
      end                                   as BusinessPartnerCustomer, */
       

      case
         when cust.ShipToPartyStreetName is not null and cust.ShipToPartyStreetName is not initial
           then cust.ShipToPartyStreetName
         else 'Desconhecido'
      end                                   as StreetName,


      case
           when cust.ShipToPartyHouseNumber is not null and cust.ShipToPartyHouseNumber is not initial
             then cust.ShipToPartyHouseNumber
          else ''
      end                                   as HouseNumber,

      case
           when cust.ShipToPartyCityName is not null and cust.ShipToPartyCityName is not initial
               then cust.ShipToPartyCityName
           else 'Desconhecido'
      end                                   as CityName,


      case
          when cust.ShipToPartyPostalCode is not null and cust.ShipToPartyPostalCode is not initial
          then cust.ShipToPartyPostalCode
          else '0000-000'
      end                                   as PostalCode,

      cast( cust.ShipToPartyCountry as land1) as Country,

      case
           when cust._CustPartner._DfltAddrRprstn._PhoneNumber.InternationalPhoneNumber is not null and cust._CustPartner._DfltAddrRprstn._PhoneNumber.InternationalPhoneNumber is not initial
           then cust._CustPartner._DfltAddrRprstn._PhoneNumber.InternationalPhoneNumber
      end                                   as PhoneNumber,

      case
          when cust.ShipToPartyRegion is not null and cust.ShipToPartyRegion is not initial
          then cust.ShipToPartyRegion
          else ''
      end                                   as Region,  
      
     case
           when cust.PT_ShipToPartyCompanyName is not null and cust.PT_ShipToPartyCompanyName is not initial
             then cust.PT_ShipToPartyCompanyName
          else ''
      end                                   as CompanyName,
   

 case
  when (  CustomerVATRegistration is initial 
         and ( HouseNumber is initial 
               and StreetName  is initial
               and CityName    is initial
               and PostalCode  is initial
               and Country     is initial ) )
    then cust.Customer

  when ( CustomerVATRegistration is initial 
         and ( HouseNumber is not initial
               or StreetName  is not initial
               or CityName    is not initial
               or PostalCode  is not initial
               or Country     is not initial ) )
    then concat( cust.Customer, concat( '_', cust.DeliveryDocument ) )

 when ( CustomerVATRegistration is not initial )
    then concat( CustomerVATRegistration,
                 concat( '_', cust.DeliveryDocument ) )              
 
     else ''                     

    end as BusinessPartnerCustomer, 
      cust.PT_ShipToPartyAddressAsText,     
      cust._CustPartner.AddressID,
      cust._CustPartner._DfltAddrRprstn,
      cust._CustPartner.AddressPersonID,
      cust.FaxNumber,
     // cust.EmailAddress,

      cust.WebsiteURL 

}
where
      cust.IsOneTimeAccount           =  'X'
  and cust.PortugueseDigitalSignature <> ''