Skip to Content
0
Former Member
Aug 13, 2007 at 10:27 AM

Field synmobl code

10 Views

Hi Experts,

Pls see the below code:

TYPES: BEGIN OF Y_LIPS,

VBELN LIKE LIPS-VBELN,

POSNR LIKE LIPS-POSNR,

MATNR LIKE LIPS-MATNR,

LFIMG LIKE LIPS-LFIMG,

ARKTX LIKE LIPS-ARKTX,

VGBEL LIKE LIPS-VGBEL,

VRKME LIKE LIPS-VRKME,

VBELV LIKE VBFA-VBELV,

END OF Y_LIPS.

TYPES: BEGIN OF Y_LIPS2,

VBELN LIKE LIPS-VBELN,

POSNR LIKE LIPS-POSNR,

KUNAG LIKE LIKP-KUNAG,

MATNR LIKE LIPS-MATNR,

LFIMG LIKE LIPS-LFIMG,

ARKTX LIKE LIPS-ARKTX,

VGBEL LIKE LIPS-VGBEL,

WADAT_IST LIKE LIKP-WADAT_IST,

VRKME LIKE LIPS-VRKME,

VBELV LIKE VBFA-VBELV,

END OF Y_LIPS2.

DATA:T_LIPS TYPE STANDARD TABLE OF Y_LIPS,

DATA:T_LIPS2 TYPE STANDARD TABLE OF Y_LIPS2.

FIELD-SYMBOLSl:<FS_T_LIPS> TYPE Y_LIPS,

<FS_T_LIPS2> TYPE Y_LIPS2.

IF NOT T_LIPS IS INITIAL.

SORT T_LIPS BY VBELN MATNR.

UNASSIGN <FS_T_LIPS>.

LOOP AT T_LIPS ASSIGNING <FS_T_LIPS>.

if <fs_t_lips> is assigned.

<FS_T_LIPS2>-VBELN = <FS_T_LIPS>-VBELN.

<FS_T_LIPS2>-MATNR = <FS_T_LIPS>-MATNR.

<FS_T_LIPS2>-LFIMG = <FS_T_LIPS>-LFIMG.

<FS_T_LIPS2>-ARKTX = <FS_T_LIPS>-ARKTX.

<FS_T_LIPS2>-VGBEL = <FS_T_LIPS>-VGBEL.

<FS_T_LIPS2>-VRKME = <FS_T_LIPS>-VRKME.

<FS_T_LIPS2>-VRKME = <FS_T_LIPS>-VRKME.

<FS_T_LIPS2>-VBELV = <FS_T_LIPS>-VBELV.

COLLECT <FS_T_LIPS2> INTO T_LIPS2.

endif.

ENDLOOP.

ENDIF.

SO HERE THE PGM IS GOING TO DUMP AND GIVING ERROR IN DUMP LIKE:

FILED-SYMBOL Field symbol has not yet been assigned.

THE DUMP IS AT THE STATEMENT:<FS_T_LIPS2>-VBELN = <FS_T_LIPS>-VBELN.

Can any body tell me what may be the wrong the above code.