Change data type..

[Former Member]

Hi expert..

I have one flat file from here i am locating Gross weight value.. moving it to the text field.. after doing some calculations i want insert this value into ztable.. but in ztable the data type is QUAN.. but in report I was reading from flat file as a text.. while uploading the data it shows me runtime error...

DATA : BEGIN OF IT_SAP_FINAL OCCURS 0,
        VKORG LIKE TVKO-VKORG,
        VTWEG LIKE MVKE-VTWEG,
        VENUM LIKE VEPO-VENUM,
        VEPOS LIKE VEPO-VEPOS,
        ROUTE LIKE ZBWPACKAGE_SAP-ROUTE,
       KUNWE LIKE ZBWPACKAGE_SAP-KUNWE,
        MATNR LIKE VEPO-MATNR,
        STWAE LIKE ZBWPACKAGE_SAP-STWAE,
        BRGEW(10),
       END OF IT_SAP_FINAL.

DATA : BEGIN OF ITAB_LZ OCCURS 0,
       EXTRACT(1000),
       END OF ITAB_LZ.

DATA : BEGIN OF IT_SPLIT OCCURS 0,
       TEXT(1000),
       END OF IT_SPLIT.
START-OF-SELECTION.

  CALL FUNCTION 'GUI_UPLOAD'
    EXPORTING
      FILENAME                = l_string
      FILETYPE                = 'DAT'
    TABLES
      DATA_TAB                = ITAB_LZ
    EXCEPTIONS
      FILE_OPEN_ERROR         = 1
      FILE_READ_ERROR         = 2
      NO_BATCH                = 3
      GUI_REFUSE_FILETRANSFER = 4
      INVALID_TYPE            = 5
      NO_AUTHORITY            = 6
      UNKNOWN_ERROR           = 7
      BAD_DATA_FORMAT         = 8
      HEADER_NOT_ALLOWED      = 9
      SEPARATOR_NOT_ALLOWED   = 10
      HEADER_TOO_LONG         = 11
      UNKNOWN_DP_ERROR        = 12
      ACCESS_DENIED           = 13
      DP_OUT_OF_MEMORY        = 14
      DISK_FULL               = 15
      DP_TIMEOUT              = 16
      OTHERS                  = 17.
  IF SY-SUBRC <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.

END-OF-SELECTION.


   LOOP AT ITAB_LZ.
      SPLIT ITAB_LZ-EXTRACT AT ';' INTO TABLE IT_SPLIT.
 IF SY-TABIX = '19' .
          IT_SAP_FINAL-BRGEW = IT_SPLIT.
        ENDIF.
ENDLOOP.


    LOOP AT IT_DEV.
      IT_LZ-MANDT = SY-MANDT.
      IT_LZ-HERK = IT_DEV-HERK.
      IT_LZ-SOMON = IT_DEV-SOMON.
      IT_LZ-VKORG = IT_DEV-VKORG.
      IT_LZ-VTWEG = '04'.
      IT_LZ-VENUM = IT_DEV-VENUM.
      IT_LZ-VEPOS = IT_DEV-VEPOS.
      IT_LZ-ROUTE = IT_DEV-ROUTE.
      IT_LZ-SPART = IT_DEV-SPART.
      IT_LZ-VBELN = IT_DEV-VBELN.
      IT_LZ-KUNAG = IT_DEV-KUNAG.
      IT_LZ-KUNWE = IT_DEV-KUNWE.
      IT_LZ-MATNR = IT_DEV-MATNR.
      IT_LZ-STWAE = IT_DEV-STWAE.
      IT_LZ-BRGEW = IT_DEV-BRGEW. " AT THIS POINT IT SHOWS ME RUNTIME ERROR
      IT_LZ-GEWEI = IT_DEV-GEWEI.
      IT_LZ-ZANZPACK = IT_DEV-ZANZPACK.
      IT_LZ-ZPAPREIS = IT_DEV-ZPAPREIS.
      IT_LZ-ZPR_PSHHE = IT_DEV-ZPR_PSHHE.
      IT_LZ-PROZENT = IT_DEV-PROZENT.
      APPEND IT_LZ.
    ENDLOOP.

    LOOP AT IT_LZ.
      INSERT INTO ZBWPACKAGE_LZ VALUES IT_LZ.
    ENDLOOP.

Please Help me...

[Former Member]

thanks

[Former Member]

Hi Ruchit,

whts the error u r getting..