fmlv_ckmlct

@AbapCatalog.sqlViewName: 'FMLVCKMLCT'
@AbapCatalog.compiler.compareFilter: true
@AbapCatalog.preserveKey: true
@AbapCatalog.buffering:{
  status: #ACTIVE,
  type: #FULL
}
@AccessControl.authorizationCheck: #NOT_ALLOWED
@ClientHandling.algorithm: #SESSION_VARIABLE
@ObjectModel: {
  usageType: {
    serviceQuality: #A,
    sizeCategory: #S,
    dataClass: #CUSTOMIZING
  }
}
@EndUserText.label: 'Replacement object for CKMLCT'

// --------------------------------------------------------------------

// Use Case 1: Classic ML currency scenario

//   -> ML supports an external currency type only once.

//   -> Return external currency types, independent of assigned ledger.

// --------------------------------------------------------------------

// Use Case 2: Flexible or full parallel accounting scenario

//   -> ML supports same external currency type in multiple ledgers.

//   -> Return unique currency types.

// --------------------------------------------------------------------


define view fmlv_ckmlct
  as

  select from              ckmlv         as ckmlv
  
    left outer to one join fmlc_toggle   as switch    on switch.toggle_id = 'FINS_PARALLEL_ACCOUNTING_RS'
    inner join             t001k         as t001k     on t001k.bwkey = ckmlv.bwkey
    inner join             fmlt_curtp_ml as curtp_ml  on curtp_ml.rbukrs = t001k.bukrs
    inner join             finsc_ledger  as ledger    on ledger.rldnr = curtp_ml.rldnr
    inner join             finsc_curtype as curtp_def on(  (     curtp_def.curtype     = curtp_ml.curtp 
                                                             and curtp_def.rldnr       = ''
                                                             and ledger.xleading       = 'X' )
                                                         or(     curtp_def.ext_curtype = curtp_ml.curtp 
                                                             and curtp_def.rldnr       = curtp_ml.rldnr
                                                             and ledger.xleading       = '' ) )

{
  key ckmlv.bwkey                                                                     as bwkey,
  key case when switch.is_active = 'X' then curtp_def.curtype else curtp_ml.curtp end as curtp,
      curtp_ml.waers                                                                  as waers,
      ' '                                                                             as adjust_flag,
      '    '                                                                          as adjust_vers,
      cast( '00000000' as abap.dats )                                                 as adjust_date,
      '            '                                                                  as adjust_user
}

where
  ckmlv.mlbwi = 'X'
/*+[internal] {
"BASEINFO":
{
"FROM":
[
"CKMLV",
"FINSC_CURTYPE",
"FINSC_LEDGER",
"FMLC_TOGGLE",
"FMLT_CURTP_ML",
"T001K"
],
"ASSOCIATED":
[],
"BASE":
[],
"ANNO_REF":
[],
"VERSION":0,
"ANNOREF_EVALUATION_ERROR":""
}
}*/