Decimal values in bdc

[Former Member]

Hi ,

Iam trying to upload file using bdc call transaction.

tcode is ff67.

iam not able to give decimal values in the input file iam getting error.The fields

i want to enter decimals is in bold(ssald and esald in the internal table declarations).

iam giving the dec code below, please help me

&----

---

• INTERNAL TABLES DECLARATIONS

&----

---

DATA : BEGIN OF bdcdata OCCURS 0.

INCLUDE STRUCTURE bdcdata.

DATA : END OF bdcdata.

DATA: LV_OUT TYPE STRING.

DATA : iopt LIKE ctu_params.

DATA : wa_rec_err TYPE i.

DATA : wa_rec_wri TYPE i.

DATA : wa_tot_rec TYPE i.

DATA : BEGIN OF gu_upload OCCURS 0,

hbkid LIKE febmka-hbkid,

hktid LIKE febmka-hktid,

aznum LIKE febmka-aznum,

azdat LIKE febmka-azdat,

<b>ssald LIKE febmka-waers,

esald LIKE febmka-waers,</b>

budtm LIKE febmka-budtm,

mnam1 LIKE febmka-mnam1,

jname LIKE febmka-jname,

vgman LIKE febmka-vgman,

valut LIKE febep-valut,

kwbtr(13) TYPE c,

chect_kf LIKE febmkk-chect_kf,

END OF gu_upload.

DATA:GU_DOWNLOAD LIKE GU_UPLOAD OCCURS 0 WITH HEADER LINE.

vjy*********************************

DATA: BEGIN OF itab OCCURS 0,

vgman LIKE febmka-vgman,

valut LIKE febep-valut,

kwbtr(13) TYPE c,

chect_kf LIKE febmkk-chect_kf,

END OF itab.

vjy)(_()00-8-09

DATA: BEGIN OF messtab OCCURS 0.

INCLUDE STRUCTURE bdcmsgcoll.

DATA: END OF messtab.

DATA: BEGIN OF messtab1 OCCURS 0.

INCLUDE STRUCTURE messtab.

DATA: END OF messtab1.

DATA : BEGIN OF int_count OCCURS 0.

INCLUDE STRUCTURE alsmex_tabline.

DATA : END OF int_count.

DATA: c_tcode LIKE sy-tcode VALUE 'FF67',

c_upd LIKE ctu_params-updmode VALUE 'S',

c_def_size LIKE ctu_params-defsize VALUE 'X'.

*VALUES FOR STARTING COLUMNS AND ROWS IN THE EXCEL SHEET

DATA : c_begcol TYPE i VALUE '1',

c_begrow TYPE i VALUE '1',

*DATA IS ENDED AT THE 13TH COLUMN IN THE EXCELSHEET

c_endcol TYPE i VALUE '13',

*LAST ROW IN THE EXCEL SHEET

c_endrow TYPE i VALUE '65536',

c_path(3) TYPE c VALUE 'C:\'.

[Former Member]

Hi ,

Iam trying to upload file using bdc call transaction.

tcode is ff67.

iam not able to give decimal values in the input file iam getting error.The fields

i want to enter decimals is in bold(ssald and esald in the internal table declarations).

iam giving the dec code below, please help me

&----

---

• INTERNAL TABLES DECLARATIONS

&----

---

DATA : BEGIN OF bdcdata OCCURS 0.

INCLUDE STRUCTURE bdcdata.

DATA : END OF bdcdata.

DATA: LV_OUT TYPE STRING.

DATA : iopt LIKE ctu_params.

DATA : wa_rec_err TYPE i.

DATA : wa_rec_wri TYPE i.

DATA : wa_tot_rec TYPE i.

DATA : BEGIN OF gu_upload OCCURS 0,

hbkid LIKE febmka-hbkid,

hktid LIKE febmka-hktid,

aznum LIKE febmka-aznum,

azdat LIKE febmka-azdat,

<b>ssald LIKE febmka-waers,

esald LIKE febmka-waers,</b>

budtm LIKE febmka-budtm,

mnam1 LIKE febmka-mnam1,

jname LIKE febmka-jname,

vgman LIKE febmka-vgman,

valut LIKE febep-valut,

kwbtr(13) TYPE c,

chect_kf LIKE febmkk-chect_kf,

END OF gu_upload.

DATA:GU_DOWNLOAD LIKE GU_UPLOAD OCCURS 0 WITH HEADER LINE.

vjy*********************************

DATA: BEGIN OF itab OCCURS 0,

vgman LIKE febmka-vgman,

valut LIKE febep-valut,

kwbtr(13) TYPE c,

chect_kf LIKE febmkk-chect_kf,

END OF itab.

vjy)(_()00-8-09

DATA: BEGIN OF messtab OCCURS 0.

INCLUDE STRUCTURE bdcmsgcoll.

DATA: END OF messtab.

DATA: BEGIN OF messtab1 OCCURS 0.

INCLUDE STRUCTURE messtab.

DATA: END OF messtab1.

DATA : BEGIN OF int_count OCCURS 0.

INCLUDE STRUCTURE alsmex_tabline.

DATA : END OF int_count.

DATA: c_tcode LIKE sy-tcode VALUE 'FF67',

c_upd LIKE ctu_params-updmode VALUE 'S',

c_def_size LIKE ctu_params-defsize VALUE 'X'.

*VALUES FOR STARTING COLUMNS AND ROWS IN THE EXCEL SHEET

DATA : c_begcol TYPE i VALUE '1',

c_begrow TYPE i VALUE '1',

*DATA IS ENDED AT THE 13TH COLUMN IN THE EXCELSHEET

c_endcol TYPE i VALUE '13',

*LAST ROW IN THE EXCEL SHEET

c_endrow TYPE i VALUE '65536',

c_path(3) TYPE c VALUE 'C:\'.

[Former Member]

Make the field of type character and then work.

Reward points if useful...

Thanks.

[Former Member]

u need to the decimal correction.

pls see the extract of the code below :
***********
SELECT currkey currdec FROM tcurx INTO TABLE tbl_tcurx
FOR ALL ENTRIES IN tbl_bsik1
WHERE currkey = tbl_bsik1-waers.

IF sy-subrc = 0.
SORT tbl_tcurx BY currkey.
ENDIF.


READ TABLE tbl_tcurx WITH KEY currkey = tbl_bsik-waers
BINARY SEARCH.
IF sy-subrc = 0.
* currency corrections
IF tbl_tcurx-currdec = 0.
tbl_final-wrbtr = tbl_bsik-wrbtr * 100.
ELSEIF tbl_tcurx-currdec = 1.
tbl_final-wrbtr = tbl_bsik-wrbtr * 10.
ELSEIF tbl_tcurx-currdec = 3.
tbl_final-wrbtr = tbl_bsik-wrbtr / 10.
ELSEIF tbl_tcurx-currdec = 5.
tbl_final-wrbtr = tbl_bsik-wrbtr / 1000.
ENDIF.
*** start
ELSE.
tbl_final-wrbtr = tbl_bsik-wrbtr.

***** end
ENDIF.


if found useful reward with points 

REgadrs,

Vasanth

[Former Member]

declare like this

ssald(10),

esald(10),

regards

Prabhu