Hi,
I am getting the following error when I am trying to access SDp94. I am actually working on a different PA/POS/Planning book combination than the standard one but the system keeps going to 9ADP001 and asking if I want to initialize it.
The 9ADP001 was inactive and so I activated that and then been to SDp94, this time I was asked whether to initialize the 9ADP001 again and I initialized it. I am getting the following dump:
Runtime Errors RAISE_EXCEPTION
Date and Time 09/17/2007 17:52:14
Short text
Exception condition "CNTL_ERROR" raised.
What happened?
The current ABAP/4 program encountered an unexpected
situation.
Error analysis
A RAISE statement in the program "CL_GUI_RESOURCES==============CP" raised the
exception
condition "CNTL_ERROR".
Since the exception was not intercepted by a superior
program, processing was terminated.
Short description of exception condition:
For detailed documentation of the exception condition, use
Transaction SE37 (Function Library). You can take the called
function module from the display of active calls.
-
Trigger Location of Runtime Error
Program CL_GUI_RESOURCES==============CP
Include CL_GUI_RESOURCES==============CM00B
Row 40
Module type (METHOD)
Module Name GET_FONT_INFOS
Source Code Extract
Line SourceCde
10 CALL METHOD OF hguiservices-obj 'GetServiceByName' = hservice
11 NO FLUSH
12 EXPORTING #1 = 'SAPGUIResources.1'.
13 IF sy-subrc <> 0. RAISE error_get_obj. ENDIF.
14 GET PROPERTY OF hservice-obj 'Fonts' = hfonts-obj no flush.
15 IF sy-subrc <> 0. RAISE cntl_error. ENDIF.
16
17 *** fontsize
18 GET PROPERTY OF hfonts-obj 'FontSize' = fontsize no flush
exporting #1 = '0'.
IF sy-subrc <> 0. RAISE cntl_error. ENDIF.
fontname
GET PROPERTY OF hfonts-obj 'FontName' = fontname no flush
exporting #1 = '0'.
IF sy-subrc <> 0. RAISE cntl_error. ENDIF.
free objects
FREE OBJECT hfonts-obj no flush.
IF sy-subrc <> 0. RAISE cntl_error. ENDIF.
FREE OBJECT hservice-obj no flush.
IF sy-subrc <> 0. RAISE cntl_error. ENDIF.
FREE OBJECT hguiservices-obj no flush.
IF sy-subrc <> 0. RAISE cntl_error. ENDIF.
flush now ?
IF NOT with_flush IS INITIAL.
CALL FUNCTION 'CONTROL_FLUSH'
EXCEPTIONS
cntl_system_error = 1
cntl_error = 2
OTHERS = 3.
IF sy-subrc <> 0. RAISE cntl_error. ENDIF.
ENDIF.
endmethod.
Message was edited by:
Raj G