P_SettlDocAddInfo1

@AbapCatalog.sqlViewName: 'PWLFSMTADDINF1'
@AbapCatalog.preserveKey: true
@VDM.viewType: #BASIC
@VDM.private: true
@ObjectModel.usageType.serviceQuality: #B
@ObjectModel.usageType.dataClass: #TRANSACTIONAL
@ObjectModel.usageType.sizeCategory: #XXL
@ClientHandling.type: #INHERITED
@ClientHandling.algorithm: #SESSION_VARIABLE
@AccessControl.authorizationCheck: #NOT_REQUIRED
@AbapCatalog.compiler.compareFilter: true
define view P_SettlDocAddInfo1
  as select from wbrk
 
{
  key wbrk.wbeln                                       as wbeln,
      wbrk.wdtyp                                       as wdtyp,
      wbrk.bukrs                                       as bukrs,
 
      case wbrk.bukrs_deb
       when ''
         then wbrk.bukrs
         else wbrk.bukrs_deb
      end                                               as bukrs_deb,

      case
        when ( wbrk.wdtyp = 'G' or wbrk.wdtyp = 'H' )
         then
          case wbrk.kalsmd
            when ''
             then wbrk.kalsm
             else wbrk.kalsmd
          end
      //wdtyp <> 'G' and wdtyp <> 'H':

         else wbrk.kalsmd
      end                                               as kalsm_deb,

      case
        when ( wbrk.wdtyp = 'G' or wbrk.wdtyp = 'H' )
          then cast( ' ' as kalsm_d )
          else wbrk.kalsm
      end                                               as kalsm,

      case wbrk.contract_type
         when '1'
           then cast( wbrk.contract as wcb_coco_num )
         when '2'
           then cast( ' ' as wcb_coco_num )
         when '3'
           then cast( ' ' as wcb_coco_num )
         when '4'
           then cast( ' ' as wcb_coco_num )
         else cast( ' ' as wcb_coco_num )
      end                                               as related_coco_num,

      case wbrk.contract_type
         when '1'
           then cast( ' ' as tkonn )
         when '2'
           then cast( wbrk.contract as tkonn )
         when '3'
           then cast( ' ' as tkonn )
         when '4'
           then cast( ' ' as tkonn )
         else cast( ' ' as tkonn )
      end                                               as related_tkonn,

      case wbrk.contract_type
         when '1'
           then cast( ' ' as ebeln )
         when '2'
           then cast( ' ' as ebeln )
         when '3'
           then cast( wbrk.contract as ebeln )
         when '4'
           then cast( ' ' as ebeln )
         else cast( ' ' as ebeln )
      end                                               as related_ebeln,

      case wbrk.contract_type
         when '1'
           then cast( ' ' as vbeln_vf )
         when '2'
           then cast( ' ' as vbeln_vf )
         when '3'
           then cast( ' ' as vbeln_vf )
         when '4'
           then cast( wbrk.contract as vbeln_vf )
         else cast( ' ' as vbeln_vf )
      end                                               as related_vbeln,

      case wbrk.partner_exp_type
         when '1'
           then cast( wbrk.partner_exp as lifnr )
         when '2'
           then cast( ' ' as lifnr )
         when ' '
           then case wbrk.lifre
               when ' '
                 then cast( ' ' as lifnr )
                 else cast( wbrk.partner_exp as lifnr )
               end
         else cast( ' ' as lifnr )
      end                                               as trdg_expn_supplier,

      case wbrk.partner_exp_type
         when '1'
           then cast( ' ' as kunnr )
         when '2'
           then cast( wbrk.partner_exp as kunnr )
         when ' '
           then case wbrk.kunrg
               when ' '
                 then cast( ' ' as kunnr )
                 else cast( wbrk.partner_exp as kunnr )
               end
         else cast( ' ' as kunnr )
      end                                               as trdg_expn_customer,
      
      case 
         when wbrk.landtx_bukrs_deb = ''
           then 
            case 
              when wbrk.bukrs_deb = ''
               then cast( wbrk.landtx_bukrs as wlf_landtx_bukrs_deb preserving type )
              when wbrk.bukrs_deb = wbrk.bukrs 
               then cast( wbrk.landtx_bukrs as wlf_landtx_bukrs_deb preserving type )
              else wbrk.landtx_bukrs_deb
            end
         else wbrk.landtx_bukrs_deb
      end                                               as landtx_bukrs_deb
}           
/*+[internal] {
"BASEINFO":
{
"FROM":
[
"WBRK"
],
"ASSOCIATED":
[],
"BASE":
[],
"ANNO_REF":
[],
"SCALAR_FUNCTION":
[],
"VERSION":0,
"ANNOREF_EVALUATION_ERROR":""
}
}*/