CLASS {{p}}cx_care_visit DEFINITION PUBLIC INHERITING FROM cx_static_check FINAL CREATE PUBLIC.
  PUBLIC SECTION.
    TYPES ty_reason TYPE c LENGTH 20.

    DATA mv_reason   TYPE ty_reason READ-ONLY.
    DATA mv_visit_id TYPE string READ-ONLY.

    METHODS constructor
      IMPORTING iv_reason   TYPE ty_reason
                iv_visit_id TYPE string.

  PRIVATE SECTION.
ENDCLASS.


CLASS {{p}}cx_care_visit IMPLEMENTATION.
  METHOD constructor.
    super->constructor( ).
    mv_reason = iv_reason.
    mv_visit_id = iv_visit_id.
  ENDMETHOD.
ENDCLASS.