How is table control data handled in Session Method?

[Former Member]

Hi Friends,

Can any1 plz tell me how is table control data handled in Session Method.

In Call tran we do it by count. But how in Session Method?

Thank you.

Regards,

Varun.

[Former Member]

Hi,

u can do it by both methods. u can check out this program. u need to comment the performs of table control fields and write ur own perform statements.And u have to declare the table control fields as separate internal tables.

report zcustomer_change_bict

no standard page heading line-size 255.

include bdcrecx1.

data: begin of it_record occurs 0,

kunnr like rf02d-kunnr,

d0360 like rf02d-d0360,

anred(30) type c,

name1(35) type c,

namev(35) type c,

telf1(35) type c,

abtnr(10) type c,

end of it_record.

data: begin of it_knvk1 occurs 0,

anred like knvk-anred,

end of it_knvk1.

data: begin of it_knvk2 occurs 0,

name1 like knvk-name1,

end of it_knvk2.

data: begin of it_knvk3 occurs 0,

namev like knvk-namev,

end of it_knvk3.

data: begin of it_knvk4 occurs 0,

telf1 like knvk-telf1,

end of it_knvk4.

data: begin of it_knvk5 occurs 0,

abtnr like knvk-abtnr,

end of it_knvk5.

data : fld(20) type c,

cnt(2) type n.

start-of-selection.

call function 'GUI_UPLOAD'

exporting

filename = 'C:\CUSTCH.TXT'

filetype = 'ASC'

has_field_separator = 'X'

tables

data_tab = it_record

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.

perform open_group.

loop at it_record.

refresh bdcdata.

refresh: it_knvk1,it_knvk2,it_knvk3,it_knvk4,it_knvk5.

split it_record-anred at ',' into table it_knvk1.

split it_record-name1 at ',' into table it_knvk2.

split it_record-namev at ',' into table it_knvk3.

split it_record-telf1 at ',' into table it_knvk4.

split it_record-abtnr at ',' into table it_knvk5.

screen 101

perform bdc_dynpro using 'SAPMF02D' '0101'.

perform bdc_field using 'BDC_CURSOR'

'RF02D-D0360'.

perform bdc_field using 'BDC_OKCODE'

'/00'.

perform bdc_field using 'RF02D-KUNNR'

it_record-kunnr.

perform bdc_field using 'RF02D-D0360'

it_record-d0360.

screen 360

perform bdc_dynpro using 'SAPMF02D' '0360'.

perform bdc_field using 'BDC_CURSOR'

'KNVK-ABTNR(01)'.

perform bdc_field using 'BDC_OKCODE'

'=ENTR'.

*perform bdc_field using 'KNVK-ANRED(01)'

• record-ANRED_01_003.

*perform bdc_field using 'KNVK-NAMEV(01)'

• record-NAMEV_01_004.

*perform bdc_field using 'KNVK-NAME1(01)'

• record-NAME1_01_005.

*perform bdc_field using 'KNVK-TELF1(01)'

• record-TELF1_01_006.

*perform bdc_field using 'KNVK-ABTNR(01)'

• record-ABTNR_01_007.

move 1 to cnt.

loop at it_knvk1 .

concatenate 'knvk-anred( ' cnt ' ) ' into fld.

perform bdc_field using fld it_knvk1-anred.

cnt = cnt + 1.

endloop.

move 1 to cnt.

loop at it_knvk2 .

concatenate 'knvk-name1( ' cnt ' ) ' into fld.

perform bdc_field using fld it_knvk2-name1.

cnt = cnt + 1.

endloop.

move 1 to cnt.

loop at it_knvk3 .

concatenate 'knvk-namev( ' cnt ' ) ' into fld.

perform bdc_field using fld it_knvk3-namev.

cnt = cnt + 1.

endloop.

move 1 to cnt.

loop at it_knvk4 .

concatenate 'knvk-telf1( ' cnt ' ) ' into fld.

perform bdc_field using fld it_knvk4-telf1.

cnt = cnt + 1.

endloop.

move 1 to cnt.

loop at it_knvk5 .

concatenate 'knvk-abtnr( ' cnt ' ) ' into fld.

perform bdc_field using fld it_knvk5-abtnr.

cnt = cnt + 1.

endloop.

screen 360

perform bdc_dynpro using 'SAPMF02D' '0360'.

perform bdc_field using 'BDC_CURSOR'

'KNVK-NAMEV(01)'.

perform bdc_field using 'BDC_OKCODE'

'=ENTR'.

perform bdc_transaction using 'XD02'.

endloop.

perform close_group.

[Former Member]

Hi Swathi,

Thank you for responding.

Please correct me if I am wrong:

Here in your code the is flat file data separated my commas (,)?

Thank you.

Regards,

Varun.

[Former Member]

Only the table control fields are having the separators as comma .

[Former Member]

Thank you Swetha.