Доброго.

Ни у кого нет Z функции сгенерить GUID формата XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX по всем правилам?
Для старенькой системы на ABAP 7.0

GUID_CREATE генерит немного не то что нужно.

Заранее спасибо.

Data: P_GUID_32 TYPE CHAR32,
P_GUID_36 TYPE CHAR36.

P_GUID_32 = CL_COM_PRODUCT=>GUID_CREATE( ).
CONCATENATE P_GUID_32(8) P_GUID_32+8(4) P_GUID_32+12(4) P_GUID_32+16(4) P_GUID_32+20(12) INTO P_GUID_36 SEPARATED BY '-'.

Что именно он генерит не то ?

Я так и предполагал своим методом примерно так и сделать. Но это колхоз какой то уж совсем.
+Ну то что буквы все большие.
Можно конечно пройтись по строке и случайным образом либо сделать uppper case либо lower case

ну раз так можно было... тогда приму и доделаю регистр )

да и уж больно они последовательны
например 3 вызова
63111452-695F-0029-E100-80000A065F0B
63111453-695F-0029-E100-80000A065F0B
63111454-695F-0029-E100-80000A065F0B

Я знаю зачем это. но хотелось было более рандомно.
Ладно, оставим так.

Спасибо.

Ну добавь рандома сам. Что тебе мешает?