Skip to Content
0
Former Member
Sep 20, 2007 at 11:10 AM

how to rectify th esyntax error...

18 Views

Hi Folks,

I have written a code like below. But when i am chking it showing an error as....

"A line of itab and WA_T_DATA are not mutually convertable. In a unicode program itab must have the same structure of a Unicode character". So, any one can help me on this....my code is.

&----


*& Report ZTESTREPORT_ITEM

*&

&----


REPORT ZTESTREPORT_ITEM.

TABLES: ZCRM_DM_VBRP.

TYPES: BEGIN OF TS_ZCRM_DM_VBRP,

VBELN LIKE ZCRM_DM_VBRP-VBELN,

POSNR LIKE ZCRM_DM_VBRP-POSNR,

AUBEL LIKE ZCRM_DM_VBRP-AUBEL,

AUPOS LIKE ZCRM_DM_VBRP-AUPOS,

MATNR LIKE ZCRM_DM_VBRP-MATNR,

CHARG LIKE ZCRM_DM_VBRP-CHARG,

WERKS LIKE ZCRM_DM_VBRP-WERKS,

FKIMG LIKE ZCRM_DM_VBRP-FKIMG,

NETWR LIKE ZCRM_DM_VBRP-NETWR,

ERDAT LIKE ZCRM_DM_VBRP-ERDAT,

UVALL LIKE ZCRM_DM_VBRP-UVALL,

END OF TS_ZCRM_DM_VBRP,

TT_ZCRM_DM_VBRP TYPE STANDARD TABLE OF TS_ZCRM_DM_VBRP.

  • Declaration of work area

DATA : WA_ZCRM_DM_VBRP TYPE TS_ZCRM_DM_VBRP,

ITAB TYPE TT_ZCRM_DM_VBRP.

DATA: T_OPTIONS TYPE TABLE OF RFC_DB_OPT INITIAL SIZE 10,

T_FIELDS TYPE TABLE OF RFC_DB_FLD INITIAL SIZE 10.

  • STRUCTURE DECLARATION

TYPES: BEGIN OF TS_DATA. "OCCURS 0,

INCLUDE STRUCTURE TAB512 .

TYPES: END OF TS_DATA,

TT_DATA TYPE STANDARD TABLE OF TS_DATA .

*WORK AREA DECLARATION

DATA: WA_T_DATA TYPE TS_DATA,

  • INTERNAL TABLE DECLARATION

ITAB1 TYPE TT_DATA.

********************************************************************************

  • START-OF-SELECTION *

********************************************************************************

START-OF-SELECTION.

*CALLING FUNCTION MODULE TO READ TABLE FROM REMOTE CLIENT.

CALL FUNCTION 'RFC_READ_TABLE' DESTINATION 'DAACLNT060'

EXPORTING

QUERY_TABLE = 'ZCRM_DM_VBRP'

DELIMITER = ' '

NO_DATA = ' '

ROWSKIPS = 0

ROWCOUNT = 0

TABLES

OPTIONS = T_OPTIONS

FIELDS = T_FIELDS

DATA = ITAB1

EXCEPTIONS

TABLE_NOT_AVAILABLE = 1

TABLE_WITHOUT_DATA = 2

OPTION_NOT_VALID = 3

FIELD_NOT_VALID = 4

NOT_AUTHORIZED = 5

DATA_BUFFER_EXCEEDED = 6

OTHERS = 7 .

IF SY-SUBRC <> 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

  • LOOP THE INTERNAL TABLE

LOOP AT ITAB1 INTO WA_T_DATA.

*APPEND WORK AREA TO THE INTENAL TABLE

APPEND WA_T_DATA TO ITAB.

ENDLOOP.

*INSERT INTERNAL TABLE DATA TO Z TABLE

INSERT ZCRM_DM_VBRP FROM TABLE ITAB.

  • CLAER THE WORK AREA.

CLEAR WA_T_DATA.