-
Notifications
You must be signed in to change notification settings - Fork 0
/
AddMessageToGlobalMessageContainer
49 lines (40 loc) · 1.47 KB
/
AddMessageToGlobalMessageContainer
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
TRY.
cl_crm_uiu_bp_tools=>set_entity_2_check(
EXPORTING
ir_entity = me->typed_context->builidnumber->collection_wrapper->get_current( )
iv_field = ''
).
CATCH cx_root.
ENDTRY.
CALL METHOD super->do_finish_input
EXPORTING
global_event = global_event
global_messages = global_messages.
check_doc_field(
IMPORTING
et_messages = DATA(lt_messages) " Сообщения об ошибках
).
LOOP AT lt_messages ASSIGNING FIELD-SYMBOL(<msg>) WHERE type CA 'EAX'.
global_messages->add_message2(
EXPORTING
condition = co_mandatory_field_empty
message = <msg>-message
messagetype = 'E'
p1 = CONV string( <msg>-message_v1 )
p2 = CONV string( <msg>-message_v2 )
p3 = CONV string( <msg>-message_v3 )
p4 = CONV string( <msg>-message_v4 )
).
ENDLOOP.
LOOP AT lt_messages ASSIGNING FIELD-SYMBOL(<msg_w>) WHERE type CA 'W'.
global_messages->add_message2(
EXPORTING
condition = co_mandatory_field_empty
message = <msg_w>-message
messagetype = 'W'
p1 = CONV string( <msg_w>-message_v1 )
p2 = CONV string( <msg_w>-message_v2 )
p3 = CONV string( <msg_w>-message_v3 )
p4 = CONV string( <msg_w>-message_v4 )
).
ENDLOOP.