23 lines
556 B
ABAP
23 lines
556 B
ABAP
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.
|