@AbapCatalog.viewEnhancementCategory: [#NONE]
@AccessControl.authorizationCheck: #NOT_REQUIRED
@EndUserText.label: 'Ledger Company Code Currency Role for MJE'
@Metadata.ignorePropagatedAnnotations: true
@ObjectModel.usageType:{
serviceQuality: #X,
sizeCategory: #L,
dataClass: #MASTER
}
@VDM: {
viewType: #COMPOSITE,
lifecycle.contract.type:#SAP_INTERNAL_API
}
define view entity R_JrnlEntrLdgrCoCodeCrcyRole
as select from I_LedgerCompanyCodeCrcyRoles
{
key Ledger,
key CompanyCode,
key cast( 'CCC' as fis_crcy_role_field) as CurrencyField,
CompanyCodeCurrencyRole as CurrencyRole,
cast( 'CompanyCodeCurrency' as fis_crcy_role_field_text) as CurrencyFieldName,
cast( 'DebitAmountInCoCodeCrcy,CreditAmountInCoCodeCrcy' as abap.char(255)) as AmountFieldName,
cast( 'TaxBaseAmountInCoCodeCrcy' as abap.char(255)) as TaxBaseAmountFieldName,
cast( 'DebitAmountInCoCodeCrcy,CreditAmountInCoCodeCrcy' as abap.char(255)) as TaxAmountFieldName,
cast( 'CompanyCodeCurrency' as fis_crcy_role_field_text) as TaxCurrencyFieldName
}
where
CompanyCodeCurrencyRole <> ''
union all select from I_LedgerCompanyCodeCrcyRoles
{
key Ledger,
key CompanyCode,
key cast( 'GC' as fis_crcy_role_field) as CurrencyField,
GlobalCurrencyRole as CurrencyRole,
cast( 'GlobalCurrency' as fis_crcy_role_field_text) as CurrencyFieldName,
cast( 'DebitAmountInGlobalCrcy,CreditAmountInGlobalCrcy' as abap.char(255)) as AmountFieldName,
cast( case 'GC'
when AdditionalCurrency1Field then 'TaxBaseAmtInAdditionalCrcy1'
when AdditionalCurrency2Field then 'TaxBaseAmtInAdditionalCrcy2'
else ''
end as abap.char(255)) as TaxBaseAmountFieldName,
cast( case 'GC'
when AdditionalCurrency1Field then 'DebitAmountInAddlCrcy1,CreditAmountInAddlCrcy1'
when AdditionalCurrency2Field then 'DebitAmountInAddlCrcy2,CreditAmountInAddlCrcy2'
else ''
end as abap.char(255)) as TaxAmountFieldName,
cast( case 'GC'
when AdditionalCurrency1Field then 'AdditionalCurrency1'
when AdditionalCurrency2Field then 'AdditionalCurrency2'
else ''
end as fis_crcy_role_field_text) as TaxCurrencyFieldName
}
where
GlobalCurrencyRole <> ''
union all select from I_LedgerCompanyCodeCrcyRoles
{
key Ledger,
key CompanyCode,
key cast( 'FDC1' as fis_crcy_role_field) as CurrencyField,
FreeDefinedCurrency1Role as CurrencyRole,
cast( 'FreeDefinedCurrency1' as fis_crcy_role_field_text) as CurrencyFieldName,
cast( 'DebitAmountInFreeDfndCrcy1,CreditAmountInFreeDfndCrcy1' as abap.char(255)) as AmountFieldName,
cast( case 'FDC1'
when AdditionalCurrency1Field then 'TaxBaseAmtInAdditionalCrcy1'
when AdditionalCurrency2Field then 'TaxBaseAmtInAdditionalCrcy2'
else ''
end as abap.char(255)) as TaxBaseAmountFieldName,
cast( case 'FDC1'
when AdditionalCurrency1Field then 'DebitAmountInAddlCrcy1,CreditAmountInAddlCrcy1'
when AdditionalCurrency2Field then 'DebitAmountInAddlCrcy2,CreditAmountInAddlCrcy2'
else ''
end as abap.char(255)) as TaxAmountFieldName,
cast( case 'FDC1'
when AdditionalCurrency1Field then 'AdditionalCurrency1'
when AdditionalCurrency2Field then 'AdditionalCurrency2'
else ''
end as fis_crcy_role_field_text) as TaxCurrencyFieldName
}
where
FreeDefinedCurrency1Role <> ''
union all select from I_LedgerCompanyCodeCrcyRoles
{
key Ledger,
key CompanyCode,
key cast( 'FDC2' as fis_crcy_role_field) as CurrencyField,
FreeDefinedCurrency2Role as CurrencyRole,
cast( 'FreeDefinedCurrency2' as fis_crcy_role_field_text) as CurrencyFieldName,
cast( 'DebitAmountInFreeDfndCrcy2,CreditAmountInFreeDfndCrcy2' as abap.char(255)) as AmountFieldName,
cast( case 'FDC2'
when AdditionalCurrency1Field then 'TaxBaseAmtInAdditionalCrcy1'
when AdditionalCurrency2Field then 'TaxBaseAmtInAdditionalCrcy2'
else ''
end as abap.char(255)) as TaxBaseAmountFieldName,
cast( case 'FDC2'
when AdditionalCurrency1Field then 'DebitAmountInAddlCrcy1,CreditAmountInAddlCrcy1'
when AdditionalCurrency2Field then 'DebitAmountInAddlCrcy2,CreditAmountInAddlCrcy2'
else ''
end as abap.char(255)) as TaxAmountFieldName,
cast( case 'FDC2'
when AdditionalCurrency1Field then 'AdditionalCurrency1'
when AdditionalCurrency2Field then 'AdditionalCurrency2'
else ''
end as fis_crcy_role_field_text) as TaxCurrencyFieldName
}
where
FreeDefinedCurrency2Role <> ''
union all select from I_LedgerCompanyCodeCrcyRoles
{
key Ledger,
key CompanyCode,
key cast( 'FDC3' as fis_crcy_role_field) as CurrencyField,
FreeDefinedCurrency3Role as CurrencyRole,
cast( 'FreeDefinedCurrency3' as fis_crcy_role_field_text) as CurrencyFieldName,
cast( 'DebitAmountInFreeDfndCrcy3,CreditAmountInFreeDfndCrcy3' as abap.char(255)) as AmountFieldName,
cast( case 'FDC3'
when AdditionalCurrency1Field then 'TaxBaseAmtInAdditionalCrcy1'
when AdditionalCurrency2Field then 'TaxBaseAmtInAdditionalCrcy2'
else ''
end as abap.char(255)) as TaxBaseAmountFieldName,
cast( case 'FDC3'
when AdditionalCurrency1Field then 'DebitAmountInAddlCrcy1,CreditAmountInAddlCrcy1'
when AdditionalCurrency2Field then 'DebitAmountInAddlCrcy2,CreditAmountInAddlCrcy2'
else ''
end as abap.char(255)) as TaxAmountFieldName,
cast( case 'FDC3'
when AdditionalCurrency1Field then 'AdditionalCurrency1'
when AdditionalCurrency2Field then 'AdditionalCurrency2'
else ''
end as fis_crcy_role_field_text) as TaxCurrencyFieldName
}
where
FreeDefinedCurrency3Role <> ''
union all select from I_LedgerCompanyCodeCrcyRoles
{
key Ledger,
key CompanyCode,
key cast( 'FDC4' as fis_crcy_role_field) as CurrencyField,
FreeDefinedCurrency4Role as CurrencyRole,
cast( 'FreeDefinedCurrency4' as fis_crcy_role_field_text) as CurrencyFieldName,
cast( 'DebitAmountInFreeDfndCrcy4,CreditAmountInFreeDfndCrcy4' as abap.char(255)) as AmountFieldName,
cast( case 'FDC4'
when AdditionalCurrency1Field then 'TaxBaseAmtInAdditionalCrcy1'
when AdditionalCurrency2Field then 'TaxBaseAmtInAdditionalCrcy2'
else ''
end as abap.char(255)) as TaxBaseAmountFieldName,
cast( case 'FDC4'
when AdditionalCurrency1Field then 'DebitAmountInAddlCrcy1,CreditAmountInAddlCrcy1'
when AdditionalCurrency2Field then 'DebitAmountInAddlCrcy2,CreditAmountInAddlCrcy2'
else ''
end as abap.char(255)) as TaxAmountFieldName,
cast( case 'FDC4'
when AdditionalCurrency1Field then 'AdditionalCurrency1'
when AdditionalCurrency2Field then 'AdditionalCurrency2'
else ''
end as fis_crcy_role_field_text) as TaxCurrencyFieldName
}
where
FreeDefinedCurrency4Role <> ''
union all select from I_LedgerCompanyCodeCrcyRoles
{
key Ledger,
key CompanyCode,
key cast( 'FDC5' as fis_crcy_role_field) as CurrencyField,
FreeDefinedCurrency5Role as CurrencyRole,
cast( 'FreeDefinedCurrency5' as fis_crcy_role_field_text) as CurrencyFieldName,
cast( 'DebitAmountInFreeDfndCrcy5,CreditAmountInFreeDfndCrcy5' as abap.char(255)) as AmountFieldName,
cast( case 'FDC5'
when AdditionalCurrency1Field then 'TaxBaseAmtInAdditionalCrcy1'
when AdditionalCurrency2Field then 'TaxBaseAmtInAdditionalCrcy2'
else ''
end as abap.char(255)) as TaxBaseAmountFieldName,
cast( case 'FDC5'
when AdditionalCurrency1Field then 'DebitAmountInAddlCrcy1,CreditAmountInAddlCrcy1'
when AdditionalCurrency2Field then 'DebitAmountInAddlCrcy2,CreditAmountInAddlCrcy2'
else ''
end as abap.char(255)) as TaxAmountFieldName,
cast( case 'FDC5'
when AdditionalCurrency1Field then 'AdditionalCurrency1'
when AdditionalCurrency2Field then 'AdditionalCurrency2'
else ''
end as fis_crcy_role_field_text) as TaxCurrencyFieldName
}
where
FreeDefinedCurrency5Role <> ''
union all select from I_LedgerCompanyCodeCrcyRoles
{
key Ledger,
key CompanyCode,
key cast( 'FDC6' as fis_crcy_role_field) as CurrencyField,
FreeDefinedCurrency6Role as CurrencyRole,
cast( 'FreeDefinedCurrency6' as fis_crcy_role_field_text) as CurrencyFieldName,
cast( 'DebitAmountInFreeDfndCrcy6,CreditAmountInFreeDfndCrcy6' as abap.char(255)) as AmountFieldName,
cast( case 'FDC6'
when AdditionalCurrency1Field then 'TaxBaseAmtInAdditionalCrcy1'
when AdditionalCurrency2Field then 'TaxBaseAmtInAdditionalCrcy2'
else ''
end as abap.char(255)) as TaxBaseAmountFieldName,
cast( case 'FDC6'
when AdditionalCurrency1Field then 'DebitAmountInAddlCrcy1,CreditAmountInAddlCrcy1'
when AdditionalCurrency2Field then 'DebitAmountInAddlCrcy2,CreditAmountInAddlCrcy2'
else ''
end as abap.char(255)) as TaxAmountFieldName,
cast( case 'FDC6'
when AdditionalCurrency1Field then 'AdditionalCurrency1'
when AdditionalCurrency2Field then 'AdditionalCurrency2'
else ''
end as fis_crcy_role_field_text) as TaxCurrencyFieldName
}
where
FreeDefinedCurrency6Role <> ''
union all select from I_LedgerCompanyCodeCrcyRoles
{
key Ledger,
key CompanyCode,
key cast( 'FDC7' as fis_crcy_role_field) as CurrencyField,
FreeDefinedCurrency7Role as CurrencyRole,
cast( 'FreeDefinedCurrency7' as fis_crcy_role_field_text) as CurrencyFieldName,
cast( 'DebitAmountInFreeDfndCrcy7,CreditAmountInFreeDfndCrcy7' as abap.char(255)) as AmountFieldName,
cast( case 'FDC7'
when AdditionalCurrency1Field then 'TaxBaseAmtInAdditionalCrcy1'
when AdditionalCurrency2Field then 'TaxBaseAmtInAdditionalCrcy2'
else ''
end as abap.char(255)) as TaxBaseAmountFieldName,
cast( case 'FDC7'
when AdditionalCurrency1Field then 'DebitAmountInAddlCrcy1,CreditAmountInAddlCrcy1'
when AdditionalCurrency2Field then 'DebitAmountInAddlCrcy2,CreditAmountInAddlCrcy2'
else ''
end as abap.char(255)) as TaxAmountFieldName,
cast( case 'FDC7'
when AdditionalCurrency1Field then 'AdditionalCurrency1'
when AdditionalCurrency2Field then 'AdditionalCurrency2'
else ''
end as fis_crcy_role_field_text) as TaxCurrencyFieldName
}
where
FreeDefinedCurrency7Role <> ''
union all select from I_LedgerCompanyCodeCrcyRoles
{
key Ledger,
key CompanyCode,
key cast( 'FDC8' as fis_crcy_role_field) as CurrencyField,
FreeDefinedCurrency8Role as CurrencyRole,
cast( 'FreeDefinedCurrency8' as fis_crcy_role_field_text) as CurrencyFieldName,
cast( 'DebitAmountInFreeDfndCrcy8,CreditAmountInFreeDfndCrcy8' as abap.char(255)) as AmountFieldName,
cast( case 'FDC8'
when AdditionalCurrency1Field then 'TaxBaseAmtInAdditionalCrcy1'
when AdditionalCurrency2Field then 'TaxBaseAmtInAdditionalCrcy2'
else ''
end as abap.char(255)) as TaxBaseAmountFieldName,
cast( case 'FDC8'
when AdditionalCurrency1Field then 'DebitAmountInAddlCrcy1,CreditAmountInAddlCrcy1'
when AdditionalCurrency2Field then 'DebitAmountInAddlCrcy2,CreditAmountInAddlCrcy2'
else ''
end as abap.char(255)) as TaxAmountFieldName,
cast( case 'FDC8'
when AdditionalCurrency1Field then 'AdditionalCurrency1'
when AdditionalCurrency2Field then 'AdditionalCurrency2'
else ''
end as fis_crcy_role_field_text) as TaxCurrencyFieldName
}
where
FreeDefinedCurrency8Role <> ''
union all select from I_LedgerCompanyCodeCrcyRoles
{
key Ledger,
key CompanyCode,
key cast( 'FC' as fis_crcy_role_field) as CurrencyField,
FunctionalCurrencyRole as CurrencyRole,
cast( 'FunctionalCurrency' as fis_crcy_role_field_text) as CurrencyFieldName,
cast( 'DebitAmountInFunctionalCrcy,CreditAmountInFunctionalCrcy' as abap.char(255)) as AmountFieldName,
cast( '' as abap.char(255)) as TaxBaseAmountFieldName,
cast( '' as abap.char(255)) as TaxAmountFieldName,
cast( '' as fis_crcy_role_field_text) as TaxCurrencyFieldName
}
where
FunctionalCurrencyRole <> ''