Dump in UM4_UPDATE_WORKLIST MESSAGE_TYPE_X in Method GET_SETTINGS
Hi all,
I'm stuck in an unicode preparation, I get a dump at update Worklist in method GET_SETTINGS of Main program
Termination occurred in the ABAP program "CL_UMG_UTILITIES==============CP" -
in "GET_SETTINGS".
The main program was "UM4_UPDATE_WORKLIST ".
In the source code you have the termination point in line 11
of the (Include) program "CL_UMG_UTILITIES==============CM00E".
The program "CL_UMG_UTILITIES==============CP" was started as a background job.
Job Name....... "UM4_PMIG_STOCK_UPDATE1"
none of the notes that I've found helped me, anyone with an clue?
the error is at:
1 method get_settings.
2
3 data: l_settings_tab type umgtsettings,
4 l_num type i.
5
6 select * from umgsettings
7 into table l_settings_tab.
8 if sy-subrc <> 0.
9 if cl_abap_char_utilities=>charsize = 1.
10 * Non Unicode Systems
>>>> message x069(pumg). " short dump if settings were not found
12 else.
13 * In Unicode Systems look in UMGHISTORY
14 call method cl_umg_history=>get
15 importing
16 ex_new_spumg_settings = l_settings_tab.
17 describe table l_settings_tab lines l_num.
18 if l_num = 0.
19 re_settings = cl_umg_utilities=>get_default_settings( ).
20 return.
21 endif.
22 endif.
23 endif.
In SPUMG I could not edit settings because language list is not defined, it is empty and even after restart and reset SPUMG it remains empty, in RSCPINSTall system languages are activated....
any idea is welcome..
best regards,
Pedro Rodrigues
Hi Pedro,
do you get the entrance screen of SPUMG with the according push buttons (after executing Scanner > Restart) ?
In the Guide you will find:
The last pushbutton Continue with transaction SPUMG will trigger the automatical initialization of the Language List and lead to the Consistency Check screen.
After you have done that, the language list should be available.
Best regards,
Nils
Similar Messages
-
How to dump array created by 'getrows method' into spreadsheet??
hi,
I'm sorry but I'm not goot as English.
I'm trying to dump oo4o dynasets into farpoint spreadsheet without looping.
first, I created the array of variant type through the 'getrows' method of oo4o.
the 'getrows' method copies records from a Dynaset into a two-dimensional array. The first subscript identifies the field and the second identifies the row number.
Then I found the method 'setarray' of spreadsheet but this method dumps a array into spread
beginning with the row number. In result the spreadsheet views the recordset that the rows
and the columns are exchanged.
Please, Advice about my trying.MESSAGE FROM THE FORUMS ADMINISTRATORS and COMMUNITY
This thread will be deleted_ within 24 business hours. You have posted
an off-topic question in an area clearly designated for discussions
about the features and functionality of the forums site. Community
members looking to help you with your question won't be able to find
it in this category.
Please use the "Search Forums" element on the left panel to locate
a forum based on your topic. A more appropriate forum for this post
could be:
New to Java http://forum.java.sun.com/forum.jspa?forumID=54 -
Short dumps of CL_PERS_OBJECT_DATA using Set_data method
Hi Experts,
I am getting shortdumps on the class CL_PERS_OBJECT_DATA when calling set_data method.
The error message is OBJECTS_OBJREF_NOT_ASSIGNED . There is one export parameter which of data type of "any" and mandantory.
The details of the code as follows:
data: rf_pers_object type ref to cl_pers_object_data.
types:
ty_spers_obj type spers_obj.
data: lta_personalization type table of ty_spers_obj.
call method rf_pers_object->set_data
exporting
p_pers_data = lta_personalization
p_write_through = space
exceptions
data_type_error = 1
internal_error = 2
others = 3.
if sy-subrc <> 0.
raise pers_object_error.
endif.
Could you please what exactly this means where i am missing the point.
Any adivse early is much appreciated.
Best Regards
Good_GuyThis object must be instantiated first in order you can call its instance methods.
As it has private instantiation you are able to do so only be means of create_object static method, giving the key on the input. Then you use the returned instance for further processing. This goes like
DATA: rf_pers_object TYPE REF TO cl_pers_object_data.
TYPES:
ty_spers_obj TYPE spers_obj.
DATA: pers_key TYPE spers_key.
DATA: lta_personalization TYPE TABLE OF ty_spers_obj.
"first extract the key, I took first found
SELECT SINGLE pers_key FROM spers_regt
INTO pers_key
WHERE lang = 'EN'.
CHECK sy-subrc = 0.
"then create the object
CALL METHOD cl_pers_object_data=>create_object
EXPORTING
p_pers_key = pers_key
RECEIVING
r_object = rf_pers_object. "and receive the object instance
"now call the instance method
CALL METHOD rf_pers_object->set_data
EXPORTING
p_pers_data = lta_personalization
p_write_through = space
EXCEPTIONS
data_type_error = 1
internal_error = 2
OTHERS = 3.
Of course the pers_key must be provided by you. I assume you know one you want to use.
Regards
Marcin
Also refer standard program R_USER_DEFAULTS .
Edited by: Marcin Pciak on Jun 25, 2010 9:35 AM -
Dump while accessing Menu- User menu MESSAGE_TYPE_X
In the SAP initial screen under the user menu(Menu->User menu->General user transactions), when I am having a big number of tree sturcture under a specific folder like under 'General user transactions', I am getting dump with message MESSAGE_TYPE_X, AC_SYSTEM_FLUSH. This is happening, when lots of transactions are attached under any folder like 'General user transactions'. How to solve this. I am getting error in ECC6.0
Hi Sanjay,
1. reduce the number of transactions in one folder. Create more folders.
2. Ask your basis if it is because of memory issue?
3. Check in OSS if there is any specific note on the restrictions on the number of entries in the folder.
Regards,
Atish -
Dump when summing up CURR field in ALV GRID display
Hi All,
I am getting dump when I try to sum the CURR field in my ALV Grid Display. The field is of CURR 23. I am using classes and methods to display alv grid.
I tried passing <fs_fieldcat>-do_sum = 'X'. When I did this, it is dumping without even displaying the alv grid.
Here is the part it is throwing dump:
ls_lvc_data-value = space.
clear ls_lvc_data-style.
loop at it_fcat_local assigning <ls_fcat>
where tech ne 'X' and no_out ne 'X'.
if l_invisible eq 'X'.
clear l_invisible.
if <ls_fcat>-do_sum is initial.
continue.
else.
clear ls_lvc_data-col_pos.
endif.
endif.
add 1 to ls_lvc_data-col_pos.
assign component <ls_fcat>-fieldname
of structure <ls_data> to <l_field_value>.
_if sy-subrc ne 0.
message x000(0k).
endif._
Regards,
GuruThomas,
Here is the dump:
Runtime Errors MESSAGE_TYPE_X
Date and Time 10/22/2010 23:30:53
Short text
The current application triggered a termination with a short dump.
What happened?
The current application program detected a situation which really
should not occur. Therefore, a termination with a short dump was
triggered on purpose by the key word MESSAGE (type X).
Error analysis
Short text of error message:
Long text of error message:
Technical information about the message:
Message class....... "0K"
Number.............. 000
Variable 1.......... " "
Variable 2.......... " "
Variable 3.......... " "
Variable 4.......... " "
How to correct the error
Probably the only way to eliminate the error is to correct the program.
If the error occures in a non-modified SAP program, you may be able to
find an interim solution in an SAP Note.
If you have access to SAP Notes, carry out a search with the following
keywords:
"MESSAGE_TYPE_X" " "
"SAPLSLVC" or "LSLVCF36"
"FILL_DATA_TABLE"
If you cannot solve the problem yourself and want to send an error
notification to SAP, include the following information:
1. The description of the current problem (short dump)
To save the description, choose "System->List->Save->Local File
(Unconverted)".
2. Corresponding system log
Display the system log by calling transaction SM21.
Restrict the time interval to 10 minutes before and five minutes
after the short dump. Then choose "System->List->Save->Local File
(Unconverted)".
3. If the problem occurs in a problem of your own or a modified SAP
program: The source code of the program
In the editor, choose "Utilities->More
Utilities->Upload/Download->Download".
4. Details about the conditions under which the error occurred or which
actions and input led to the error.
Source Code Extract
Line
SourceCde
2708
is_subtottxt_info = ls_subtot_info
2709
ip_subtot_line = lr_data
2710
changing
2711
c_subtottxt = l_subtottxt.
2712
ls_lvc_data-value = l_subtottxt.
2713
2714
append ls_lvc_data to ct_lvc_data.
2715
endif.
2716
2717
2718
Column per Fieldcat Entry
2719
2720
ls_lvc_data-value = space.
2721
clear ls_lvc_data-style.
2722
loop at it_fcat_local assigning <ls_fcat>
2723
where tech ne 'X' and no_out ne 'X'.
2724
if l_invisible eq 'X'.
2725
clear l_invisible.
2726
if <ls_fcat>-do_sum is initial.
2727
continue.
2728
else.
2729
clear ls_lvc_data-col_pos.
2730
endif.
2731
endif.
2732
2733
add 1 to ls_lvc_data-col_pos.
2734
2735
assign component <ls_fcat>-fieldname
2736
of structure <ls_data> to <l_field_value>.
2737
if sy-subrc ne 0.
>>>>>
message x000(0k).
2739
endif.
2740
2741
*... work on average
2742
if <ls_fcat>-do_sum eq 'C'.
2743
Initialize average result and entries
2744
<l_field_value> = 0.
2745
clear l_entries.
2746
2747
retrive unit from fieldcatalog
2748
assign space to <l_unit>.
2749
if not <ls_fcat>-cfieldname is initial.
2750
assign component <ls_fcat>-cfieldname
2751
of structure <ls_data> to <l_unit>.
2752
endif.
2753
if not <ls_fcat>-qfieldname is initial.
2754
assign component <ls_fcat>-qfieldname
2755
of structure <ls_data> to <l_unit>.
2756
endif.
2757 -
Short dump while client export
Hi,
I am trying to export a client from BI test system, I am getting the below message:
InfoProvider ZSEBCST02 has been changed in the meantime
Message no. UCM0142
Diagnosis
InfoProvider ZSEBCST02 is used in data basis QinetiQ Data Basis Management as the data target of data stream Totals Records. The InfoProvider has been changed since you last saved the data basis. Therefore, the definition of the data model of data basis QinetiQ Data Basis Management is now based on the state of the InfoProvider before it was last changed and may be obsolete.
System Response
The saved version of data basis QinetiQ Data Basis Management will remain active for now.
Procedure
Check the data model of data basis QinetiQ Data Basis Management as to whether adjustments need to be made to the changed definition of InfoProvider ZSEBCST02.
Save data basis QinetiQ Data Basis Management.
The client export process does not start and it throws a short dump:
Runtime Errors MESSAGE_TYPE_X
Date and Time 01.08.2008 11:05:02
Short text
The current application triggered a termination with a short dump.
What happened?
The current application program detected a situation which really
should not occur. Therefore, a termination with a short dump was
triggered on purpose by the key word MESSAGE (type X).
What can you do?
Note down which actions and inputs caused the error.
To process the problem further, contact you SAP system
administrator.
Using Transaction ST22 for ABAP Dump Analysis, you can look
at and manage termination messages, and you can also
keep them for a long time.
Error analysis
Short text of error message:
Program error(s)
Long text of error message:
Diagnosis
A program error occurred.
System Response
Processing terminated
Procedure
Please notify SAP.
Procedure for System Administration
Technical information about the message:
Message class....... "UGMD"
Number.............. 000
Variable 1.......... " "
Variable 2.......... " "
Variable 3.......... " "
Variable 4.......... " "
How to correct the error
Probably the only way to eliminate the error is to correct the program.
If the error occures in a non-modified SAP program, you may be able to
find an interim solution in an SAP Note.
If you have access to SAP Notes, carry out a search with the following
keywords:
"MESSAGE_TYPE_X" " "
"CL_UG_MD_STORAGE_CHAR_LOCAL===CP" or "CL_UG_MD_STORAGE_CHAR_LOCAL===CM00N"
"IF_UG_MD_STORAGE_CHAR~TRANSPORT_BY_SEL"
If you cannot solve the problem yourself and want to send an error
notification to SAP, include the following information:
1. The description of the current problem (short dump)
To save the description, choose "System->List->Save->Local File
(Unconverted)".
2. Corresponding system log
Display the system log by calling transaction SM21.
Restrict the time interval to 10 minutes before and five minutes
after the short dump. Then choose "System->List->Save->Local File
(Unconverted)".
3. If the problem occurs in a problem of your own or a modified SAP
program: The source code of the program
In the editor, choose "Utilities->More
Utilities->Upload/Download->Download".
4. Details about the conditions under which the error occurred or which
actions and input led to the error.
System environment
SAP-Release 700
Application server... "SFRNDEVSAP09"
Network address...... "10.0.32.38"
Operating system..... "Windows NT"
Release.............. "5.2"
Hardware type........ "8x AMD64 Level"
Character length.... 16 Bits
Pointer length....... 64 Bits
Work process number.. 0
Shortdump setting.... "full"
Database server... "SFRNDEVSAP09"
Database type..... "ORACLE"
Database name..... "BI1"
Database user ID.. "SAPSR3"
Char.set.... "C"
SAP kernel....... 700
created (date)... "Feb 4 2008 00:38:16"
create on........ "NT 5.2 3790 Service Pack 1 x86 MS VC++ 14.00"
Database version. "OCI_10201_SHARE (10.2.0.1.0) "
Patch level. 146
Patch text.. " "
Database............. "ORACLE 9.2.0.., ORACLE 10.1.0.., ORACLE 10.2.0.."
SAP database version. 700
Operating system..... "Windows NT 5.0, Windows NT 5.1, Windows NT 5.2, Windows
NT 6.0"
Memory consumption
Roll.... 16192
EM...... 67037440
Heap.... 0
Page.... 24576
MM Used. 58875536
MM Free. 3966304
User and Transaction
Client.............. 100
User................ "SUPERUSER"
Language key........ "E"
Transaction......... "SCC8 "
Transactions ID..... "44B15FDD2C31F115B69C00151736FC1B"
Program............. "CL_UG_MD_STORAGE_CHAR_LOCAL===CP"
Screen.............. "SAPMSCC1 0121"
Screen line......... 15
Information on where terminated
Termination occurred in the ABAP program "CL_UG_MD_STORAGE_CHAR_LOCAL===CP" -
in "IF_UG_MD_STORAGE_CHAR~TRANSPORT_BY_SEL".
The main program was "SAPMSCC1 ".
In the source code you have the termination point in line 491
of the (Include) program "CL_UG_MD_STORAGE_CHAR_LOCAL===CM00N".
Source Code Extract
Line
SourceCde
461
APPEND ls_idx_sel TO lt_idx_sel.
462
ENDIF.
463
464
ENDLOOP.
465
466
set initial combination
467
LOOP AT lt_idx_sel ASSIGNING <ls_idx_sel>.
468
READ TABLE <ls_idx_sel>-t_idx INTO ld_idx_sel INDEX 1.
469
READ TABLE lt_sel ASSIGNING <ls_sel> INDEX ld_idx_sel.
470
READ TABLE lt_key INTO ls_key
471
WITH TABLE KEY fieldname = <ls_sel>-fieldname.
472
ASSIGN COMPONENT <ls_sel>-fieldname
473
OF STRUCTURE <ls_data>
474
TO <data>.
475
<data> = <ls_sel>-low.
476
ENDLOOP.
477
478
lf_found = abap_true.
479
WHILE lf_found = abap_true.
480
481
create entry for current key selection combination
482
TRY.
483
cl_finb_tr_tabu_tabkey=>create_c(
484
EXPORTING i_tabname = ld_tabname
485
i_key = <ls_data>
486
i_keyfields_filled = ld_keyfields_filled
487
i_keymode = ld_keymode
488
IMPORTING e_tabkey = ls_transport-tabkey ).
489
CATCH cx_root .
490
CATCH cx_finb_tr. "N875173
>>>>>
MESSAGE x000(ugmd). ">>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
492
CATCH cx_sy_dyn_call_error. "N875173
493
MESSAGE x000(ugmd). ">>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
494
ENDTRY.
495
496
INSERT ls_transport INTO TABLE et_transport.
497
498
proceed to next combination
499
CLEAR: lf_found,
500
ld_count.
501
502
WHILE lf_found IS INITIAL.
503
504
ADD 1 TO ld_count.
505
READ TABLE lt_idx_sel ASSIGNING <ls_idx_sel> INDEX ld_count.
506
IF sy-subrc IS NOT INITIAL.
507
EXIT.
508
ENDIF.
509
510
READ TABLE lt_key INTO ls_key
Contents of system fields
Name
Val.
SY-SUBRC
0
SY-INDEX
1
SY-TABIX
2
SY-DBCNT
2
SY-FDPOS
0
SY-LSIND
0
SY-PAGNO
1
SY-LINNO
1
SY-COLNO
1
SY-PFKEY
121_C
SY-UCOMM
DBAC
SY-TITLE
Client Export
SY-MSGTY
X
SY-MSGID
UGMD
SY-MSGNO
000
SY-MSGV1
SY-MSGV2
SY-MSGV3
SY-MSGV4
SY-MODNO
1
SY-DATUM
20080801
SY-UZEIT
110457
SY-XPROG
SAPLSYST
SY-XFORM
SYSTEM_HOOK_OPEN_DATASET
Active Calls/Events
No. Ty. Program Include Line
Name
14 METHOD CL_UG_MD_STORAGE_CHAR_LOCAL===CP CL_UG_MD_STORAGE_CHAR_LOCAL===CM00N 491
CL_UG_MD_STORAGE_CHAR_LOCAL=>IF_UG_MD_STORAGE_CHAR~TRANSPORT_BY_SEL
13 METHOD CL_UG_MD_DISPATCHER_CHAR======CP CL_UG_MD_DISPATCHER_CHAR======CM00J 6
CL_UG_MD_DISPATCHER_CHAR=>IF_UG_MD_CHAR_INTERNAL~TRANSPORT_BY_SEL
12 METHOD CL_UG_MD_BUFFER_CHAR==========CP CL_UG_MD_BUFFER_CHAR==========CM00F 3
CL_UG_MD_BUFFER_CHAR=>IF_UG_MD_CHAR_INTERNAL~TRANSPORT_BY_SEL
11 METHOD CL_UG_MD_CHAR=================CP CL_UG_MD_CHAR=================CM01M 59
CL_UG_MD_CHAR=>IF_UG_MD_MANUAL_TRANSPORT~TRANSPORT_BY_SEL
10 METHOD CL_UC_MD_CHAR=================CP CL_UC_MD_CHAR=================CM00J 53
CL_UC_MD_CHAR=>IF_UG_MD_MANUAL_TRANSPORT~TRANSPORT_BY_SEL
9 METHOD CL_UG_MD_TR_CLIENTCOPY========CP CL_UG_MD_TR_CLIENTCOPY========CM006 84
CL_UG_MD_TR_CLIENTCOPY=>COLLECT_FIELDNAME_CONTENT
8 METHOD CL_UG_MD_TR_CLIENTCOPY========CP CL_UG_MD_TR_CLIENTCOPY========CM001 41
CL_UG_MD_TR_CLIENTCOPY=>IF_FINB_TR_METHOD_CLIENTCOPY~CC_COLLECT_OBJECTS
7 METHOD CL_FINB_TR_OBJECT_BASE========CP CL_FINB_TR_OBJECT_BASE========CM00M 17
CL_FINB_TR_OBJECT_BASE=>IF_FINB_TR_OBJECT_CC~CC_COLLECT_OBJECTS
6 FUNCTION SAPLFINB_TR_CC LFINB_TR_CCU02 83
FINB_TR_CC_EXIT_ANALYZE
5 FORM SAPLFINB_TR_CC LFINB_TR_CCF01 688
CC_ANALYZE_CLIENT_LOCAL
4 FUNCTION SAPLFINB_TR_CC LFINB_TR_CCU01 196
FINB_TR_CC_EXIT
3 FORM SAPLSCCR LSCCRF2K 293
RUN_EXITS
2 FUNCTION SAPLSCCR LSCCRU06 1087
SCCR_PERFORM_CLIENT_COPY
1 MODULE (PAI) SAPMSCC1 MSCC1I03 482
CHECK_MODE
Chosen variables
Name
Val.
No. 14 Ty. METHOD
Name CL_UG_MD_STORAGE_CHAR_LOCAL=>IF_UG_MD_STORAGE_CHAR~TRANSPORT_BY_SEL
IT_SEL
Table[initial]
IF_COMPLETE
2
0
0
0
IF_USE_MASK
X
5
8
0
0
IF_TEXT_ONLY
2
0
0
0
ET_TRANSPORT
Table[initial]
ET_TRANSPORT_SEL
Table[initial]
LD_TABNAME
T100A
533342222222222222222222222222
410010000000000000000000000000
000000000000000000000000000000
000000000000000000000000000000
<LS_DATA>
00000000000000
2222222222222222222222222222222222222222222222222333333333333332222222222222222222222222222222
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
LD_KEYFIELDS_FILLED
01
33
01
00
00
LD_KEYMODE
G
4
7
0
0
LS_TRANSPORT-TABKEY
00000000000000
2222222222222222222222222222222222222222222222222333333333333332222222222222222222222222222222
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
%_DUMMY$$
2222
0000
0000
0000
CL_ABAP_TABLEDESCR=>TABLEKIND_STD
S
5
3
0
0
%_PRINT
000 0###
2222333222222222222222222222222222222222222222222222222222222222222222222222222222222222223000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
%_ARCHIVE
2222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
SY-REPID
CL_UG_MD_STORAGE_CHAR_LOCAL===CP
4455454455545444544455444443334522222222
3CF57FD4F34F2175F3812FCF31CDDD3000000000
0000000000000000000000000000000000000000
0000000000000000000000000000000000000000
SY-MSGID
UGMD
54442222222222222222
57D40000000000000000
00000000000000000000
00000000000000000000
SPACE
2
0
0
0
SY-MSGNO
000
333
000
000
000
SY-MSGV1
22222222222222222222222222222222222222222222222222
00000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000
SY-MSGV2
22222222222222222222222222222222222222222222222222
00000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000
SY-MSGV3
22222222222222222222222222222222222222222222222222
00000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000
SY-MSGV4
22222222222222222222222222222222222222222222222222
00000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000
SY-XPROG
SAPLSYST
5454555522222222222222222222222222222222
310C393400000000000000000000000000000000
0000000000000000000000000000000000000000
0000000000000000000000000000000000000000
No. 13 Ty. METHOD
Name CL_UG_MD_DISPATCHER_CHAR=>IF_UG_MD_CHAR_INTERNAL~TRANSPORT_BY_SEL
IT_SEL
Table[initial]
IF_COMPLETE
2
0
0
0
IF_USE_MASK
X
5
8
0
0
IF_TEXT_ONLY
2
0
0
0
ET_TRANSPORT
Table[initial]
ET_TRANSPORT_SEL
Table[initial]
%_SPACE
2
0
0
0
SY-REPID
CL_UG_MD_DISPATCHER_CHAR======CP
4455454454455454445544453333334522222222
3CF57FD4F4930143852F3812DDDDDD3000000000
0000000000000000000000000000000000000000
0000000000000000000000000000000000000000
ME
|
| 3000C000 |
| E0001C00 |
| %_DUMMY$$ |
| |
| 2222 |
| 0000 |
| 0000 |
| 0000 |
| ME->DO_LOCAL |
|
3000C000
F0000C00
%_PRINT
000 0###
2222333222222222222222222222222222222222222222222222222222222222222222222222222222222222223000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
No. 12 Ty. METHOD
Name CL_UG_MD_BUFFER_CHAR=>IF_UG_MD_CHAR_INTERNAL~TRANSPORT_BY_SEL
IT_SEL
Table[initial]
IF_COMPLETE
2
0
0
0
IF_USE_MASK
X
5
8
0
0
IF_TEXT_ONLY
2
0
0
0
ET_TRANSPORT
Table[initial]
ET_TRANSPORT_SEL
Table[initial]
%_SPACE
2
0
0
0
SY-REPID
CL_UG_MD_BUFFER_CHAR==========CP
4455454454544455444533333333334522222222
3CF57FD4F256652F3812DDDDDDDDDD3000000000
0000000000000000000000000000000000000000
0000000000000000000000000000000000000000
SCREEN
%_AUTOTEXT003
2545545455333222222222222222222222222222222222222222222222222222222222222222222222222222222222
5F154F4584003000000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
%_DUMMY$$
2222
0000
0000
0000
No. 11 Ty. METHOD
Name CL_UG_MD_CHAR=>IF_UG_MD_MANUAL_TRANSPORT~TRANSPORT_BY_SEL
IT_SEL
Table[initial]
IF_COMPLETE
2
0
0
0
IF_USE_MASK
X
5
8
0
0
IF_TEXT_ONLY
2
0
0
0
ET_TRANSPORT
Table IT_111628[0x404]
CLASS=CL_UG_MD_TR_CLIENTCOPYMETHOD=COLLECT_FIELDNAME_CONTENTDATA=LT_TRANSPORT
Table reference: 13198
TABH+ 0(20) = 007B9174FE07000000E9F174FE07000000000000
TABH+ 20(20) = 8E3300000CB401000000000094010000FFFFFFFF
TABH+ 40(16) = 04E801000017000010000000A2278001
store = 0x007B9174FE070000
ext1 = 0x00E9F174FE070000
shmId = 0 (0x00000000)
id = 13198 (0x8E330000)
label = 111628 (0x0CB40100)
fill = 0 (0x00000000)
leng = 404 (0x94010000)
loop = -1 (0xFFFFFFFF)
xtyp = TYPE#000108
occu = 16 (0x10000000)
access = 2 (ItAccessSorted)
idxKind = 0 (ItIndexNone)
uniKind = 1 (ItUnique)
keyKind = 3 (user defined)
cmpMode = 3 (cmpSingleMcmpU)
occu0 = 1
groupCntl = 0
rfc = 0
unShareable = 0
mightBeShared = 0
sharedWithShmTab = 0
isShmLockId = 0
gcKind = 0
isUsed = 1
isCtfyAble = 1
>>>>> Shareable Table Header Data <<<<<
tabi = 0xA0FBAD74FE070000
pgHook = 0x0000000000000000
idxPtr = 0x0000000000000000
shmTabhSet = 0x0000000000000000
id = 48249 (0x79BC0000)
refCount = 0 (0x00000000)
tstRefCount = 0 (0x00000000)
lineAdmin = 16 (0x10000000)
lineAlloc = 16 (0x10000000)
shmVersId = 0 (0x00000000)
shmRefCount = 1 (0x01000000)
>>>>> 1st level extension part <<<<<
regHook = 0x0000000000000000
collHook = 0x0000000000000000
ext2 = 0x0000000000000000
>>>>> 2nd level extension part <<<<<
tabhBack = Not allocated
delta_head = Not allocated
pb_func = Not allocated
pb_handle = Not allocated
ET_TRANSPORT_SEL
Table IT_126753[0x176]
CLASS=CL_UG_MD_TR_CLIENTCOPYMETHOD=COLLECT_FIELDNAME_CONTENTDATA=LT_TRANSPORT_SEL
Table reference: 118
TABH+ 0(20) = B0315375FE070000C0294E75FE07000000000000
TABH+ 20(20) = 7600000021EF010000000000B0000000FFFFFFFF
TABH+ 40(16) = 04800400801B000010000000C1248001
store = 0xB0315375FE070000
ext1 = 0xC0294E75FE070000
shmId = 0 (0x00000000)
id = 118 (0x76000000)
label = 126753 (0x21EF0100)
fill = 0 (0x00000000)
leng = 176 (0xB0000000)
loop = -1 (0xFFFFFFFF)
xtyp = TYPE#000132
occu = 16 (0x10000000)
access = 1 (ItAccessStandard)
idxKind = 0 (ItIndexNone)
uniKind = 2 (ItUniqueNon)
keyKind = 1 (default)
cmpMode = 2 (cmpSingleMcmpR)
occu0 = 1
groupCntl = 0
rfc = 0
unShareable = 0
mightBeShared = 0
sharedWithShmTab = 0
isShmLockId = 0
gcKind = 0
isUsed = 1
isCtfyAble = 1
>>>>> Shareable Table Header Data <<<<<
tabi = 0x60320F75FE070000
pgHook = 0x0000000000000000
idxPtr = 0x0000000000000000
shmTabhSet = 0x0000000000000000
id = 53553 (0x31D10000)
refCount = 0 (0x00000000)
tstRefCount = 0 (0x00000000)
lineAdmin = 16 (0x10000000)
lineAlloc = 16 (0x10000000)
shmVersId = 0 (0x00000000)
shmRefCount = 1 (0x01000000)
>>>>> 1st level extension part <<<<<
regHook = 0x0000000000000000
collHook = 0x0000000000000000
ext2 = 0x0000000000000000
>>>>> 2nd level extension part <<<<<
tabhBack = Not allocated
delta_head = Not allocated
pb_func = Not allocated
pb_handle = Not allocated
%_DUMMY$$
2222
0000
0000
0000
<LS_SEL>
%_ARCHIVE
2222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
ME->DT_RFIELDNAME
Table IT_126975[2x60]
DATA=DT_RFIELDNAME |
| Table reference: 5220 |
| TABH+ 0(20) = 309A0C75FE070000000000000000000000000000 |
| TABH+ 20(20) = 64140000FFEF0100020000003C000000FFFFFFFF |
| TABH+ 40(16) = 04E80100300B0000100000002A278001 |
| store = 0x309A0C75FE070000 |
| ext1 = 0x0000000000000000 |
| shmId = 0 (0x00000000) |
| id = 5220 (0x64140000) |
| label = 126975 (0xFFEF0100) |
| fill = 2 (0x02000000) |
| leng = 60 (0x3C000000) |
| loop = -1 (0xFFFFFFFF) |
| xtyp = TYPE#000045 |
| occu = 16 (0x10000000) |
| access = 2 (ItAccessSorted) |
| idxKind = 1 (ItIndexLinear) |
| uniKind = 1 (ItUnique) |
| keyKind = 2 (table_line) |
| cmpMode = 3 (cmpSingleMcmpU) |
| occu0 = 1 |
| groupCntl = 0 |
| rfc = 0 |
| unShareable = 0 |
| mightBeShared = 0 |
| sharedWithShmTab = 0 |
| isShmLockId = 0 |
| gcKind = 0 |
| isUsed = 1 |
| isCtfyAble = 1 |
| >>>>> Shareable Table Header Data <<<<< |
| tabi = 0x6015FD74FE070000 |
| pgHook = 0x0000000000000000 |
| idxPtr = 0xA01BFD74FE070000 |
| shmTabhSet = 0x0000000000000000 |
| id = 53632 (0x80D10000) |
| refCount = 0 (0x00000000) |
| tstRefCount = 0 (0x00000000) |
| lineAdmin = 16 (0x10000000) |
| lineAlloc = 16 (0x10000000) |
| shmVersId = 0 (0x00000000) |
| shmRefCount = 1 (0x01000000) |
| >>>>> 1st level extension part <<<<< |
| regHook = Not allocated |
| collHook = Not allocated |
| ext2 = Not allocated |
| >>>>> 2nd level extension part <<<<< |
| tabhBack = Not allocated |
| delta_head = Not allocated |
| pb_func = Not allocated |
| pb_handle = Not allocated |
| <LS_SEL>-FIELDNAME |
| ??? |
| ?????? |
| ?????? |
| SY-SUBRC |
| 0 |
| 0000 |
| 0000 |
| LT_SEL |
| Table[initial] |
| LT_TRANSPORT |
| Table[initial] |
| LT_TRANSPORT_SEL |
| Table[initial] |
| %_SPACE |
| |
| 2 |
| 0 |
| 0 |
| 0 |
| ME |
|
3000C000
70008C00
ME->DO_GUID_FIELD
|
| F0000000 |
| F0000000 |
| ME->DT_FDEP_INT |
| Table IT_126944[1x124] |
| DATA=DT_FDEP_INT
Table reference: 215
TABH+ 0(20) = B0753A2EFF07000090203775FE07000000000000
TABH+ 20(20) = D7000000E0EF0100010000007C000000FFFFFFFF
TABH+ 40(16) = 04B701005009000001000000A2078C01
store = 0xB0753A2EFF070000
ext1 = 0x90203775FE070000
shmId = 0 (0x00000000)
id = 215 (0xD7000000)
label = 126944 (0xE0EF0100)
fill = 1 (0x01000000)
leng = 124 (0x7C000000)
loop = -1 (0xFFFFFFFF)
xtyp = TYPE#000035
occu = 1 (0x01000000)
access = 2 (ItAccessSorted)
idxKind = 0 (ItIndexNone)
uniKind = 1 (ItUnique)
keyKind = 3 (user defined)
cmpMode = 3 (cmpSingleMcmpU)
occu0 = 0
groupCntl = 0
rfc = 0
unShareable = 0
mightBeShared = 1
sharedWithShmTab = 1
isShmLockId = 0
gcKind = 0
isUsed = 1
isCtfyAble = 1
>>>>> Shareable Table Header Data <<<<<
tabi = 0x10753A2EFF070000
pgHook = 0x0000000000000000
idxPtr = 0x0000000000000000
shmTabhSet = 0x0000000000000000
id = 27288 (0x986A0000)
refCount = 0 (0x00000000)
tstRefCount = 0 (0x00000000)
lineAdmin = 1 (0x01000000)
lineAlloc = 1 (0x01000000)
shmVersId = 1380 (0x64050000)
shmRefCount = 1 (0x01000000)
>>>>> 1st level extension part <<<<<
regHook = 0x0043E873FE070000
collHook = 0x0000000000000000
ext2 = 0x0000000000000000
>>>>> 2nd level extension part <<<<<
tabhBack = Not allocated
delta_head = Not allocated
pb_func = Not allocated
pb_handle = Not allocated
<LS_FDEP>
No. 10 Ty. METHOD
Name CL_UC_MD_CHAR=>IF_UG_MD_MANUAL_TRANSPORT~TRANSPORT_BY_SEL
IT_SEL
Table[initial]
IF_COMPLETE
2
0
0
0
IF_USE_MASK
X
5
8
0
0
IF_TEXT_ONLY
2
0
0
0
ET_TRANSPORT
Table IT_111628[0x404]
ET_TRANSPORT_SEL
Table IT_126753[0x176]
%_SPACE
2
0
0
0
SY-REPID
CL_UC_MD_CHAR=================CP
4455454454445333333333333333334522222222
3CF53FD4F3812DDDDDDDDDDDDDDDDD3000000000
0000000000000000000000000000000000000000
0000000000000000000000000000000000000000
ME
|
| 3000C000 |
| 70008C00 |
| SYST |
| ################################################ð#################################x#####XC#### |
| 000000000000000000000000000000000000002000000000F000000000000000000000000000109000700000540000 |
| 1010202000000000000020001000100000000080000000000000000000000000000000000000B00000800000830500 |
| 0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 |
| 000000000000000000000000000000000000008000000000000000000000000000000000000000000000000000000C |
| %_DUMMY$$ |
| |
| 2222 |
| 0000 |
| 0000 |
| 0000 |
| No. 9 Ty. METHOD |
| Name CL_UG_MD_TR_CLIENTCOPY=>COLLECT_FIELDNAME_CONTENT |
| IO_MSG |
|
A0005000
F0000B00
CT_OBJECT
Table IT_43581[133x8]
FUNCTION=FINB_TR_CC_EXIT_ANALYZEDATA=LT_TMP_OBJECTS
Table reference: 3715
TABH+ 0(20) = 70438B74FE070000000000000000000000000000
TABH+ 20(20) = 830E00003DAA00008500000008000000FFFFFFFF
TABH+ 40(16) = 04720100D00400001B000000C1288001
store = 0x70438B74FE070000
ext1 = 0x0000000000000000
shmId = 0 (0x00000000)
id = 3715 (0x830E0000)
label = 43581 (0x3DAA0000)
fill = 133 (0x85000000)
leng = 8 (0x08000000)
loop = -1 (0xFFFFFFFF)
xtyp = TYPE#000011
occu = 27 (0x1B000000)
access = 1 (ItAccessStandard)
idxKind = 0 (ItIndexNone)
uniKind = 2 (ItUniqueNon)
keyKind = 1 (default)
cmpMode = 4 (cmpSingleEq)
occu0 = 1
groupCntl = 0
rfc = 0
unShareable = 0
mightBeShared = 0
sharedWithShmTab = 0
isShmLockId = 0
gcKind = 0
isUsed = 1
isCtfyAble = 1
>>>>> Shareable Table Header Data <<<<<
tabi = 0xA0548C74FE070000
pgHook = 0x3066DB74FE070000
idxPtr = 0x0000000000000000
shmTabhSet = 0x0000000000000000
id = 24950 (0x76610000)
refCount = 0 (0x00000000)
tstRefCount = 0 (0x00000000)
lineAdmin = 1105 (0x51040000)
lineAlloc = 1105 (0x51040000)
shmVersId = 0 (0x00000000)
shmRefCount = 1 (0x01000000)
>>>>> 1st level extension part <<<<<
regHook = Not allocated
collHook = Not allocated
ext2 = Not allocated
>>>>> 2nd level extension part <<<<<
tabhBack = Not allocated
delta_head = Not allocated
pb_func = Not allocated
pb_handle = Not allocated
SYST-REPID
CL_UG_MD_TR_CLIENTCOPY========CP
4455454455554444454455333333334522222222
3CF57FD4F42F3C95E43F09DDDDDDDD3000000000
0000000000000000000000000000000000000000
0000000000000000000000000000000000000000
LT_FATTR
Table IT_122877[1x294]
CLASS=CL_UG_MD_TR_CLIENTCOPYMETHOD=COLLECT_FIELDNAME_CONTENTDATA=LT_FATTR
Table reference: 4265
TABH+ 0(20) = F0151175FE070000000000000000000000000000
TABH+ 20(20) = A9100000FDDF01000100000026010000FFFFFFFF
TABH+ 40(16) = 04E80100200C00000A000000A4058401
store = 0xF0151175FE070000
ext1 = 0x0000000000000000
shmId = 0 (0x00000000)
id"InfoProvider ZSEBCST02 has been changed in the meantime"
1. Lock all users.
2. Put all jobs on hold.
3. Make sure that your upstream system (R/3, etc.) are not pushing data into BI.
4. Cycle the BI system.
5. Retry. -
MKT_ELEMENT_CREATE gives Dump during creation of Campaign Element
Hi,
I am trying to create campaign element through code and I am getting dump in the following class method.
Class : CL_CRM_MKTPL_OL_MKTPROJECT
Method : SET_ATTRIBUTES
Line No : 15 ->> lr_header_item->get_attributes( EXPORTING iv_get_external_attributes = abap_true
IMPORTING es_attributes = ls_header_attr ).
In above statement LR_HEADER_ITEM comes as Initial.
Below is the code for creating campaign element.
DATA: LR_TASK TYPE REF TO CL_CGPL_TASK,
LR_TASKS TYPE REF TO CL_CGPL_TASKS,
LR_PROJECT TYPE REF TO CL_CGPL_PROJECT.
DATA: WA_PROJECT TYPE CGPL_PROJECT.
DATA: WA_TASK TYPE CGPL_TASK.
DATA: LIT_TASKS TYPE CGPLD_ITAB_TASK.
DATA: WA_MESSAGE TYPE BAPIRET2.
DATA: LIT_RETURN TYPE TABLE OF BAPIRETURN1.
DATA: WA_CAMPAIGN TYPE CRM_MKTPL_CAMPAIGN,
WA_ATTRIBUTES TYPE CRM_MKTPL_MKTELEMENT.
DATA: LV_GUID TYPE SYSUUID-X."BAPI_MARKETINGELEMENT_GUID-MKTELEMENT_GUID.
DATA: LV_CAMP_GUID TYPE BAPI_MARKETINGELEMENT_GUID-MKTELEMENT_GUID.
CALL FUNCTION 'MKT_ELEMENT_READ'
EXPORTING
MARKETINGELEMENT = IV_SOURCE_GUID - THIS IS A IMPORT PARAMETER OF FUNCTION MODULE ( CAMPAIGN GUID ).
IMPORTING
EX_CAMPAIGN = WA_CAMPAIGN
EX_ATTRIBUTES = WA_ATTRIBUTES.
CONCATENATE WA_ATTRIBUTES-EXTERNAL_ID '_' SY-DATUM '_' SY-UZEIT INTO WA_ATTRIBUTES-EXTERNAL_ID.
WA_ATTRIBUTES-OBJECT_TYPE = 'CPT'.
CALL FUNCTION 'SYSTEM_UUID_CREATE'
IMPORTING
UUID = WA_ATTRIBUTES-GUID.
LV_CAMP_GUID = WA_ATTRIBUTES-GUID.
WA_ATTRIBUTES-PROJECT_GUID = IV_SOURCE_GUID.
WA_ATTRIBUTES-PARENT_GUID = IV_SOURCE_GUID.
CALL FUNCTION 'MKT_ELEMENT_CREATE'
EXPORTING
IM_MARKETINGELEMENT = LV_CAMP_GUID
IM_ATTRIBUTES = WA_ATTRIBUTES
TABLES
RETURN = LIT_RETURN.
IF LIT_RETURN[] IS INITIAL.
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
EXPORTING
WAIT = 'X'.
ENDIF.This would happen if you are not passing the right guid to the program or Function Module. Please check that the guid is available in cgpl_project table.
Ajay Gupta -
ABAP Dump while Changing the Layout fields in Report output - RCOPCA02
Hi,
I Copied the Standard Program RCOPCA02 to ZRCOPCA02. I added two new fields(AUART, AUGRU) in the report output. It is executing correctly with default layout, While Changing the layout for displaying new fields it is dumping.
I am not understanding, What should i do...
Here is the Code.
report ZRCOPCA02 no standard page heading message-id km
line-count (2) line-size 81.
type-pools: slis, ecarc.
DDIC-Tabellen *******************************************************
tables: glpca, "Einzelposten / Ist
glu1, "Übergabestruktur FI-SL-Anzeige
t000,
tka01,
sscrfields,
vbak.
Variablen und int. Tabellen *****************************************
data: l_vbeln like vbak-vbeln,
l_auart like vbak-auart,
l_augru like vbak-augru.
data: afield type slis_fieldcat_alv,
sp_group type slis_sp_group_alv,
t_listheader type slis_t_listheader with header line,
t_layout type slis_layout_alv,
t_fieldcat type slis_t_fieldcat_alv,
t_spec_groups type slis_t_sp_group_alv,
event type slis_alv_event,
t_events type slis_t_event,
g_variant like disvariant,
gx_variant like disvariant,
g_exit(1) type c,
g_save(1) type c,
g_repid like sy-repid,
msgtyp like sy-msgty,
lt_dynpread like dynpread occurs 1 with header line,
ls_rpcak like rpcak, "note 0310592
packsize type i value 1000,
text1(60) type c,
text2(60) type c,
oldkokrs like glpca-kokrs,
oldracct like glpca-racct.
data: whr_size type i value 50,"Maximum of single values per MIC 46a
"charact. in the where-clause of the select-statement
lines type i, "number of lines of range table MIC 46a
cnt_rldnr type i, "Zähler Anzahl selektierter Ledger
cnt_kokrs type i, "Zähler Anzahl selektierter KoReKreise
cnt_poper type i, "Zähler Anzahl selektierter Perioden
cnt_ryear type i, "Zähler Anzahl selektierter GeschJahre
cnt_rvers type i, "Zähler Anzahl selektierter Versionen
cnt_bukrs type i, "Zähler Anzahl selektierter BuKreise
empge like dkobr-empge,
ksl_curr like tka01-pcacur,
hsl_curr like t001-waers,
a_rec like rstirec.
data: begin of dim_data.
include structure rgcdi. "data for dimensions
data: end of dim_data.
data: begin of tab_fields occurs 80,
name like dntab-fieldname, "fields in table i_glpca
end of tab_fields.
data: begin of i_glpca occurs 0.
include structure rpca2.
data: racct_ktext like rpcak-ktext,
psppp like prps-posid,
v_auart like vbak-auart,
v_augru like vbak-augru,
end of i_glpca.
data: rw_subrc like sy-subrc, "Flag: Report-Writer-Schnittstelle
re_subrc like sy-subrc, "Flag: Recherche-Schnittstelle
subrc like sy-subrc.
data: set_id like sethier-setid, "Set-ID "RDI_SETS_4.0
set_class like sethier-setclass, "Setklasse "RDI_SETS_4.0
set_sname like sethier-shortname."Setname (24) "RDI_SETS_4.0
data: authorised(1),
s_message(1),
auth_dbcount like sy-tabix,
Hex-Konstanten für Minimum/Maximum-Werte
begin of hex00,
x1(12) type c,
x2(12) type c,
end of hex00,
begin of hexff,
x1(12) type c,
x2(12) type c,
end of hexff.
ranges rclnt for glpca-rclnt.
field-symbols: type ecarc_glpca_curr.
Selektionsoptionen *************************************************
select-options:
rldnr for glpca-rldnr default '8A' no-display,
rassc for glpca-rassc no-display,
rrcty for glpca-rrcty default 0,
rrcty for glpca-rrcty,
rvers for glpca-rvers default '000',
kokrs for glpca-kokrs memory id cac,
bukrs for glpca-rbukrs memory id buk,
poper for glpca-poper default sy-datlo+4(2),
ryear for glpca-ryear default sy-datlo,
poper for glpca-poper,
ryear for glpca-ryear,
prctr for glpca-rprctr matchcode object prct,
pprctr for glpca-sprctr matchcode object prct,
RACCT FOR GLPCA-RACCT MATCHCODE OBJECT KART, "RD_P30K128304
racct for glpca-racct, "RD_P30K128304
drcrk for glpca-drcrk,
activ for glpca-activ,
rhoart for glpca-rhoart,
rfarea for glpca-rfarea,
stagr for glpca-stagr,
rtcur for glpca-rtcur,
runit for glpca-runit,
versa for glpca-versa no-display,
eprctr for glpca-eprctr no-display,
afabe for glpca-afabe no-display,
rmvct for glpca-rmvct no-display,
hrkft for glpca-hrkft no-display, "note 550972
sbukrs for glpca-sbukrs no-display, "note 550972
shoart for glpca-shoart no-display, "note 550972
sfarea for glpca-sfarea no-display, "note 550972
docct for glpca-docct,
docnr for glpca-docnr,
refdocct for glpca-refdocct,
refdocnr for glpca-refdocnr,
werks for glpca-werks,
repmatnr for glpca-rep_matnr matchcode object pca_shlp_rep_matnr,
rscope for glpca-rscope.
parameters: no_rrint no-display default ' '." skip "MICP40K066037
" report-report-interface
display variant ">>MICP40K039857
selection-screen begin of block 0 with frame title text-e01.
parameters: p_vari like disvariant-variant.
selection-screen comment 47(40) varname for field p_vari.
selection-screen end of block 0.
parameters log_grp(4) type c no-display default 'KE5Z'.
"<<MICP40K039857
ranges: v_racct for glpca-racct,
v_prctr for glpca-rprctr,
v_pprctr for glpca-sprctr.
Tabelle mit Werten aus den Berichts-Set vom Report-Writer *
data begin of val_tab occurs 50.
include structure rgciv.
data end of val_tab.
MICP30K166368
feldkatalog und interface für bb-schnittstelle rw MICP30K166368
MICP30K166368
"MICP30K166368
data begin of bbs_fieldtab occurs 20. "MICP30K166368
include structure rstifields. "MICP30K166368
data end of bbs_fieldtab. "MICP30K166368
archiv
type-pools: rsds.
types: begin of ty_archive_objects,
object like arch_obj-object,
end of ty_archive_objects,
ty_t_archive_objects type ty_archive_objects occurs 2.
constants: lc_set type c value 'X',
lc_report type progname value 'KE5Z',
lc_reporttype type reporttype value 'TR'.
tables: admi_files.
select-options lr_files for admi_files-archiv_key no-display.
parameter: read_db type c default 'X' no-display,
read_ar type c no-display,
arc_obj like arch_obj-object no-display,
read_as type c default 'X' no-display.
data : lt_arch_obj type ty_t_archive_objects with header line,
ls_selections type rsds_frange,
lt_selections type rsds_frange_t,
ls_selopt type rsdsselopt,
lt_glpca_archiv type ecarc_t_glpca_curr.
*********************************************************>>MICP40K039857
INITIALIZATION
initialization.
Diverse Initialisierungen
perform init_vars.
g_repid = sy-repid.
Set default values for record type
rrcty-sign = 'I'.
rrcty-option = 'EQ'.
rrcty-low = '0'.
append rrcty.
rrcty-low = '2'.
append rrcty.
Set default values for period and year (if kokrs or bukrs is known)
get parameter id 'BUK' field bukrs-low.
get parameter id 'CAC' field kokrs-low.
if kokrs-low is initial "get contr. area from company code
and not bukrs-low is initial.
call function 'KOKRS_GET_FROM_BUKRS'
exporting
i_bukrs = bukrs-low
importing
e_kokrs = kokrs-low
exceptions
no_kokrs_found = 1
others = 2.
if sy-subrc <> 0.
clear kokrs-low.
endif.
endif.
if not kokrs-low is initial.
call function 'K_KOKRS_READ' "get fiscal year variant
exporting
kokrs = kokrs-low
importing
e_tka01 = tka01
exceptions
not_found = 1
not_found_gjahr = 2
others = 3.
if sy-subrc = 0.
call function 'G_PERIOD_GET'
exporting
date = sy-datlo
variant = tka01-lmona
importing
period = poper-low
year = ryear-low
exceptions
ledger_not_assigned_to_company = 1
period_not_defined = 2
variant_not_defined = 3
others = 4.
if sy-subrc = 0.
poper-sign = 'I'.
poper-option = 'EQ'.
append poper.
ryear-sign = 'I'.
ryear-option = 'EQ'.
append ryear.
endif.
endif.
endif.
Settings for display variants
g_save = 'A'. "Schalter Varianten benutz./allg. speichern
clear g_variant.
g_variant-report = g_repid.
g_variant-log_group = log_grp.
g_variant-username = sy-uname.
Get default variant
gx_variant = g_variant.
call function 'REUSE_ALV_VARIANT_DEFAULT_GET'
exporting
i_save = g_save
changing
cs_variant = gx_variant
exceptions
not_found = 2.
if sy-subrc = 0.
p_vari = gx_variant-variant.
endif.
Set variant
if p_vari is initial.
p_vari = '1SAP'.
move p_vari to gx_variant-variant.
call function 'REUSE_ALV_VARIANT_EXISTENCE'
exporting
i_save = g_save
changing
cs_variant = gx_variant
exceptions
not_found = 1.
if sy-subrc ne 0.
clear p_vari.
clear gx_variant-variant.
endif.
endif.
varname = gx_variant-text.
"<<MICP40K039857
archiv
call function 'KARL_DATA_INPUT_INIT'
exporting
i_report = lc_report
i_reporttype = lc_reporttype
importing
e_xusedb = read_db
e_xusear = read_ar
e_archobj = arc_obj
e_infosys = read_as
tables
t_arch_sel = lr_files.
data: lt_excluding like sy-ucomm occurs 0 with header line.
call function 'RS_SET_SELSCREEN_STATUS'
exporting
p_status = 'SELSCREEN'
p_program = 'RCOPCA02'
tables
p_exclude = lt_excluding.
Initialisieren der Bericht/Bericht-Schnittstellen *
data: ld_no_rrint type boole_d. "note 490484 begin
import rri = ld_no_rrint from memory id 'RCOPCA02_NO_RRI'.
if ld_no_rrint = 'X'.
free memory id 'RCOPCA02_NO_RRI'.
else. "note 490484 end
call function 'G_REPORT_INTERFACE_INIT' "Report-Writer?
exporting "MICP30K166368
table = 'GLPCT' "MICP30K166368
importing
subrc = rw_subrc "MICP30K166368
tables "MICP30K166368
it_fieldr = bbs_fieldtab. "MICP30K166368
call function 'RSTI_APPL_STACK_POP'"oder Recherche?
importing
i_rec = a_rec
exceptions
appl_stack_not_initialized = 1.
re_subrc = sy-subrc.
if re_subrc = 0.
check Receiver is this report
if not ( ( a_rec-rtool = 'RT' and a_rec-ronam = 'RCOPCA02' )
or ( a_rec-rtool = 'TR' and a_rec-ronam = 'KE5Z' ) ) .
re_subrc = 2.
endif.
endif.
endif.
AT SELCTION-SCREEN on value request**********************************
*at selection-screen on value-request for racct-low. "RD "4.6a
"RD "4.6a
call function 'K_RACCT_VALUE_REQUEST' "RD "4.6a
importing "RD "4.6a
e_racct = racct-low. "RD "4.6a
"RD "4.6a
"RD "4.6a
*at selection-screen on value-request for racct-high. "RD "4.6a
"RD "4.6a
call function 'K_RACCT_VALUE_REQUEST' "RD "4.6a
importing "RD "4.6a
e_racct = racct-high. "RD "4.6a
at selection-screen on value-request for p_vari. "MICP40K039857
perform f4_for_variant. "MICP40K039857
at selection-screen on value-request for poper-low. "RD "4.6a
begin of insertion note 522715
call function 'K_KOKRS_READ'
exporting
kokrs = kokrs-low
exceptions
not_found = 1
not_found_gjahr = 2
others = 3.
if sy-subrc = 0.
end of insertion note 522715
call function 'ECPCA_RPMAX_VALUE_REQUEST' "RD "4.6a
exporting "RD "4.6a
i_kokrs = kokrs-low "RD "4.6a
i_ryear = ryear-low "RD "4.6a
importing "RD "4.6a
e_rpmax = poper-low "RD "4.6a
begin of insertion note 522715
exceptions
table_empty = 1.
endif.
end of insertion note 522715
at selection-screen on value-request for poper-high. "RD "4.6a
begin of insertion note 522715
call function 'K_KOKRS_READ'
exporting
kokrs = kokrs-low
exceptions
not_found = 1
not_found_gjahr = 2
others = 3.
if sy-subrc = 0.
end of insertion note 522715
call function 'ECPCA_RPMAX_VALUE_REQUEST' "RD "4.6a
exporting "RD "4.6a
i_kokrs = kokrs-low "RD "4.6a
i_ryear = ryear-low "RD "4.6a
importing "RD "4.6a
e_rpmax = poper-high "RD "4.6a
begin of insertion note 522715
exceptions
table_empty = 1.
endif.
end of insertion note 522715
AT SELCTION-SCREEN ***************************************************
at selection-screen.
perform pai_of_selection_screen.
begin of insertion note 522715
if not kokrs-low is initial.
call function 'K_KOKRS_READ'
exporting
kokrs = kokrs-low
exceptions
not_found = 1
not_found_gjahr = 2
others = 3.
if sy-subrc <> 0.
message e101(ki) with kokrs-low.
endif.
endif.
end of insertion note 522715
archiv
if sy-ucomm = 'FC01' or sy-ucomm = 'UCDS'
or sy-ucomm = 'ONLI' and read_ar = 'X'
and read_as is initial and lr_files[] is initial.
if lt_arch_obj[] is initial.
lt_arch_obj-object = 'PCA_OBJECT'. append lt_arch_obj.
lt_arch_obj-object = 'EC_PCA_ITM'. append lt_arch_obj.
endif.
call function 'KARL_DATA_INPUT_SELECT'
exporting
i_db_and_arc = lc_set
i_infosys_possible = lc_set
i_object_fixed = 'V'
i_documentation = 'KARL_DATA_INPUT_SEL_KE5YZ'
i_report = lc_report
i_reporttype = lc_reporttype
tables
t_objects = lt_arch_obj
t_arch_sel = lr_files
changing
c_xusedb = read_db
c_xusear = read_ar
c_archobj = arc_obj
c_infosys = read_as.
endif.
START-OF-SELECTION **************************************************
start-of-selection.
Default-Werte löschen, falls Aufruf über Recherche
oder Report-Writer erfolgt ist
if no_rrint is initial and ld_no_rrint is initial. "note 490484
if rw_subrc eq 0 or re_subrc eq 0.
refresh: rldnr, rrcty, rvers, kokrs, bukrs, poper, ryear,
racct, prctr, pprctr, drcrk, activ, rhoart, rfarea,
versa, afabe, eprctr,
v_racct, v_prctr, v_pprctr.
clear: rldnr, rrcty, rvers, kokrs, bukrs, poper, ryear,
racct, prctr, pprctr, drcrk, activ, rhoart, rfarea,
versa, afabe, eprctr,
v_racct, v_prctr, v_pprctr.
endif.
Parameter einlesen über Report-Writer-Schnittstelle *
if rw_subrc eq 0.
perform rw_get_parameters.
oder Parameter einlesen über Recherche-Schnittstelle *
elseif re_subrc eq 0.
perform re_get_parameters.
endif.
endif.
if read_db = 'X'. " read from DB (archiv)
Bewegungsdaten einlesen und puffern...................................
call function 'SAPGUI_PROGRESS_INDICATOR'
exporting
text = 'Einzelposten selektieren'(p10).
Use dirty trick to mislead DB-optimizer
call function 'DB_DO_NOT_USE_CLIENT_INDEX'
exporting
value = sy-mandt
tables
mandttab = rclnt.
select (tab_fields) from glpca
client specified
package size packsize
APPENDING CORRESPONDING FIELDS OF TABLE i_glpcaO
into corresponding fields of table i_glpca
where rldnr in rldnr
and rrcty in rrcty
and rvers in rvers
and kokrs in kokrs
and rbukrs in bukrs
and ryear in ryear
and rassc in rassc
and hrkft in hrkft "note 550972
and sbukrs in sbukrs "note 550972
and shoart in shoart "note 550972
and sfarea in sfarea "note 550972
and racct in racct
and rprctr in prctr
and sprctr in pprctr
and poper in poper
and drcrk in drcrk
and activ in activ
and rhoart in rhoart
and rfarea in rfarea
and versa in versa
and eprctr in eprctr
and afabe in afabe
and rmvct in rmvct
and docct in docct
and docnr in docnr
and stagr in stagr
and rtcur in rtcur
and runit in runit
and refdocct in refdocct
and refdocnr in refdocnr
and werks in werks
and rep_matnr in repmatnr "RDIP40K020663
and rscope in rscope "RDIP40K020663
and rclnt in rclnt. "dirty trick to mislead DB-optimizer
if sy-dbcnt > 1.
text1 = sy-dbcnt.
condense text1.
concatenate text1 text-m01 into text2 separated by space.
call function 'SAPGUI_PROGRESS_INDICATOR'
exporting
text = text2. " ... Datensätze gelesen
endif.
endselect.
Entfernt nicht zugehörige Einträge....................................
loop at i_glpca where ( not rprctr in v_prctr )
or ( not sprctr in v_pprctr )
or ( not racct in v_racct ).
delete i_glpca.
endloop.
endif.
*archiv
if read_ar = 'X' and not
( read_as is initial and lr_files[] is initial ).
call function 'SAPGUI_PROGRESS_INDICATOR'
exporting
text = 'Lesen im Archiv'(p12).
define fill_lt_selections.
if not &2[] is initial.
clear ls_selections.
move &1 to ls_selections-fieldname.
loop at &2.
clear ls_selopt.
move-corresponding &2 to ls_selopt.
append ls_selopt to ls_selections-selopt_t.
endloop.
append ls_selections to lt_selections.
endif.
end-of-definition.
fill_lt_selections 'RLDNR' rldnr.
fill_lt_selections 'RRCTY' rrcty.
fill_lt_selections 'RVERS' rvers.
fill_lt_selections 'KOKRS' kokrs.
fill_lt_selections 'RBUKRS' bukrs.
fill_lt_selections 'POPER' poper.
fill_lt_selections 'RYEAR' ryear.
fill_lt_selections 'RPRCTR' prctr.
fill_lt_selections 'SPRCTR' pprctr.
fill_lt_selections 'RACCT' racct.
fill_lt_selections 'DRCRK' drcrk.
fill_lt_selections 'ACTIV' activ.
fill_lt_selections 'RHOART' rhoart.
fill_lt_selections 'RFAREA' rfarea. "note 401961
fill_lt_selections 'STAGR' stagr.
fill_lt_selections 'RTCUR' rtcur.
fill_lt_selections 'RUNIT' runit.
fill_lt_selections 'VERSA' versa.
fill_lt_selections 'EPRCTR' eprctr.
fill_lt_selections 'AFABE' afabe.
fill_lt_selections 'RMVCT' rmvct.
fill_lt_selections 'DOCCT' docct.
fill_lt_selections 'DOCNR' docnr.
fill_lt_selections 'REFDOCCT' refdocct.
fill_lt_selections 'REFDOCNR' refdocnr.
fill_lt_selections 'WERKS' werks.
fill_lt_selections 'REP_MATNR' repmatnr.
fill_lt_selections 'RSCOPE' rscope.
fill_lt_selections 'HRKFT' hrkft. "note 550972
fill_lt_selections 'SBUKRS' sbukrs. "note 550972
fill_lt_selections 'SHOART' shoart. "note 550972
fill_lt_selections 'SFAREA' sfarea. "note 550972
call function 'EC_PCA_SELECT_FROM_ARCHIVE'
exporting
i_selections = lt_selections[]
i_files_sequential_read = lr_files[]
importing
e_glpca = lt_glpca_archiv[]
exceptions
no_infostruc_found = 1.
if sy-subrc = 1.
message id sy-msgid type 'I' number sy-msgno
with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.
clear i_glpca.
loop at lt_glpca_archiv assigning to i_glpca.
append i_glpca.
endloop.
endif.
if i_glpca[] is initial. "Info,nichts gefunden
message s000.
exit.
endif.
get texts for accounts ...............................................
sort i_glpca by kokrs racct.
loop at i_glpca assigning -racct_ktext = ls_rpcak-ktext.
endloop.
Liste mit Einzelposten geeignet sortieren.............................
call function 'SAPGUI_PROGRESS_INDICATOR'
exporting
text = 'Einzelposten sortieren'(p30).
if show_ref is initial.
sort i_glpca by rldnr ryear rbukrs rrcty rvers
docct docnr docln.
else.
sort i_glpca by rldnr kokrs ryear rbukrs rrcty rvers poper
refdocct refdocnr refdocln.
endif.
Berechtigungsprüfung und gemerkte Belege aufbereiten .................
call function 'SAPGUI_PROGRESS_INDICATOR'
exporting
text = 'Berechtigungsprüfungen'(p40).
clear: cnt_rldnr, cnt_kokrs, cnt_ryear, cnt_rvers, cnt_bukrs.
loop at i_glpca assigning .
Berechtigungscheck
perform check_repo_authority changing authorised.
if authorised is initial.
delete i_glpca.
s_message = 'X'.
zählen der Sätze ohne Berechtigung
auth_dbcount = auth_dbcount + 1.
else. "Weitere Bearbeitung nur für berechtigte Belege...
Zusätzlich merken der Anzahl der Ausprägungen
bestimmter Dimensionen
on change of -rbukrs
ct = '10'
importing
currency = hsl_curr.
endon.
externe Immobilienbezeichnung "ww/kb
on change of i_glpca-imkey.
if ( not -dabrz
I_length = 20
importing
e_empge = -konty.
endif.
CONCATENATE I_GLPCA-KONTY I_GLPCA-EMPGE INTO I_GLPCA-IMBEZ.
endif.
endon.
on change of i_glpca-dabrz.
call function 'REMD_IMKEY_TO_EMPGE'
exporting
i_imkey = i_glpca-imkey
i_dabrz = i_glpca-dabrz
i_length = 20
importing
e_empge = i_glpca-empge
e_konty = i_glpca-konty.
CONCATENATE I_GLPCA-KONTY I_GLPCA-EMPGE INTO I_GLPCA-IMBEZ.
endon.
Konvertierungsproblem mit PSP-Nummer bereinigen
if not -psppp.
endif.
endif.
Währungen in Hilfsfeldern speichern
if -ksl_curr = ksl_curr.
endif.
modify i_glpca.
endif.
endloop.
Nachricht, wenn nicht alle Einzelposten angezeigt werden.
if not s_message is initial.
message s407(km) with auth_dbcount.
endif.
EP ausgeben...........................................................
call function 'SAPGUI_PROGRESS_INDICATOR'
exporting
text = 'Einzelposten ausgeben'(p50).
t_layout-detail_initial_lines = 'X'.
t_layout-detail_popup = 'X'.
t_layout-f2code = 'PIC1'. "MICP40K039857
t_layout-get_selinfos = 'X'.
t_layout-group_change_edit = 'X'. "note 576149
perform fill_listheader.
perform fieldcat_fill.
perform spec_groups_fill.
perform events_fill. "MICP40K039857
">>MICP40K039857
call function 'K_KKB_LIST_DISPLAY'
exporting
i_callback_program = 'RCOPCA02'
i_callback_user_command = 'USR_CMD'
i_callback_top_of_page = 'TOP_OF_PAGE'
I_CALLBACK_END_OF_PAGE =
I_CALLBACK_END_OF_LIST =
i_callback_pf_status_set = 'SET_PF_STATUS'
I_CALLBACK_LAYOUT_SAVE =
I_CALLBACK_FIELDCAT_SAVE =
i_tabname = 'I_GLPCA'
is_layout = t_layout
it_fieldcat = t_fieldcat
I_FCTYPE = 'R'
IT_EXCLUDING =
it_special_groups = t_spec_groups
IT_SORT =
IS_SEL_HIDE =
I_SCREEN_START_COLUMN = 0
I_SCREEN_START_LINE = 0
I_SCREEN_END_COLUMN = 0
I_SCREEN_END_LINE = 0
tables
t_outtab = i_glpca
exceptions
others = 1.
loop at i_glpca.
select single vbeln auart augru
into (l_vbeln, l_auart, l_augru)
from vbak where vbeln = i_glpca-aubel.
if sy-subrc = 0.
move l_auart to i_glpca-v_auart.
move l_augru to i_glpca-v_augru.
modify i_glpca.
endif.
endloop.
call function 'REUSE_ALV_GRID_DISPLAY'
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
exporting
I_INTERFACE_CHECK = ' '
i_callback_program = 'ZRCOPCA02'
i_callback_pf_status_set = 'SET_PF_STATUS'
i_callback_user_command = 'USR_CMD'
i_structure_name = 'I_GLPCA'
is_layout = t_layout
it_fieldcat = t_fieldcat
IT_EXCLUDING =
it_special_groups = t_spec_groups
IT_SORT =
IT_FILTER =
IS_SEL_HIDE =
i_default = 'X'
i_save = g_save
is_variant = g_variant
it_events = t_events
IT_EVENT_EXIT =
IS_PRINT =
I_SCREEN_START_COLUMN = 0
I_SCREEN_START_LINE = 0
I_SCREEN_END_COLUMN = 0
I_SCREEN_END_LINE = 0
IMPORTING
E_EXIT_CAUSED_BY_CALLER =
ES_EXIT_CAUSED_BY_USER =
tables
t_outtab = i_glpca
exceptions
program_error = 1
others = 2.
if sy-subrc <> 0.
message id sy-msgid type sy-msgty number sy-msgno
with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.
"<<MICP40K039857
clear i_glpca.
*& Form CHECK_REPO_AUTHORITY
Check only new auth-object K_PCA *
--> p1 text
<-- p2 text
form check_repo_authority changing authorized like authorised.
fill structure for userexit in K_PCA_RESP_AUTHORITY_CHECK
data: auth like pca_i_auth. "46a MIC check K_PCA and G_GLTP
auth-bukrs = -rrcty.
clear authorized.
check PrCtr/account/activity
call function 'K_PCA_RESP_AUTHORITY_CHECK'
exporting
i_kokrs = -racct
i_vorgn = 'REPP'
i_actvt = '28'
i_auth = auth
i_no_dialog_message = 'X'
exceptions
no_authority = 1
data_missing = 2
others = 3.
if sy-subrc = 0. "ok
check ledger/version/record type
call function 'PCA_G_GLTP_AUTH_CHECK'
exporting
rldnr = -rrcty
exceptions
no_authorisation = 1
others = 2.
if sy-subrc = 0. "ok, User is authorized
authorized = 'X'.
endif.
endif.
endform. " CHECK_REPO_AUTHORITY
*& Form INIT_VARS
Initialisieren diverser Hilfsvariablen und -tabellen *
form init_vars.
data begin of nametab occurs 80. "Tabelle mit Feldern aus der RPCA2
include structure dntab.
data end of nametab.
select single * from t000
client specified
where mandt = sy-mandt.
refresh nametab.
call function 'NAMETAB_GET'
exporting
only = 'T'
tabname = 'RPCA2'
tables
nametab = nametab.
Übernehmen der Feldnamen, die auch in der GLPCA
vorkommen.
loop at nametab where fieldname ne 'KSL_CURR'
and fieldname ne 'HSL_CURR'
and fieldname ne 'EMPGE' "ww/kb
and fieldname ne 'KONTY'. "ww/kb
move nametab-fieldname to tab_fields-name.
append tab_fields.
endloop.
fill Fields of receiver for BBS "MIC46C
call function 'RSTI_REPORT_FIELDS_FIND'
exporting
e_repid = 'RCOPCA02'
e_type = 'R'
tables
it_fields = bbs_fieldtab.
correct fieldnames
read table bbs_fieldtab with key rfield = 'PRCTR'.
if sy-subrc = 0.
bbs_fieldtab-rfield = 'RPRCTR'.
modify bbs_fieldtab index sy-tabix.
endif.
read table bbs_fieldtab with key rfield = 'PPRCTR'.
if sy-subrc = 0.
bbs_fieldtab-rfield = 'SPRCTR'.
modify bbs_fieldtab index sy-tabix.
endif.
read table bbs_fieldtab with key rfield = 'BUKRS'.
if sy-subrc = 0.
bbs_fieldtab-rfield = 'RBUKRS'.
modify bbs_fieldtab index sy-tabix.
endif.
Unicode
class cl_abap_char_utilities definition load.
clear hex00 with cl_abap_char_utilities=>minchar.
clear hexff with cl_abap_char_utilities=>maxchar.
endform. " INIT_VARS
FORM FILL_LISTHEADER *
List-Header in Abhängigkeit der selektierten Daten *
form fill_listheader.
read table i_glpca index 1.
if sy-subrc ne 0.
exit.
endif.
t_listheader-typ = 'S'.
t_listheader-key = 'Ledger '(h01).
if cnt_rldnr <= 1.
t_listheader-info = i_glpca-rldnr.
else.
t_listheader-info = '*'.
endif.
append t_listheader.
t_listheader-typ = 'S'.
t_listheader-key = 'Kostenrechnungskreis'(h02).
if cnt_kokrs <= 1.
t_listheader-info = i_glpca-kokrs.
else.
t_listheader-info = '*'.
endif.
append t_listheader.
t_listheader-typ = 'S'.
t_listheader-key = 'Buchungskreis '(h03).
if cnt_bukrs <= 1.
t_listheader-info = i_glpca-rbukrs.
else.
t_listheader-info = '*'.
endif.
append t_listheader.
t_listheader-typ = 'S'.
t_listheader-key = 'Buchungsperiode '(h04).
if cnt_poper <= 1.
t_listheader-info = i_glpca-poper.
else.
t_listheader-info = '*'.
endif.
append t_listheader.
if cnt_ryear <= 1.
t_listheader-typ = 'S'.
t_listheader-key = 'Geschäftsjahr '(h05).
t_listheader-info = i_glpca-ryear.
append t_listheader.
endif.
t_listheader-typ = 'S'.
t_listheader-key = 'Version '(h06).
if cnt_rvers <= 1.
t_listheader-info = i_glpca-rvers.
else.
t_listheader-info = '*'.
endif.
append t_listheader.
endform. "fill_listheader
*& Form FIELDCAT_FILL
*& Aufbau des Feldkataloges für den K_KKB_LIST_DISPLAY, *
*& bzw REUSE_ALV_LIST_DISPLAY, *
*& weitere Infos enthält die FktBaustein-Doku *
form fieldcat_fill.
data: i type i value 0.
refresh t_fieldcat.
Ledger
if cnt_rldnr > 1.
add 1 to i.
clear afield.
afield-col_pos = i.
afield-fieldname = 'RLDNR'.
afield-no_sum = 'X'.
afield-no_out = 'X'.
afield-key = 'X'.
afield-ref_tabname = 'GLPCA'.
afield-sp_group = '1'.
append afield to t_fieldcat.
endif.
Satzart
add 1 to i.
clear afield.
afield-col_pos = i.
afield-fieldname = 'RRCTY'.
afield-no_sum = 'X'.
afield-ref_tabname = 'GLPCA'.
afield-no_out = 'X'.
afield-sp_group = '1'.
append afield to t_fieldcat.
Version
if cnt_rvers > 1.
add 1 to i.
clear afield.
afield-col_pos = i.
afield-fieldname = 'RVERS'.
afield-no_sum = 'X'.
afield-ref_tabname = 'GLPCA'.
afield-no_out = 'X'.
afield-sp_group = '1'.
append afield to t_fieldcat.
endif.
Periode
if cnt_poper > 1.
add 1 to i.
clear afield.
afield-col_pos = i.
afield-fieldname = 'POPER'.
afield-no_sum = 'X'.
afield-ref_tabname = 'GLPCA'.
afield-no_out = 'X'.
afield-sp_group = '1'.
append afield to t_fieldcat.
endif.
Geschäftsjahr
if cnt_ryear > 1.
add 1 to i.
clear afield.
afield-col_pos = i.
afield-fieldname = 'RYEAR'.
afield-no_sum = 'X'.
afield-ref_tabname = 'GLPCA'.
afield-no_out = 'X'.
afield-sp_group = '1'.
append afield to t_fieldcat.
endif.
Referenzbelegtyp
add 1 to i.
clear afield.
afield-col_pos = i.
afield-fieldname = 'REFDOCCT'.
afield-ref_tabname = 'GLPCA'.
afield-key_sel = 'X'.
afield-no_sum = 'X'.
afield-sp_group = '2'.
afield-seltext_s = 'Typ'(t01).
afield-seltext_m = 'Belegtyp'(t02).
afield-seltext_l = 'Ref.Belegtyp'(t03).
afield-outputlen = 3. "Platz für die Sterne der Zwischensummen
if not show_ref is initial.
afield-key = 'X'.
else.
afield-no_out = 'X'.
endif.
append afield to t_fieldcat.
Referenzbelegnummer
add 1 to i.
clear afield.
afield-col_pos = i.
afield-fieldname = 'REFDOCNR'.
afield-ref_tabname = 'GLPCA'.
afield-key_sel = 'X'.
afield-no_sum = 'X'.
afield-sp_group = '2'.
afield-seltext_s = 'Refbeleg'(t04).
afield-seltext_m = 'Refbelegnr'(t05).
afield-seltext_l = 'Ref.Belegnummer'(t06).
if not show_ref is initial.
afield-key = 'X'.
else.
afield-no_out = 'X'.
endif.
appendHi Prabhu,
You are right, problem is with Field Catalog...
When I use FM 'REUSE_ALV_GRID_DISPLAY' it is dumping...
When i tried with FM 'REUSE_ALV_LIST_DISPLAY' it is working perfectly....
how can i use FM 'REUSE_ALV_GRID_DISPLAY' without dumping????
do i need to pass any thing in FM????
Here is the dump:
Runtime Errors MESSAGE_TYPE_X
Occurred on 12/21/2006 at 01:03:24
The current application triggered a termination with a short dump.
What happened?
The current application program detected a situation which really
should not occur. Therefore, a termination with a short dump was
triggered on purpose by the key word MESSAGE (type X).
Error analysis
Short text of error message:
Technical information about the message:
Message classe...... "0K "
Number.............. 000
User, transaction...
Language key........ "E"
Transaction......... "SE38 "
Program............. "SAPLSLVC "
Screen.............. "SAPLSLVC_FULLSCREEN 0500"
Screen line......... 3
Information on where termination occurred
The termination occurred in the ABAP program "SAPLSLVC " in "LINE_OUT_NEW_2".
The main program was "ZRCOPCA02 ".
The termination occurred in line 918 of the source code of the (Include)
program "LSLVCF01 "
of the source code of program "LSLVCF01 " (when calling the editor 9180).
Source code extract
008880 gs_roid-row_id = rs_row-index * -1.
008890 endif.
008900 gs_roid-sub_row_id = rs_row-rowtype+7(10).
008910 gs_poid-row_id = gs_roid-row_id.
008920 gs_poid-sub_row_id = gs_roid-sub_row_id.
008930 gs_poid-rowtype = rs_row-rowtype.
008940 gs_poid-index = rs_row-index.
008950 insert gs_poid into table rt_poid.
008960 endif.
008970 append gs_roid to rt_roid.
008980
008990 loop at rt_fieldcat assigning <ls_fieldcat> where tech ne 'X' and
009000 no_out ne 'X'.
009010
009020 if gflg_invisible = 'X'.
009030 if <ls_fieldcat>-do_sum is initial.
009040 clear gflg_invisible.
009050 continue.
009060 else.
009070 clear g_col_counter.
009080 clear gflg_invisible.
009090 endif.
009100 endif.
009110
009120 clear gs_lvc_data.
009130 clear g_style.
009140
009150 assign component
009160 <ls_fieldcat>-fieldname of structure rt_data to <g_field>.
009170 if sy-subrc ne 0.
> message x000(0k).
009190 endif.
009200
009210 g_col_counter = g_col_counter + 1.
009220
009230 gs_lvc_data-row_pos = r_row_counter.
009240 gs_lvc_data-col_pos = g_col_counter.
009250 gs_lvc_data-row_id = gs_roid-row_id.
009260 gs_lvc_data-sub_row_id = gs_roid-sub_row_id.
009270
009280 * Endtotal and average
009290 if rs_row-rowtype(1) ca 'T' and <ls_fieldcat>-do_sum = 'C'.
009300 * save the actual grouplevel information
009310 gs_grouplevels = rs_grouplevels.
009320 clear g_lines.
009330
009340 * get number of lines of the collect table
009350 describe table rt_data lines g_lines.
009360 * if there is only one line or the field has no references so
009370 * that only the first line has to be considered
Thanks,
fractal
null -
Short Dump While Changing reservation line using BAPI_ALM_ORDER_MAINTAIN
Hello!
I have a problem changing the reservation line using BAPI_ALM_ORDER_MAINTAIN. I am very sure that I am passing all correct parameters in BAPI. It gives short dump with type MESSAGE_TYPE_X and main program "SAPLCOBC" or "LCOBCU02" and "READ_RESB_IND". at line
Satz gefunden?
IF sy-subrc <> 0.
MESSAGE x901. "n779835
ENDIF.
This dump comes only when I run my Transfers workbench for the first time, when I run it for the second time, it executes correctly and reservation line gets changed successfully.
Does anyone have face such problem or have any ideas about how this can be solved??
Please let me know if you need more information......Hi Km,
Here is your answer:
SAP Note 1269069 - BAPI_ALM_ORDER_MAINTAIN: Runtime error MESSAGE_TYPE_X
https://websmp130.sap-ag.de/sap(bD1lbiZjPTAwMQ==)/bc/bsp/spn/sapnotes/index2.htm?numm=1269069
Also henceforth Pls try to navigate through service market place if you find Issues with Standard SAP Program as somebody else might have faced the same and there must be solution readily available.
Let me know if it helps.
Regards
Shital
Edited by: shital phadake on Mar 23, 2009 6:59 PM -
Dump for custom planning books in SDP94
Hi,
We are having a fresh SCM APO 5.0 installation. We used to get a dump whenbever the SDP 94 transaction was executed. We found a SAP note 889989 and applied. Now the problem is it is dumping for any other planning book except the standard SAP delivered ones when the SDP94 transaction is executed. I found a note 498861 but does it help?
Here is the dump:
Runtime Errors MESSAGE_TYPE_X
Date and Time 10/10/2007 16:39:31
Short text
The current application triggered a termination with a short dump.
What happened?
The current application program detected a situation which really
should not occur. Therefore, a termination with a short dump was
triggered on purpose by the key word MESSAGE (type X).
Error analysis
Short text of error message:
Control Framework : Error processing control
Long text of error message:
Diagnosis
An error occurred when the system tried to process the commands
from the Automation Queue on the presentation server.
There are several possible reasons for this:
- The installation of the SAP GUI on the presentation server is
faulty or obsolete.
- There is an error in the application program
- There is an error in the SAPGUI or an integrated control
Procedure
1. Make sure that you have imported the appropriate Support
Package, the current kernel, and GUI patch for the release of your
system
2. Check whether the error occurs locally on one or a few PCs, or
generally on all PCs. Note whether the error only occurs for some
users, for example because of a specific Customizing setting.
If it only occurs locally, this suggests an installation problem
with the PC. Check the installation; if necessary, reinstall thesoftware. In the dump, search for the SY-MSGLI field, since it may
point to the cause of the error.
3. Activate the Automation Trace (in accordance with SAP Note
158985).
4.Start the transaction and continue until the screen immediately
before the dump.
5. From the System -> Utilities menu, choose Autom. Queue,
Synchronous Processing.
The status bar of the GUI displays the text:
"Automation synchron flush mode on"
6. If you now proceed with the application, the short dump will
display the ABAP call that caused the error; the Automation Trace
will contain the error on the presentation server.
7. If necessary, load the short dump and trace files on to
sapservX, so that SAP can analyze them.
Trigger Location of Runtime Error
Program SAPLOLEA
Include LOLEAU02
Row 29
Module type (FUNCTION)
Module Name AC_SYSTEM_FLUSH
Can any one suggest me a solution please?
Thanks.hi Raj,
this normally happens for all the new installations when opening the planning books with tcode /SAPAPO/SDP94. every new installation gives different dump with the above tcode. the best option is to contact the SAP team.
regards, -
MESSAGE_TYPE_X - In PR5
All,
I am done some code changes in Program ZEX_SAPLXRSA related to structure ZAMC11VA0ITM ,And field has been added in DS-2LIS_11_VAITM.
All chnages transported to Production System,setup tables filling done and pulled data to ODS.
In daily loads before starting loads in R/3 2LIS-02,03,11,13 V3 Jobs could be running , but today 2LIS 11 R/3 job cancelled due to shoort dump ( MESSAGE_TYPE_X ) in PR5 System.
Once this 2LIS 11 R/3 Job is in finished status only i can pull the data to BW,All my daily loads dependent on 2LIS 11(SALES Data) PLease suggest.
How could i resolve the dump(MESSAGE_TYPE_X ) in PR5 to success the 2LIS 11 R/3 Job.
Please suggest ASAP.Hi ,
Can you please paste the dump here?
MESSAGE_TYPE_X is a generic dump and it occurs for a variety of reasons.
Regards,
SK -
MESSAGE_TYPE_X error
Hello all,
We are facing an issue, that "Message_type_X " short dump occurs .
the actual short dump message is:
"MESSAGE_TYPE_X" " " |
"CL_RSQ_ISET_SERVICE===========CP" or "CL_RSQ_ISET_SERVICE===========CM016"
"EXTEND_FIELD_BUFFER" .
kindly help me..
|hi,
kindly check SAP Note 1137254 , it might be helpfult to you
also check in sm21 about system log, in ST22 check on information on where termiinated and in error analysis that will give you some clue on job which is effected
regards
laksh -
APD: dump GETWA_NOT_ASSIGNED
When I try to display the data of a query as a source in the Analysis Process Designer (APD) in RSANWB, the dump GETWA_NOT_ASSIGNED occurs in the method CL_RSCRMBW_BAPI=>GET_KYF_DETAILS_BAPI as an error. Could anybody help me? Please give me your thoughts about it.
Hi Tatsiana,
You should check if the note 1408037 would solve the problem.
Best Regards,
Vincent -
Short Dump 'ASSERTION_FAILED' during updating partner Functions
Hi All,
I am updating the Partner Functions for the Customers using FM 'SD_CUSTOMER_MAINTAIN_ALL' and passing the partner functions and numbers to the XKNVP structure.
while running the program in am getting the short dump as ASSERTION_FAILED.
Detailed Description:
In the running application program, the ASSERT statement recognized a situation that should not have occurred.
The runtime error was triggered for one of these reasons:
- For the checkpoint group specified with the ASSERT statement, the activation mode is set to "abort".
- Via a system variant, the activation mode is globally set to "abort" for checkpoint groups in this system.
- The activation mode is set to "abort" on program level.
- The ASSERT statement is not assigned to any checkpoint group.
The Dump is occuring in the method 'get_cvic_cust_to_bp1_line'.
We have searched for a relevant SAP note but could not find any.
can any one please help to solve this issue?
Helpful answer will surely be rewarded.
Thanks in Advance,
Asif Ali KhanWhen you are (absolutely) sure you are using this function module in the correct way, only then opening a message for SAP is liable. However, most of the times this happens because not all (or all) parameters are not provided for the FM to work properly, or what ever reason that may be.
It might be helpful to determine the checkpoint group and have a look at the log in transaction SAAB. This might give you a clue as to where the problems lies. -
Dump after new Parameter in WD Application
Hi,
After adding a new parameter to a WebDynpro Application it dumps as the parameter is not sent with an initial value in case it is not provided in the URL.
First I added the new parameter to the inbound plug handler (set to "Startup") parameters. After that I could add it using the F4 help in the parameter tab of the application.
When executing in the test system everything works fine! But after transporting it to the q system, it dumps in a generated check method before the plug handler, as the passed parameter list (from application) does not contain an initial value for the new parameter (for which a check was generated correctly).
My guess is that something goes wrong in the generation of the WD application. But as this happens again and again after new transports, I do not know how to tackle this...
Does anyone know how this is caused and most important how I can repair it??
Kind Regards
RobertHi,
Found a solution myself:
Setting the parameter to "optional" in the inbound plug handler did the trick.
As all other parameters (like over 10) do not need that flag to work without a value from the URL, I do not think this is the master solution. But it nevertheless works!
Kind Regards
Robert
Maybe you are looking for
-
When i serch for a term on Firefoxthe page comes up with all the relevant serch items but when i click on one of them it takes me to a completely different web page to that on the serched items. So the only way i can find is to cut and paste the link
-
Windows 8 will not recognize iPhone 5 USB
I just bought a new computer and went to setup itunes, My ipad synced well but iphone 5 will not get recognized in windows 8, can anyone who has overcame this help please Thank you all
-
Replace swatches and text?
Is it possible (with javascript code) to do the following? 1. Prompt user to select a color from a predetermined set of colors (hard coded in the script) via a dropdown list 2. Take the value that the user selects, and replace the color of all it
-
Won't display popup needed for download
I accidentally deleted adobe flash player 9, thinking I didn't need it since I had version 10 and now youtube is saying I need an up-to-date version. I'm not sure if my deleted that is the reason it won't work but I went to the adobe website to inst
-
The Loupe Tool feature of Adobe Pro X does not work
When working properly the area within the blue box should be magnified. The magnification of the designated area should appear off to the side. This is not happening. The blue box is visible but no magnification.