36 lines
941 B
ABAP
36 lines
941 B
ABAP
INTERFACE {{p}}if_log_plan PUBLIC.
|
|
TYPES:
|
|
ty_reason TYPE c LENGTH 10,
|
|
ty_count TYPE i,
|
|
BEGIN OF ty_log,
|
|
dia TYPE i,
|
|
len TYPE i,
|
|
END OF ty_log,
|
|
BEGIN OF ty_board,
|
|
thick TYPE i,
|
|
width TYPE i,
|
|
END OF ty_board.
|
|
|
|
CONSTANTS:
|
|
BEGIN OF c_reason,
|
|
ok TYPE ty_reason VALUE 'OK',
|
|
size TYPE ty_reason VALUE 'SIZE',
|
|
thick TYPE ty_reason VALUE 'THICK',
|
|
width TYPE ty_reason VALUE 'WIDTH',
|
|
len TYPE ty_reason VALUE 'LEN',
|
|
END OF c_reason,
|
|
c_min_thick TYPE i VALUE 20,
|
|
c_max_thick TYPE i VALUE 100,
|
|
c_min_len TYPE i VALUE 100.
|
|
|
|
METHODS check
|
|
IMPORTING is_log TYPE ty_log
|
|
is_board TYPE ty_board
|
|
RETURNING VALUE(rv_reason) TYPE ty_reason.
|
|
|
|
METHODS board_count
|
|
IMPORTING is_log TYPE ty_log
|
|
is_board TYPE ty_board
|
|
RETURNING VALUE(rv_count) TYPE ty_count.
|
|
ENDINTERFACE.
|