CI/CD avec ABAP Cloud

┌─────────────────────────────────────────────────────────────────────────┐
│                        Pipeline CI/CD pour ABAP Cloud                    │
│                                                                          │
│  ┌─────────┐   ┌─────────┐   ┌─────────┐   ┌─────────┐   ┌─────────┐   │
│  │  Code   │   │  Build  │   │  Test   │   │ Quality │   │ Deploy  │   │
│  │  Push   │──▶│  Check  │──▶│  Stage  │──▶│  Gate   │──▶│  Stage  │   │
│  └─────────┘   └─────────┘   └─────────┘   └─────────┘   └─────────┘   │
│       │             │             │             │             │         │
│       │             │             │             │             │         │
│       ▼             ▼             ▼             ▼             ▼         │
│   Git Push      Syntax &     ABAP Unit      ATC Checks    gCTS Pull    │
│   Trigger       Activation   Tests          Code Review   Transport    │
│                              Integration    Coverage      Release      │
│                              Tests          Security                   │
│                                                                          │
└─────────────────────────────────────────────────────────────────────────┘

┌────────────────────────────────────────────────────────────────┐
│                   Service SAP CI/CD                              │
│                                                                  │
│  ┌──────────────┐  ┌──────────────┐  ┌──────────────┐          │
│  │   Pipeline   │  │    Jobs &    │  │   Artifact   │          │
│  │   Editor     │  │    Stages    │  │   Storage    │          │
│  └──────────────┘  └──────────────┘  └──────────────┘          │
│                                                                  │
│  ┌──────────────┐  ┌──────────────┐  ┌──────────────┐          │
│  │  Credentials │  │   Webhooks   │  │   Logs &     │          │
│  │   Manager    │  │   & Trigger  │  │   Reports    │          │
│  └──────────────┘  └──────────────┘  └──────────────┘          │
│                                                                  │
│  Scénarios supportés :                                          │
│  • SAP Fiori dans SAP BTP Cloud Foundry                        │
│  • SAP Cloud Application Programming Model (CAP)               │
│  • ABAP Environment (SAP BTP)                                  │
│  • Intégration gCTS                                             │
│                                                                  │
└────────────────────────────────────────────────────────────────┘

# .pipeline/config.yml pour ABAP Environment
general:
  buildTool: "abap"
  abapSystemUrl: "https://my-system.abap.eu10.hana.ondemand.com"

stages:
  ABAP Unit Tests:
    abapEnvironmentRunATCCheck: true
    atcVariant: "DEFAULT"
    abapEnvironmentRunAUnitTest: true
    aUnitResultsFileName: "AUnitResults.xml"

  ATC Check:
    abapEnvironmentRunATCCheck: true
    atcVariant: "Z_CI_VARIANT"
    atcResultsFileName: "ATCResults.xml"

  Build:
    abapEnvironmentBuild: true

  Deploy:
    abapEnvironmentRelease: true
    cfApiEndpoint: "https://api.cf.eu10.hana.ondemand.com"
    cfOrg: "my-org"
    cfSpace: "dev"

┌────────────────────────────────────────────────────────────────┐
│  Credentials Store                                               │
├────────────────────────────────────────────────────────────────┤
│                                                                  │
│  Name: abap-credentials                                         │
│  Type: Basic Authentication                                     │
│  Username: CICD_USER                                            │
│  Password: ********                                             │
│                                                                  │
│  Name: cf-credentials                                           │
│  Type: Cloud Foundry                                            │
│  API Endpoint: https://api.cf.eu10.hana.ondemand.com           │
│  Org: my-organization                                           │
│  Space: dev                                                      │
│                                                                  │
│  Name: git-credentials                                          │
│  Type: SSH Key                                                   │
│  Private Key: ********                                          │
│                                                                  │
└────────────────────────────────────────────────────────────────┘

