ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / IBM DB2, WebSphere, IMS, U2 [игнор отключен] [закрыт для гостей] / Обертка для DSNUTILS
1 сообщений из 1, страница 1 из 1
Обертка для DSNUTILS
    #36830966
akmet
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
akmet
Гость
Доброго времени суток!

db2 9 z/OS
загружаю данные в таблицу LOAD'ом
LOAD запускаю при помощи SYSPROC.DSNUTILS - все отрабатывает на ура.

Попытался вызвать эту же процедуру внутри другой процедуры - получаю ругань на template

Текст вызова:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
CALL SYSPROC.DSNUTILS('CLRPEVT', 'NO', 
'TEMPLATE SUT1DDN
    DSN(DIGDDA.EVENTS.PSYSUT1)
    SPACE(90,90) TRK
    DISP(MOD,DELETE,CATLG)
    UNIT(SYSDA)
TEMPLATE SORTDDN
    DSN(DIGDDA.EVENTS.PSORTOU)
    SPACE(90,90) TRK
    DISP(MOD,DELETE,CATLG)
    UNIT(SYSDA)
TEMPLATE RECDDN
    DSN(DIGDDA.EVENTS.DUMMY)
    DISP(OLD,KEEP,KEEP)
LOAD DATA INDDN RECDDN 
    LOG NO NOCOPYPEND
    ENFORCE NO
    WORKDDN (SUT1DDN,SORTDDN)
    EBCDIC  CCSID(01025,65534)
    FORMAT DELIMITED
    INTO TABLE MYSCHEME.MYTABLE PART 3 REPLACE',
?, 'ANY',
'', '',  0 ,
'', '',  0 ,
'', '',  0 ,
'', '',  0 ,
'', '',  0 ,
'', '',  0 ,
'', '',  0 ,
'', '',  0 ,
'', '',  0 ,
'', '',  0 ,
'', '',  0 ,
'', '',  0 );

Если этот же вызов обернуть в процедуру, получим:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
SEQNO       TEXT                                                                                                                                                                                                                                                           
 1            1DSNU000I     246   16 : 46 : 15 . 21  DSNUGUTC - OUTPUT START FOR UTILITY, UTILID = CLRPEVT                                                                                                                                                                             
 2             DSNU1044I    246   16 : 46 : 15 . 27  DSNUGTIS - PROCESSING SYSIN AS EBCDIC                                                                                                                                                                                             
 3             DSNU005I     246   16 : 46 : 15 . 27  DSNUGPRS - TEMPLATE SUT1DDN
    DSN(DIGDDA.EVENTS.PSYSUT1)
    SPACE( 90 , 90 ) TRK
                                                                                                                                                  
 4             DSNU049I     246   16 : 46 : 15 . 27  DSNUGPRS - INVALID OPERAND '
' FOR KEYWORD 'TEMPLATE'                                                                                                                                                                             
 5             DSNU005I     246   16 : 46 : 15 . 27  DSNUGPRS -  DISP(MOD,DELETE,CATLG)
    UNIT(SYSDA)
TEMPLATE SORTDDN
    DSN(DIGDDA.                                                                                                                                               
 6             DSNU005I     246   16 : 46 : 15 . 27  DSNUGPRS - EVENTS.PSORTOU)
    SPACE( 90 , 90 ) TRK
    DISP(MOD,DELETE,CATLG)
    UNIT                                                                                                                                               
 7             DSNU005I     246   16 : 46 : 15 . 27  DSNUGPRS - (SYSDA)
TEMPLATE RECDDN
    DSN(DIGDDA.EVENTS.DUMMY)
    DISP(OLD,KEEP,K                                                                                                                                               
 8             DSNU005I     246   16 : 46 : 15 . 27  DSNUGPRS - EEP)
LOAD DATA INDDN RECDDN 
    LOG NO NOCOPYPEND
    ENFORCE NO
    WO                                                                                                                                               
 9             DSNU005I     246   16 : 46 : 15 . 27  DSNUGPRS - RKDDN (SUT1DDN,SORTDDN)
    EBCDIC  CCSID( 01025 , 65534 )
    FORMAT DELIMI                                                                                                                                               
 10            DSNU005I     246   16 : 46 : 15 . 27  DSNUGPRS - TED
    INTO TABLE MYSCHEME.MYTABLE PART  3  REPLACE                                                                                                                                                             
 11            DSNU012I     246   16 : 46 : 15 . 28  DSNUGBAC - UTILITY EXECUTION TERMINATED, HIGHEST RETURN CODE= 8

В чём может быть проблема?
...
Рейтинг: 0 / 0
06.09.2010, 10:39
| Ответить | Цитировать | Написать  
1 сообщений из 1, страница 1 из 1
Форумы / IBM DB2, WebSphere, IMS, U2 [игнор отключен] [закрыт для гостей] / Обертка для DSNUTILS
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]