open dataset

[Former Member]

DATA : lv_line type string.

IF NOT it_final_itab[] IS INITIAL.

OPEN DATASET p_file FOR OUTPUT IN TEXT MODE ENCODING NON-UNICODE.

IF sy-subrc NE 0.

MESSAGE 'Error on output file read' TYPE 'E'.

ELSE.

LOOP AT it_final_itab INTO wa_final_itab.

CONCATENATE wa_final_itab-ext_ref_no "memb-cust-ac

wa_final_itab-branch_code "branch_code

wa_final_itab-stat "stat

wa_final_itab-finprod "act-type

wa_final_itab-bormcat "bormcat

wa_final_itab-EMP_NAME "loan-officer

wa_final_itab-contstartdt "applic-issue-date

wa_final_itab-due_date "adv_date

wa_final_itab-perioddate "pay-day

wa_final_itab-perioddate "repay-day

lv_loanbal "loan-bal

lv_od_principal "unpaid-principal-bal

lv_od_interest "cap-unpaid-int

lv_tot_int_due "INT

lv_curr_yr_int_due "INT-TAX-YTD

wa_final_itab-perioddate "DUE-STRT_DATE

wa_final_itab-budat "LST-FIN-DATE

wa_final_itab-zfbdt "CREDIT-DT

wa_final_itab-int_st_dt "INT-START-DATE

wa_final_itab-pen_due_dt "pen-due-dt

lv_pen_due_amt "pen-due-amount

wa_final_itab-inst_freq "loan-trm

wa_final_itab-bad_debt_ind "bad-debt-ind

wa_final_itab-in_npa_date "in-npa-date

wa_final_itab-repay_option "repay-option

lv_in_prov_amt "in-provision-amount

wa_final_itab-customer "customer

wa_final_itab-dsa "broker-no

wa_final_itab-last_adj_date "int-arr-dt

wa_final_itab-int_st_dt "INT-START-DATE

wa_final_itab-pen_due_dt "pen-due-dt

lv_pen_due_amt "pen-due-amount

wa_final_itab-inst_freq "loan-trm

wa_final_itab-rem_repays "rem-repays

wa_final_itab-bad_debt_ind "bad-debt-ind

wa_final_itab-in_npa_date "in-npa-date

lv_irr "store-rate

wa_final_itab-seg_code "seg-code

wa_final_itab-repay_option "repay-option

lv_zzdealbasicamt "ORI-SECURITY-VAL

wa_final_itab-zpdc_flag "borg-pdc-flag

lv_in_prov_amt "in-provision-amount

wa_final_itab-mora_flag "in-mora-flag

wa_final_itab-customer "customer

wa_final_itab-allocation_id "in-acc-no

wa_final_itab-dsa "broker-no

wa_final_itab-in_flag "in-flag

wa_final_itab-object_id "object_id

wa_final_itab-vkbur "br-no

wa_final_itab-vtweg "vtweg

wa_final_itab-grace_prd "grace_prd

wa_final_itab-vertn "vertn

lv_bormint "borm-int

wa_final_itab-classif_local_bk "classif_locak_bk

wa_final_itab-company_code "company_code

INTO lv_line SEPARATED BY '|'.

TRANSFER lv_line TO p_file.

ENDLOOP.

CLOSE DATASET p_file.

ENDIF.

after executing this code when i am checking file on appl server not all the fileds are getting displayed. is there any restriction on line size or what is the max size of string ?? in my case lv_line

[Former Member]

hi Santosh,

You are just unable to view the entire record. But all the fields are getting transferred on to application server.You can cross check that by downloading it on to a local file via .... SAVE AS -> LOCAL FILE...

Regards,

Santosh

[Former Member]

Hi,

yes restriction is there.

i got same scenario while seeing in appl sever it won't show total fields some fields missed.

But my basis people has down loaded that file using sftp that time has downloaded total content of file.

It is restricting based on idoc length.

it is the situation.

It won't show full file contents.

it is definetly use full .

[Former Member]

i have downloaded the file but still i am not able to view all fields..

[Former Member]

hi,

Check all the variables and workarea fields, which should be character type to write into a file in application server.

Regards

Kannaiah

[Former Member]

hi,

You downloaded in al11 by using menupath that time it won't show total fields to us.

they downloaded using sftp that time it has downloaded total fields to us.

ok i hope you understand concept.

*reward points.

[Former Member]

Use CG3Z to upload file from presentation to application server...i think in this scenario you will get full size of the file.

If you want to calculate size of the file:

CALL METHOD cl_gui_frontend_services=>file_get_size

EXPORTING

file_name = str

IMPORTING

file_size = size.

CALL METHOD cl_gui_cfw=>flush( ).

WRITE: / file(1000), size.

regards.

Dara.