CLASS zcl_customer_test DEFINITION
  FOR TESTING
  RISK LEVEL HARMLESS
  DURATION SHORT.

  PRIVATE SECTION.
    CLASS-DATA:
      mo_environment TYPE REF TO if_cds_test_environment.

    CLASS-METHODS:
      class_setup,
      class_teardown.

    METHODS:
      setup,
      teardown,
      " Méthodes de test - nommées clairement pour les rapports CI/CD
      test_create_customer_success FOR TESTING,
      test_create_customer_invalid_email FOR TESTING,
      test_update_customer_status FOR TESTING,
      test_delete_customer_with_orders FOR TESTING.
ENDCLASS.

CLASS zcl_customer_test IMPLEMENTATION.
  METHOD class_setup.
    " Framework CDS Test Double pour des tests isolés
    mo_environment = cl_cds_test_environment=>create_for_multiple_cds(
      VALUE #(
        ( i_for_entity = 'ZI_CUSTOMER' )
        ( i_for_entity = 'ZI_ORDER' )
      )
    ).
  ENDMETHOD.

  METHOD class_teardown.
    mo_environment->destroy( ).
  ENDMETHOD.

  METHOD setup.
    " Données de test avant chaque test
    mo_environment->clear_doubles( ).

    " Insérer des données mock
    DATA(lt_customers) = VALUE zt_customer_t(
      ( customer_id = '1' name = 'Test GmbH' email = '[email protected]' status = 'A' )
      ( customer_id = '2' name = 'Demo AG' email = '[email protected]' status = 'I' )
    ).

    mo_environment->insert_test_data( lt_customers ).
  ENDMETHOD.

  METHOD teardown.
    ROLLBACK WORK.
  ENDMETHOD.

  METHOD test_create_customer_success.
    " Given
    DATA(lo_cut) = NEW zcl_customer_service( ).
    DATA(ls_input) = VALUE zs_customer_create(
      name  = 'Nouveau client"
      email = '[email protected]"
    ).

    " When
    DATA(ls_result) = lo_cut->create_customer( ls_input ).

    " Then
    cl_abap_unit_assert=>assert_not_initial(
      act = ls_result-customer_id
      msg = 'L''ID client devrait être généré"
    ).
    cl_abap_unit_assert=>assert_equals(
      act = ls_result-status
      exp = 'A"
      msg = 'Le nouveau client devrait être actif"
    ).
  ENDMETHOD.

  METHOD test_create_customer_invalid_email.
    " Given
    DATA(lo_cut) = NEW zcl_customer_service( ).
    DATA(ls_input) = VALUE zs_customer_create(
      name  = 'Client invalide"
      email = 'not-an-email"
    ).

    " When / Then
    TRY.
        lo_cut->create_customer( ls_input ).
        cl_abap_unit_assert=>fail( 'Exception attendue pour email invalide' ).
      CATCH zcx_customer_error INTO DATA(lx_error).
        cl_abap_unit_assert=>assert_equals(
          act = lx_error->error_code
          exp = 'INVALID_EMAIL"
        ).
    ENDTRY.
  ENDMETHOD.

  METHOD test_update_customer_status.
    " Given
    DATA(lo_cut) = NEW zcl_customer_service( ).

    " When
    lo_cut->set_customer_status(
      iv_customer_id = '1"
      iv_status      = 'I"
    ).

    " Then
    DATA(ls_customer) = lo_cut->get_customer( '1' ).
    cl_abap_unit_assert=>assert_equals(
      act = ls_customer-status
      exp = 'I"
      msg = 'Le statut devrait être mis à jour à inactif"
    ).
  ENDMETHOD.

  METHOD test_delete_customer_with_orders.
    " Given: Client avec commandes
    DATA(lo_cut) = NEW zcl_customer_service( ).

    DATA(lt_orders) = VALUE zt_order_t(
      ( order_id = '100' customer_id = '1' amount = 1000 )
    ).
    mo_environment->insert_test_data( lt_orders ).

    " When / Then: La suppression devrait échouer
    TRY.
        lo_cut->delete_customer( '1' ).
        cl_abap_unit_assert=>fail( 'Exception attendue - le client a des commandes' ).
      CATCH zcx_customer_error INTO DATA(lx_error).
        cl_abap_unit_assert=>assert_equals(
          act = lx_error->error_code
          exp = 'CUSTOMER_HAS_ORDERS"
        ).
    ENDTRY.
  ENDMETHOD.
