HI Gurus!
at my client site , we have upgraded 4.7 to ECC6. Now functional consultants are testing the system.When HR consultant working on PPOCE t-code ,the patch no of SAP HR - 0007. its giving runtime error.
Runtime Errors CREATE_DATA_UNKNOWN_TYPE
Except. CX_SY_CREATE_DATA_ERROR Date and Time 19.08.2008 14:42:44
Short text
CREATE DATA: The specified type "HRP1680" is no valid data type.
What happened?
Error in the ABAP Application Program
The current ABAP program "SAPLRHDB" had to be terminated because it has come across a statement that unfortunately cannot be executed.
Error analysis :An exception occurred that is explained in detail below.
The exception, which is assigned to class 'CX_SY_CREATE_DATA_ERROR', was not caught in
procedure "FILL_I777D" "(FORM)", nor was it propagated by a RAISING clause.
Since the caller of the procedure could not have anticipated that the exception would occur, the current program is terminated.
The reason for the exception is:
The dynamically specified type "HRP1680" at CREATE DATA is no valid data type.
The type is either unknown or an object type.
Missing RAISING Clause in Interface
Program SAPLRHDB
Include LRHDBF00
Row 177
Module type (FORM)
Module Name FILL_I777D
Trigger Location of Exception
Program SAPLRHDB
Include LRHDBF00
Row 308
Module type(FORM)
Module Name FILL_I777D
Source Code Extract
Line SourceCde
278 ** HEADER = FI_HEADER "ANDBCEK008264
279 ** TABLES "ANDBCEK008264
280 ** FIELDTAB = FI_TAB "ANDBCEK008264
281 ** EXCEPTIONS "ANDBCEK008264
282 ** OTHERS = 4. "ANDBCEK008264
283 * "ANDBCEK008264
284 * CALL FUNCTION 'DDIF_FIELDINFO_GET' "ANDBCEK008264
285 * EXPORTING "ANDBCEK008264
286 * tabname = fi_tabname "ANDBCEK008264
287 ** FIELDNAME = ' ' "ANDBCEK008264
288 ** LANGU = SY-LANGU "ANDBCEK008264
289 ** LFIELDNAME = ' ' "ANDBCEK008264
290 ** ALL_TYPES = ' ' "ANDBCEK008264
291 * IMPORTING "ANDBCEK008264
292 * x030l_wa = fi_header "ANDBCEK008264
293 ** DDOBJTYPE = "ANDBCEK008264
294 ** DFIES_WA = "ANDBCEK008264
295 ** TABLES "ANDBCEK008264
296 ** DFIES_TAB = "ANDBCEK008264
297 * EXCEPTIONS "ANDBCEK008264
298 * not_found = 1 "ANDBCEK008264
299 * internal_error = 2 "ANDBCEK008264
300 * OTHERS = 3. "ANDBCEK008264
301 *
302 * IF sy-subrc EQ 0.
303 * i777d-tbtab_tabof = fi_header-tablen - tabnr_intlen.
304 * i777d-pnnnn_tabof = i777d-tbtab_tabof - 8.
305 * ENDIF.
306
307 * ASSIGN char TO <any_field> CASTING TYPE (fi_tabname). "ANDDDIF
create data anyfield type (fi_tabname). "ANDUNI
309 assign anyfield->* to <any_field>. "ANDUNI
310
311 * we need a character view of <any_field> !!! "ANDUNI
312 assign <any_field> to <char_field> casting type c. "ANDUNI
313
314 * DESCRIBE FIELD <any_field> LENGTH tablength "ANDDDIF
315 * IN BYTE MODE. "ANDDDIF
316
317 DESCRIBE FIELD <char_field> LENGTH tablength "ANDUNI
318 IN CHARACTER MODE. "ANDUNI
319
320 <i777d>-tbtab_tabof = tablength - tabnr_intlen. "ANDDDIF
321 <i777d>-pnnnn_tabof = <i777d>-tbtab_tabof - 8. "ANDDDIF
322
323 ENDIF.
324 IF <i777d>-ext_infty NE space. "VWMEXT
325 READ TABLE i77id
326 WITH KEY infty = <i777d>-infty
327 BINARY SEARCH.