Текущий параметр даты не добавляется в файл в jcl - PullRequest
Новая
       63

Текущий параметр даты не добавляется в файл в jcl

0 голосов
/ 29 мая 2019 
 //STEP001  EXEC PGM=SORT                           
 //SYSPRINT DD SYSOUT=*                             
 //SYSOUT   DD SYSOUT=*                             
 //SORTIN   DD DSN=XXX.T.KR0A9N99.XXXIFRDK.PARM,    
 //            DISP=SHR                             
 //SORTOUT  DD DSN=XXX.T.KR0A9N99.XXXIFRDK.PAR1,    
 //            DISP=SHR                             
 //SYSIN    DD DSN=XXX.T.KR0A9N99.TWT.PARM(XXX@DATE)
 //            DISP=SHR

Внутри этого файла XXX.T.KR0A9N99.XXXIFRDK.PARM 

----+----1----+----2----+----3----+----4----+----5----+----6----+
***************************** Top of Data ***********************
open xxxF01Q@SDTPRD.fbabank.com                                  
CD SDT_WINDSS/Download/                                          
LSITE trailing_blanks=yes                                        
SPUT //'xxx.T.KR0A9N99.xxxDHOLA.CSVF.SR0096(0)' HOLD.20190524.CSV
QUIT

внутри пар. XXX.T.KR0A9N99.TWT.PARM (XXX @ DATE) 

OPTION COPY                                                
INREC IFTHEN=(WHEN=(1,4,CH,EQ,C'SPUT'),OVERLAY=(54:&DATE1))

задание прошло успешно, но текущая дата для этого файла не обновлена. HOLD.20190524.CSV .. не могли бы вы помочь мне получить правильную дату?

1 Ответ

0 голосов
/ 17 июня 2019

Это может быть проблема SYSIN RECFM. Звучит так, как будто ваш файл SORTOUT равен вашему файлу SORTIN. Если это так, это означает, что условие никогда не выполняется. Одним из объяснений может быть то, что из-за RECFM аргумент SPUT может быть не в положении 1, как это выглядит на снимке экрана ispf. Например, если RECFM файла SYSIN является FBA, тогда, хотя значение, по-видимому, находится в столбце 1, оно действительно будет в столбце 2. Если входной файл VBA или VB, то значение будет смещено либо 2 или 4.

Было бы интересно узнать RECFM файла SORTIN.

...