Язык программирования?
09-06-2005 17:51
к комментариям - к полной версии
- понравилось!
Я приведу пример кода программы, слабо Вам определить язык разработки?
GET pernr.
CLEAR: tabl, massn, massg, is_find.
MOVE-CORRESPONDING pernr TO tabl.
SORT p0000 BY begda DESCENDING.
LOOP AT p0000.
IF p0000-stat2 <> '3'.
tabl-firedate = p0000-begda - 1.
massg = p0000-massg.
massn = p0000-massn.
is_find = 'X'.
ELSE.
IF is_find = 'X'.
EXIT.
ELSE.
CONTINUE.
ENDIF.
EXIT.
ENDIF.
ENDLOOP.
LI 3.9.25
вверх^
к полной версии
понравилось!
в evernote
Я приведу пример кода программы, слабо Вам определить язык разработки?
GET pernr.
CLEAR: tabl, massn, massg, is_find.
MOVE-CORRESPONDING pernr TO tabl.
SORT p0000 BY begda DESCENDING.
LOOP AT p0000.
IF p0000-stat2 <> '3'.
tabl-firedate = p0000-begda - 1.
massg = p0000-massg.
massn = p0000-massn.
is_find = 'X'.
ELSE.
IF is_find = 'X'.
EXIT.
ELSE.
CONTINUE.
ENDIF.
EXIT.
ENDIF.
ENDLOOP.
Комментарии (7):
Открытое забрало
09-06-2005-18:03
удалить
Открытое забрало, Сдаюсь... это кажется не паскалевское семейство...
мамочки, что мне предстоит....
Открытое забрало
10-06-2005-08:37
удалить
Есть такая корпоративная информационная система под названием SAP R/3. Есть у неё внутренний язык программирования под названием ABAP/4. Приведенный фрагмент кода принадлежит ему. Ох и дурной язык. Не переношу его на дух, но делать нечего, придется осваивать.
LI 3.9.25
smartcoder
17-06-2005-17:51
удалить
Открытое забрало, Я подумал что Fortran
Комментарии (7):
вверх^
Вы сейчас не можете прокомментировать это сообщение.
Дневник Язык программирования? | Открытое забрало - Дневник Открытое забрало |
Лента друзей Открытое забрало
/ Полная версия
Добавить в друзья
Страницы:
раньше»