Подскажите, что не так, выдается ошибка
The work area "ALL_CUSTOMERS" is not long enough.

*&---------------------------------------------------------------------*
*& Report ZEXPORT *
*& *
*&---------------------------------------------------------------------*
*& *
*& *
*&---------------------------------------------------------------------*

REPORT ZEXPORT.

PARAMETERS FILENAME(128) DEFAULT 'c:\testfile.txt'
LOWER CASE.
TABLES pa0000.
DATA ALL_CUSTOMERS LIKE pa0000-pernr OCCURS 100
WITH HEADER LINE.
* Get data for file transfer
SELECT * FROM pa0000 INTO TABLE ALL_CUSTOMERS
where stat3 eq '0'.


* Transferring Data
CALL FUNCTION 'WS_DOWNLOAD'
EXPORTING
FILENAME = FILENAME
TABLES
DATA_TAB = ALL_CUSTOMERS
EXCEPTIONS
FILE_OPEN_ERROR = 1
OTHERS = 2.
CASE SY-SUBRC.
WHEN 1.
WRITE 'Error when file opened'.
EXIT.
WHEN 2.
WRITE 'Error during data transfer'.
EXIT.
ENDCASE.

INTO TABLE ALL_CUSTOMERS -> INTO corresponding fields of TABLE ALL_CUSTOMERS

а лучше не SELECT *

а SELECT PERNR

исправил теперь выдает The work area (or internal table) "ALL_CUSTOMERS" is not structured.

SELECT PERNR FROM pa0000 APPENDING TABLE ALL_CUSTOMERS

А КАК ДОРАБОТАТЬ ПРОГРАММУ ЧТОБЫ ПОЛУЧИТЬ ТЕКСТОВЫЙ ФАЙЛ ВИДА,
<?xml version="1.0" encoding="UTF-8"
<HR-DELUSER>
<USER>
<TAB_NUMBER>51000113</TAB_NUMBER>
</USER>

<USER>
<TAB_NUMBER>51000114</TAB_NUMBER>
</USER>

<USER>
<TAB_NUMBER>51000115</TAB_NUMBER>
</USER>

</HR-DELUSER>
ГДЕ
<USER>
<TAB_NUMBER>51000114</TAB_NUMBER>
</USER>
БУДЕТ СТОЛЬКО РАЗ СКОЛЬКО БУДЕТ НОМЕРОВ

заранее спасибо


PARAMETERS FILENAME(128) DEFAULT 'c:\testfile.txt'
LOWER CASE.
TABLES pa0000.
DATA: begin of ALL_CUSTOMERS occurs 0,
pernr LIKE pa0000-pernr,
end of all_customers.

data: begin of st occurs 0,
stroka(255),
end of st.


* Get data for file transfer
SELECT PERNR FROM pa0000 APPENDING TABLE ALL_CUSTOMERS
where stat3 eq '0'.

clear: st. refresh st.
st-stroka = '<?xml version="1.0" encoding="UTF-8"'. append st.
st-stroka = '<HR-DELUSER>'. append st.

loop at ALL_CUSTOMERS.
clear: st.
st-stroka = '<USER>'. append st.
clear: st.
concatenate '<TAB_NUMBER>' all_customers-pernr '</TAB_NUMBER>'
into st-stroka.
append st.
clear: st.
st-stroka = '</USER>'. append st.
clear: st. append st.

endloop.

* Transferring Data
CALL FUNCTION 'WS_DOWNLOAD'
EXPORTING
FILENAME = FILENAME
filetype = 'DAT'
TABLES
DATA_TAB = st
EXCEPTIONS
FILE_OPEN_ERROR = 1
OTHERS = 2.
CASE SY-SUBRC.
WHEN 1.
WRITE 'Error when file opened'.
EXIT.
WHEN 2.
WRITE 'Error during data transfer'.
EXIT.
ENDCASE.

просто огромное спасибо, может я могу как-то отблагодарить, например, поделиться материалами по Abap, а не подскажешь, как сделать так чтобы для для каждого номера создавался отдельный файл например testfile51000113, следующий testfile51000113 вида
<?xml version="1.0" encoding="UTF-8"
<HR-DELUSER>
<USER>
<TAB_NUMBER>51000113</TAB_NUMBER>
</USER>
</HR-DELUSER>

PARAMETERS FILENAME(128) default 'c:\testfile' LOWER CASE.
TABLES pa0000.
DATA: begin of ALL_CUSTOMERS occurs 0,
pernr LIKE pa0000-pernr,
end of all_customers,
filloc(128).


data: begin of st occurs 0,
stroka(255),
end of st.


* Get data for file transfer
SELECT PERNR FROM pa0000 APPENDING TABLE ALL_CUSTOMERS
where stat3 eq '0'.
condense: filename.

loop at ALL_CUSTOMERS.
concatenate filename all_customers-pernr '.htm' into filloc.
clear: st. refresh st.
st-stroka = '<?xml version="1.0" encoding="UTF-8"'. append st.
st-stroka = '<HR-DELUSER>'. append st.

clear: st.
st-stroka = '<USER>'. append st.
clear: st.
concatenate '<TAB_NUMBER>' all_customers-pernr '</TAB_NUMBER>'
into st-stroka.
append st.
clear: st.
st-stroka = '</USER>'. append st.
clear: st. append st.

* Transferring Data
CALL FUNCTION 'WS_DOWNLOAD'
EXPORTING
FILENAME = FILLOC
filetype = 'DAT'
TABLES
DATA_TAB = st
EXCEPTIONS
FILE_OPEN_ERROR = 1
OTHERS = 2.
CASE SY-SUBRC.
WHEN 1.
WRITE 'Error when file opened'.
EXIT.
WHEN 2.
WRITE 'Error during data transfer'.
EXIT.
ENDCASE.

endloop.

Будь добр напиши свое мыло

umbm@yandex.ru

а зачем?

Почту открой, как лучше реализовать задачу в принципе все тоже самое, но короче запускается программа, которая в начале, собирает данные по разным условиям из нескольких таблиц во внутреннюю, выгружает для каждого номера файл, затем делает тоже самое по другим таблицам и тоже выгружает, но уже один файл с несколькими номерами, а затем опять проходится по другим таблицам и выгружает опять несколько файлов

Почту открой, как лучше реализовать задачу в принципе все тоже самое, но короче запускается программа, которая в начале, собирает данные по разным условиям из нескольких таблиц во внутреннюю, выгружает для каждого номера файл, затем делает тоже самое по другим таблицам и тоже выгружает, но уже один файл с несколькими номерами, а затем опять проходится по другим таблицам и выгружает опять несколько файлов

и Вы откройте почту
путанно... так сразу не понять.
Может, конкретный пример?

Так нормально будет?
Создаем несколько внутренних таблиц, а затем их по порядку передаем для выгрузки