From 79fb1d1c608408e66108da5ab03fb2f5cb27d640 Mon Sep 17 00:00:00 2001 From: MYSAP Date: Mon, 24 Aug 2026 07:29:08 +0000 Subject: [PATCH] First Commit (2026.08.24) --- .abapgit.xml | 10 ++++++++++ src/package.devc.xml | 10 ++++++++++ src/zcl_scalar_func_demo.clas.abap | 28 ++++++++++++++++++++++++++++ src/zcl_scalar_func_demo.clas.xml | 16 ++++++++++++++++ src/zmod_test01.prog.abap | 17 +++++++++++++++++ src/zmod_test01.prog.xml | 21 +++++++++++++++++++++ src/zv_sflight.ddls.asddls | 12 ++++++++++++ src/zv_sflight.ddls.baseinfo | 21 +++++++++++++++++++++ src/zv_sflight.ddls.xml | 13 +++++++++++++ 9 files changed, 148 insertions(+) create mode 100644 .abapgit.xml create mode 100644 src/package.devc.xml create mode 100644 src/zcl_scalar_func_demo.clas.abap create mode 100644 src/zcl_scalar_func_demo.clas.xml create mode 100644 src/zmod_test01.prog.abap create mode 100644 src/zmod_test01.prog.xml create mode 100644 src/zv_sflight.ddls.asddls create mode 100644 src/zv_sflight.ddls.baseinfo create mode 100644 src/zv_sflight.ddls.xml diff --git a/.abapgit.xml b/.abapgit.xml new file mode 100644 index 0000000..7c0506a --- /dev/null +++ b/.abapgit.xml @@ -0,0 +1,10 @@ + + + + + E + /src/ + PREFIX + + + diff --git a/src/package.devc.xml b/src/package.devc.xml new file mode 100644 index 0000000..faa873f --- /dev/null +++ b/src/package.devc.xml @@ -0,0 +1,10 @@ + + + + + + 데이타 모델링 관련 테스트 + + + + diff --git a/src/zcl_scalar_func_demo.clas.abap b/src/zcl_scalar_func_demo.clas.abap new file mode 100644 index 0000000..3dbc93b --- /dev/null +++ b/src/zcl_scalar_func_demo.clas.abap @@ -0,0 +1,28 @@ +CLASS zcl_scalar_func_demo DEFINITION + PUBLIC + FINAL + CREATE PUBLIC . + + PUBLIC SECTION. + INTERFACES if_amdp_marker_hdb. + CLASS-METHODS : + convert_perio FOR SCALAR FUNCTION zfn_convert_gjahr. + PROTECTED SECTION. + PRIVATE SECTION. +ENDCLASS. + + + +CLASS zcl_scalar_func_demo IMPLEMENTATION. + METHOD convert_perio BY DATABASE FUNCTION FOR HDB LANGUAGE SQLSCRIPT OPTIONS READ-ONLY. + + result = + CAST( + SUBSTRING(TO_CHAR(:p_date, 'YYYYMMDD'), 1, 4) + || '0' + || SUBSTRING(TO_CHAR(:p_date, 'YYYYMMDD'), 5, 2) + AS CHAR(7) + ); + + ENDMETHOD. +ENDCLASS. diff --git a/src/zcl_scalar_func_demo.clas.xml b/src/zcl_scalar_func_demo.clas.xml new file mode 100644 index 0000000..d8f7321 --- /dev/null +++ b/src/zcl_scalar_func_demo.clas.xml @@ -0,0 +1,16 @@ + + + + + + ZCL_SCALAR_FUNC_DEMO + E + scalar 함수 데모 + 1 + X + X + X + + + + diff --git a/src/zmod_test01.prog.abap b/src/zmod_test01.prog.abap new file mode 100644 index 0000000..d7d780f --- /dev/null +++ b/src/zmod_test01.prog.abap @@ -0,0 +1,17 @@ +*&---------------------------------------------------------------------* +*& Report ZMOD_TEST01 +*&---------------------------------------------------------------------* +*& +*&---------------------------------------------------------------------* +REPORT ZMOD_TEST01. + +PARAMETERS : p_perio type c LENGTH 7. + +select * + into TABLE @data(lt_data) + from zv_sflight + where perio = @p_perio +. + + +cl_demo_output=>display( lt_data ). diff --git a/src/zmod_test01.prog.xml b/src/zmod_test01.prog.xml new file mode 100644 index 0000000..e42f2fa --- /dev/null +++ b/src/zmod_test01.prog.xml @@ -0,0 +1,21 @@ + + + + + + ZMOD_TEST01 + 1 + E + X + X + + + + R + Program ZMOD_TEST01 + 19 + + + + + diff --git a/src/zv_sflight.ddls.asddls b/src/zv_sflight.ddls.asddls new file mode 100644 index 0000000..d19a08f --- /dev/null +++ b/src/zv_sflight.ddls.asddls @@ -0,0 +1,12 @@ +@AbapCatalog.viewEnhancementCategory: [#NONE] +@AccessControl.authorizationCheck: #NOT_REQUIRED +@EndUserText.label: 'SFLIGHT CDS VIEW' +@Metadata.ignorePropagatedAnnotations: true +define view entity ZV_SFLIGHT as select from sflight +{ + key carrid, + key connid, + zfn_convert_gjahr( + p_date=>fldate + ) as perio +} diff --git a/src/zv_sflight.ddls.baseinfo b/src/zv_sflight.ddls.baseinfo new file mode 100644 index 0000000..ddf9163 --- /dev/null +++ b/src/zv_sflight.ddls.baseinfo @@ -0,0 +1,21 @@ +{ +"BASEINFO": +{ +"FROM": +[ +"SFLIGHT" +], +"ASSOCIATED": +[], +"BASE": +[], +"ANNO_REF": +[], +"SCALAR_FUNCTION": +[ +"ZFN_CONVERT_GJAHR" +], +"VERSION":0, +"ANNOREF_EVALUATION_ERROR":"" +} +} \ No newline at end of file diff --git a/src/zv_sflight.ddls.xml b/src/zv_sflight.ddls.xml new file mode 100644 index 0000000..47e1f74 --- /dev/null +++ b/src/zv_sflight.ddls.xml @@ -0,0 +1,13 @@ + + + + + + ZV_SFLIGHT + E + SFLIGHT CDS VIEW + W + + + +