Für Elemente des Datentyps CURR oder QUAN sind in einem CDS-View Referenzinformationen erforderlich. Diese Informationen fehlen.
Die Referenzinformationen müssen wie folgt in der Datendefinition gepflegt werden:
// Referenzfeld für Preiseinheit @Semantics.currencyCode: true Preiseinheit, @Semantics.amount.currencyCode: 'Preiseinheit' Preis // Referenzfeld für Maßeinheit @Semantics.unitOfMeasure: true Uom, @Semantics.quantity.unitOfMeasure: 'Uom' Menge
* Menü -> File -> New -> Other -> Core Data Services -> Data Definition
* CDS-View als DDIC Objekt erstellen
@AbapCatalog.sqlViewName: 'ZCDS_MATNR_VIEW'
@AbapCatalog.compiler.CompareFilter: true
@AccessControl.authorizationCheck: #NOT_REQUIRED
@EndUserText.label: 'MATNR lesen'
@Metadata.allowExtensions: true
define view ZCDS_MATNR as select from mara as ma
inner join makt as kt on ma.matnr = kt.matnr
{
key ma.matnr as matnr,
ma.ernam as ersteller,
ma.vpsta as pflegestatus,
case ma.lvorm
when 'X' then 'gelöscht'
else 'aktiv'
end as loeschvormerkung,
kt.maktx as kurztext
};
* Variante 1 (SELECT)
DATA: it_matnr TYPE STANDARD TABLE OF zcds_matnr.
SELECT * FROM zcds_matnr INTO TABLE @it_matnr.
LOOP AT it_matnr ASSIGNING FIELD-SYMBOL(<mat>).
WRITE: / <mat>-matnr, <mat>-ersteller, <mat>-pflegestatus, <mat>-loeschvormerkung, <mat>-kurztext.
ENDLOOP.
* Variante 2 (SALV TABLE IDA)
TRY.
cl_salv_gui_table_ida=>create_for_cds_view( CONV #( 'ZCDS_MATNR' ) )->fullscreen( )->display( ).
CATCH cx_root INTO DATA(e_txt).
WRITE: / e_txt->get_text( ).
ENDTRY.
@AbapCatalog.sqlViewName: 'ZCDS_MATNR_VIEW'
@AbapCatalog.compiler.CompareFilter: true
@AccessControl.authorizationCheck: #NOT_REQUIRED
@EndUserText.label: 'MATNR lesen'
@Metadata.allowExtensions: true
define view ZCDS_MATNR
with parameters p_min_date : dats,
p_max_date : dats
as select from mara as ma
inner join makt as kt on ma.matnr = kt.matnr
{
key ma.matnr as matnr,
ma.ernam as ersteller,
ma.vpsta as pflegestatus,
case ma.lvorm
when 'X' then 'gelöscht'
else 'aktiv'
end as loeschvormerkung,
kt.maktx as kurztext
} where ma.ernam like 'A%' and ma.ersda between :p_min_date and :p_max_date;
DATA: it_matnr TYPE STANDARD TABLE OF zcds_matnr. SELECT * FROM zcds_matnr( p_min_date = '20170101', p_max_date = '20171231' ) INTO TABLE @it_matnr. LOOP AT it_matnr ASSIGNING FIELD-SYMBOL(<mat>). WRITE: / <mat>-matnr, <mat>-ersteller, <mat>-pflegestatus, <mat>-loeschvormerkung, <mat>-kurztext. ENDLOOP.
* vorhandene CDS Views im System: SE16 -> Tabelle TADIR, Objekttyp 'STOB'
TRY.
* CDS View 'DEMO_CDS_SPFLI' anzeigen
cl_salv_gui_table_ida=>create_for_cds_view( CONV #( 'DEMO_CDS_SPFLI' ) )->fullscreen( )->display( ).
CATCH cx_root INTO DATA(e_txt).
WRITE: / e_txt->get_text( ).
ENDTRY.