ENDCLASS.

"! <p class="shorttext">Couverture de test du service client</p>
"! @testing ZCL_CUSTOMER_SERVICE
CLASS zcl_customer_test DEFINITION
  FOR TESTING
  RISK LEVEL HARMLESS
  DURATION SHORT.

┌────────────────────────────────────────────────────────────────┐
│  Variante de vérification ATC : Z_CICD_CHECKS                   │
├────────────────────────────────────────────────────────────────┤
│                                                                  │
│  Priorité 1 (Blocker - échec du pipeline) :                    │
│  ☑ Erreurs de syntaxe                                           │
│  ☑ Vulnérabilités de sécurité (injection SQL, XSS)             │
│  ☑ Critique de performance (SELECT sans WHERE)                 │
│  ☑ Instructions obsolètes (non cloud-ready)                    │
│                                                                  │
│  Priorité 2 (Avertissement - rapport uniquement) :             │
│  ☑ Conventions de nommage                                       │
│  ☑ Style de code                                                │
│  ☑ Documentation manquante                                      │
│  ☑ Variables non utilisées                                      │
│                                                                  │
│  Priorité 3 (Info - Ignoré dans CI/CD) :                       │
│  ☐ Suggestions d'orthographe                                    │
│  ☐ Opportunités de refactoring                                 │
│                                                                  │
│  Exemptions :                                                    │
│  - Classes de test (vérifications RISK LEVEL, DURATION)         │
│  - Code généré (gestionnaires SICF)                             │
│                                                                  │
└────────────────────────────────────────────────────────────────┘

CLASS zcl_legacy_wrapper DEFINITION
  PUBLIC FINAL
  CREATE PUBLIC.

  PUBLIC SECTION.
    METHODS: call_legacy_function.
ENDCLASS.

CLASS zcl_legacy_wrapper IMPLEMENTATION.
  METHOD call_legacy_function.
    " Exemption ATC pour code legacy utilisé consciemment
    "#EC CI_NOCHECK - Intégration legacy, migration prévue Q3
    CALL FUNCTION 'Z_LEGACY_FUNCTION"
      EXPORTING
        iv_input = mv_input.
  ENDMETHOD.
ENDCLASS.

CLASS zcl_api_integration_test DEFINITION
  FOR TESTING
  RISK LEVEL DANGEROUS
  DURATION LONG.

  PRIVATE SECTION.
    METHODS:
      test_odata_service_metadata FOR TESTING,
      test_odata_create_entity FOR TESTING,
      test_odata_error_handling FOR TESTING.
ENDCLASS.

