Текущее время: Сб, июл 26 2025, 08:57

Часовой пояс: UTC + 3 часа


Правила форума


Вопросы по ППМ (MRP) - сюда.
Вопросы по классификации - сюда.
Вопросы по входящим поставкам - сюда.



Начать новую тему Ответить на тему  [ Сообщений: 2 ] 
Автор Сообщение
 Заголовок сообщения: ОЗМ + новые тексты
СообщениеДобавлено: Пн, апр 17 2006, 17:20 
Менеджер
Менеджер

Зарегистрирован:
Вт, дек 07 2004, 10:39
Сообщения: 610
хочеться добавить к основной записи материалов пару своих текстов
куда искать?

_________________
полный SAPец


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Пн, май 22 2006, 00:54 
Специалист
Специалист

Зарегистрирован:
Сб, ноя 13 2004, 00:44
Сообщения: 163
Смотри в дополнительных данных там можно вводить тексты (названия) на языках которые тебе нужны.

Если программно, то пользуйся, авось пригодиться :D
Это загрузка из текстового файла, состоящего из двух столбцов
код материала текст
В приведенном примере прога запишет данный текст как русский,
если поставишь например, FLANGUAGE = 'Е' то будет язык туманного Альбиона :)

*&---------------------------------------------------------------------*
*& Report ZMM_TEX *
*& *
*&---------------------------------------------------------------------*
*& *
*& *
*&---------------------------------------------------------------------*

REPORT ZMM_TEX.

TABLES: MARA,
MVKE.

*SELECTION SCREEN
SELECTION-SCREEN BEGIN OF BLOCK MAIN.

SELECTION-SCREEN BEGIN OF BLOCK CHOISE WITH FRAME TITLE TEXT-001.


SELECTION-SCREEN END OF BLOCK CHOISE.

PARAMETER FILENM(60) TYPE C DEFAULT ''.

SELECTION-SCREEN END OF BLOCK MAIN.
*END OF SELECTION SCREEN

* DATA DEFENITION
DATA: FNAME TYPE STRING.

* For create file dialog
data: v_file type filetable,
v_fileline type file_table,
v_rc type i.

TYPES: BEGIN OF t_do,
MATNR TYPE MARA-MATNR, " Код материала
TDLINE TYPE tline-TDLINE, " Текст
END OF t_do.
DATA: i_do TYPE STANDARD TABLE OF t_do WITH HEADER LINE.
DATA: lt_line TYPE TABLE OF tline WITH HEADER LINE,
l_header TYPE thead .
DATA: FNAME like THEAD-TDNAME.

* END OF DATA DESCRIPTION

AT LINE-SELECTION.

AT SELECTION-SCREEN.
IF FILENM EQ ''.
MESSAGE TEXT-002 TYPE 'E'.
ENDIF.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILENM.
FILENM = ''.
clear v_file.
call method cl_gui_frontend_services=>file_open_dialog
exporting
window_title = 'Choose uploading file..'
changing
file_table = v_file
rc = v_rc.
if sy-subrc = 0.
read table v_file into v_fileline index '1'.
endif.
FILENM = v_fileline.

START-OF-SELECTION.


PERFORM ZMM_TEX.

*&---------------------------------------------------------------------*
*& Form ZMM_TEX.
*&---------------------------------------------------------------------*

FORM ZMM_TEX.
fname = filenm.
CALL FUNCTION 'GUI_UPLOAD'
EXPORTING
has_field_separator = 'X'
dat_mode = 'X'
filename = fname
filetype = 'ASC'
TABLES
data_tab = i_do
EXCEPTIONS
file_open_error = 2
OTHERS = 3.

LOOP AT i_do.

CLEAR lt_line.

MOVE i_do-tdline TO lt_line-tdline.
APPEND lt_line.
FNAME = i_do-matnr.

CALL FUNCTION 'CREATE_TEXT'
EXPORTING
FID = 'BEST'
FLANGUAGE = 'R' "Язык в частности русский
FNAME = FNAME
FOBJECT = 'MATERIAL'
* SAVE_DIRECT = 'X'
* FFORMAT = '*'
TABLES
FLINES = lt_line
EXCEPTIONS
NO_INIT = 1
NO_SAVE = 2
OTHERS = 3.

ENDLOOP.

COMMIT WORK AND WAIT.
SKIP 2.
WRITE: /2 'Материал(ы)' COLOR 4.
WRITE: /2'изменен(ы)' COLOR 5.

ENDFORM.


Принять этот ответ
Вернуться к началу
 Профиль  
 
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 2 ] 

Часовой пояс: UTC + 3 часа


Кто сейчас на конференции

Сейчас этот форум просматривают: Mixail167


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
cron
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
Русская поддержка phpBB