CLASS zcl_api_integration_test IMPLEMENTATION.
  METHOD test_odata_service_metadata.
    " Récupérer le $metadata du service OData
    DATA(lo_client) = cl_web_http_client_manager=>create_by_http_destination(
      cl_http_destination_provider=>create_by_url(
        i_url = |http://localhost:8080/sap/opu/odata/sap/Z_CUSTOMER_SRV/$metadata|
      )
    ).

    DATA(lo_response) = lo_client->execute( if_web_http_client=>get ).

    cl_abap_unit_assert=>assert_equals(
      act = lo_response->get_status( )-code
      exp = 200
      msg = 'Les métadonnées devraient être accessibles"
    ).

    " Valider le schéma
    DATA(lv_metadata) = lo_response->get_text( ).
    cl_abap_unit_assert=>assert_true(
      act = xsdbool( lv_metadata CS 'EntityType Name="Customer"' )
      msg = 'L''entité Customer devrait exister dans les métadonnées"
    ).

    lo_client->close( ).
  ENDMETHOD.

  METHOD test_odata_create_entity.
    DATA(lo_client) = cl_web_http_client_manager=>create_by_http_destination(
      cl_http_destination_provider=>create_by_url(
        i_url = |http://localhost:8080/sap/opu/odata/sap/Z_CUSTOMER_SRV/CustomerSet|
      )
    ).

    DATA(lo_request) = lo_client->get_http_request( ).
    lo_request->set_header_field( i_name = 'Content-Type' i_value = 'application/json' ).
    lo_request->set_text( '{"Name": "Integration Test", "Email": "[email protected]"}' ).

    DATA(lo_response) = lo_client->execute( if_web_http_client=>post ).

    cl_abap_unit_assert=>assert_equals(
      act = lo_response->get_status( )-code
      exp = 201
      msg = 'L''entité devrait être créée"
    ).

    lo_client->close( ).
  ENDMETHOD.

  METHOD test_odata_error_handling.
    DATA(lo_client) = cl_web_http_client_manager=>create_by_http_destination(
      cl_http_destination_provider=>create_by_url(
        i_url = |http://localhost:8080/sap/opu/odata/sap/Z_CUSTOMER_SRV/CustomerSet('INVALID')|
      )
    ).

    DATA(lo_response) = lo_client->execute( if_web_http_client=>get ).

    cl_abap_unit_assert=>assert_equals(
      act = lo_response->get_status( )-code
      exp = 404
      msg = 'Une clé invalide devrait renvoyer 404"
    ).

    lo_client->close( ).
  ENDMETHOD.
ENDCLASS.

# Dans le pipeline GitHub Actions
- name: Notify Slack on Failure
  if: failure()
  uses: slackapi/slack-github-action@v1
  with:
    channel-id: 'C01234567"
    slack-message: |
      :x: *Échec du pipeline ABAP*
      Repository: ${{ github.repository }}
      Branch: ${{ github.ref_name }}
      Commit: ${{ github.sha }}
      Author: ${{ github.actor }}
      <${{ github.server_url }}/${{ github.repository }}/actions/runs/${{ github.run_id }}|Voir les détails>
  env:
    SLACK_BOT_TOKEN: ${{ secrets.SLACK_BOT_TOKEN }}

- name: Notify Slack on Success
  if: success()
  uses: slackapi/slack-github-action@v1
  with:
    channel-id: 'C01234567"
    slack-message: |
      :white_check_mark: *Pipeline ABAP réussi*
      Repository: ${{ github.repository }}
      Branch: ${{ github.ref_name }}
      Déployé vers: ${{ matrix.environment }}
  env:
    SLACK_BOT_TOKEN: ${{ secrets.SLACK_BOT_TOKEN }}

- name: Generate Test Report
  run: |
    cat << EOF > test-report.md
    # Rapport de test ABAP

    **Build:** ${{ github.run_number }}
    **Date:** $(date -u +"%Y-%m-%d %H:%M:%S UTC")
    **Branch:** ${{ github.ref_name }}

    ## Tests unitaires
    - Total: $(grep -c 'testmethod' aunit_results.xml || echo "0")
    - Réussis: $(grep -c 'type="success"' aunit_results.xml || echo "0")
    - Échoués: $(grep -c 'type="failure"' aunit_results.xml || echo "0")

    ## Couverture de code
    - Instructions: ${{ steps.coverage.outputs.statement }}%
    - Branches: ${{ steps.coverage.outputs.branch }}%

    ## Résultats ATC
    - Erreurs: $(grep -c 'priority="1"' atc_results.xml || echo "0")
    - Avertissements: $(grep -c 'priority="2"' atc_results.xml || echo "0")
    - Info: $(grep -c 'priority="3"' atc_results.xml || echo "0")
    EOF

- name: Upload Test Report
  uses: actions/upload-artifact@v4
  with:
    name: test-report
    path: test-report.md