Quantcast
Channel: Teradata Downloads - Tools
Viewing all articles
Browse latest Browse all 870

z/OS Mainframe TPT RECFM=FB versus LRECL=VB

$
0
0

Hi,
This is a mainframe z/OS TPT version Version 13.10.00.04 question

Running this JCL and TPT script with INDICATORMODE='N' but I'm getting what looks like the indicator bytes at end of file  
//MYUSERIT JOB (TESTT),'UNLOAD',                                       
//            MSGCLASS=V,
//            NOTIFY=&SYSUID
//*
//  JCLLIB ORDER=(MYUSERI.PROCLIB,PROD.PROCLIB)
//*
//JOBLIB  DD DSN=TEST.LOADLIB
//        DD DSN=PROD.LOADLIB
//*
//ALLOC   EXEC PGM=IEFBR14
//SYSPRINT  DD SYSOUT=*
//SYSOUT    DD SYSOUT=*
//DD5       DD DSNAME=MYUSERI.SORT,
//             DISP=(MOD,DELETE,DELETE),
//             UNIT=SYSDA,SPACE=(CYL,(1,2),RLSE)
//*******************************************************************
//*******************************************************************
//JS030   EXEC DWBTBEXP,HLQ=DWBT,MODULE=DXXXXXXX,PARM='-S U'
//PS0010.ATTRFILE  DD DATA,DLM='@@'
 JOBVAR_TDPID = 'TDXX'
,JOBVAR_USERNAME = 'MYUSERI'
@@
//PS0010.SYSIN     DD DATA,DLM='@@'
/*-----------------------------------------------*/
/* COMMENTS                                      */
/*-----------------------------------------------*/
DEFINE JOB UNLOD_ENV
DESCRIPTION 'UNLOAD FROM APP_WORK.CARD TABLE'
(
  /*  DEFINING SCHEMA OF INPUT TABLE             */
 
  DEFINE SCHEMA CRD_SCHEMA
  DESCRIPTION 'TABLE SCHEMA'
  (
   DATE1               (CHAR(6)
  ,DATE2               (CHAR(10)
  ,COL1                (DECIMAL(4,0)
  ,COL2                (DECIMAL(9,0)
  ,COL3                (DECIMAL(11,0)
  ,COL4                (CHAR(02)
  ,COL5                (DECIMAL(15,2)
  ,COL6                (DECIMAL(15,2)
  ,COL7                (CHAR(02)
  ,COL8                (CHAR(01)
  ,COL9                (CHAR(04)
  ,COL10               (DECIMAL(15,2)
  ,COL11               (DECIMAL(15,2)
  ,COL12               (DECIMAL(15,2)
  ,COL13               (DECIMAL(15,2)
  ,COL14               (DECIMAL(15,2)
  ,COL15               (CHAR(01)
  ,COL16               (CHAR(03)
  ,COL17               (CHAR(05)
  ,COL18               (CHAR(04)
  ,COL19               (DECIMAL(15,2)
  ,COL20               (CHAR(01)
  ,COL21               (CHAR(01)
  ,COL22               (DECIMAL(06,0)
  ,COL23               (DECIMAL(09,0)
  ,COL24               (CHAR(03)
  ,COL25               (DECIMAL(15,2)
  ,COL26               (CHAR(03)
  ,COL27               (DECIMAL(05,0)
  ,COL28               (CHAR(06)
  ,COL29               (DECIMAL(04,0)
  ,COL30               (CHAR(02)
  ,COL31               (CHAR(01)
  ,COL32               (CHAR(04)
  ,COL33               (DECIMAL(18,6)
  ,COL34               (DECIMAL(18,6)
  ,COL35               (DECIMAL(18,6)
  ,COL36               (DECIMAL(18,6)
  ,COL37               (DECIMAL(18,6)
  ,COL38               (DECIMAL(18,6)
  ,COL39               (DECIMAL(18,6)
  ,COL40               (DECIMAL(18,6)
  ,COL41               (DECIMAL(15,2)
  ,COL42               (CHAR(10)
  ,COL43               (DECIMAL(05,0)
  ,COL44               (CHAR(01)
  ,COL45               (CHAR(02)
  ,COL46               (DECIMAL(15,2)
  ,COL47               (CHAR(02)
  ,COL48               (CHAR(04)
  ,COL49               (DECIMAL(15,2)
  ,COL50               (DECIMAL(15,2)
  ,COL51               (DECIMAL(15,2)
  ,COL52               (DECIMAL(15,2)
  ,COL53               (DECIMAL(05,0)
  ,COL54               (CHAR(04)
  ,COL55               (DECIMAL(10,0)
  ,COL56               (DECIMAL(10,0)
  ,COL57               (DECIMAL(10,0)
  ,COL58               (CHAR(12)
  ,COL59               (DECIMAL(10,0)
  ,COL60               (CHAR(15)
  ,COL61               (CHAR(03)
  ,COL62               (CHAR(04)
  ) ;
 
 
/* DEFINE PRODUCER OPERATOR    */
 
 DEFINE OPERATOR EXPORT_OPERATOR()
  DESCRIPTION 'READ TABLE'
  TYPE EXPORT
  SCHEMA CRD_SCHEMA
  ATTRIBUTES
  (     VARCHAR USERNAME= @JOBVAR_USERNAME,
        INTEGER MAXSESSIONS = 4,
        INTEGER MINSESSIONS = 1,
        VARCHAR PRIVATELOGNAME = 'EXP_LOG',
        VARCHAR TDPID = @JOBVAR_TDPID,
        VARCHAR SELECTSTMT='SELECT
   DATE1               (CHAR(6))
  ,DATE2               (CHAR(10))
  ,COL1                (DECIMAL(4,0))
  ,COL2                (DECIMAL(9,0))
  ,COL3                (DECIMAL(11,0))
  ,COL4                (CHAR(02))
  ,COL5                (DECIMAL(15,2))
  ,COL6                (DECIMAL(15,2))
  ,COL7                (CHAR(02))
  ,COL8                (CHAR(01))
  ,COL9                (CHAR(04))
  ,COL10               (DECIMAL(15,2))
  ,COL11               (DECIMAL(15,2))
  ,COL12               (DECIMAL(15,2))
  ,COL13               (DECIMAL(15,2))
  ,COL14               (DECIMAL(15,2))
  ,COL15               (CHAR(01))
  ,COL16               (CHAR(03))
  ,COL17               (CHAR(05))
  ,COL18               (CHAR(04))
  ,COL19               (DECIMAL(15,2))
  ,COL20               (CHAR(01))
  ,COL21               (CHAR(01))
  ,COL22               (DECIMAL(06,0))
  ,COL23               (DECIMAL(09,0))
  ,COL24               (CHAR(03))
  ,COL25               (DECIMAL(15,2))
  ,COL26               (CHAR(03))
  ,COL27               (DECIMAL(05,0))
  ,COL28               (CHAR(06))
  ,COL29               (DECIMAL(04,0))
  ,COL30               (CHAR(02))
  ,COL31               (CHAR(01))
  ,COL32               (CHAR(04))
  ,COL33               (DECIMAL(18,6))
  ,COL34               (DECIMAL(18,6))
  ,COL35               (DECIMAL(18,6))
  ,COL36               (DECIMAL(18,6))
  ,COL37               (DECIMAL(18,6))
  ,COL38               (DECIMAL(18,6))
  ,COL39               (DECIMAL(18,6))
  ,COL40               (DECIMAL(18,6))
  ,COL41               (DECIMAL(15,2))
  ,COL42               (CHAR(10))
  ,COL43               (DECIMAL(05,0))
  ,COL44               (CHAR(01))
  ,COL45               (CHAR(02))
  ,COL46               (DECIMAL(15,2))
  ,COL47               (CHAR(02))
  ,COL48               (CHAR(04))
  ,COL49               (DECIMAL(15,2))
  ,COL50               (DECIMAL(15,2))
  ,COL51               (DECIMAL(15,2))
  ,COL52               (DECIMAL(15,2))
  ,COL53               (DECIMAL(05,0))
  ,COL54               (CHAR(04))
  ,COL55               (DECIMAL(10,0))
  ,COL56               (DECIMAL(10,0))
  ,COL57               (DECIMAL(10,0))
  ,COL58               (CHAR(12))
  ,COL59               (DECIMAL(10,0))
  ,COL60               (CHAR(15))
  ,COL61               (CHAR(03))
  ,COL62               (CHAR(04))
  FROM DB.TABLE
  ) ;
 
  DEFINE OPERATOR FILE_WRITER()
  DESCRIPTION 'TERADATA PARALLEL TRANSPORTER DATA CONNECTOR OPERATOR'
  TYPE DATACONNECTOR CONSUMER
  SCHEMA CRD_SCHEMA
  ATTRIBUTES
  (
  VARCHAR FILENAME            = 'DD:FILEOUT',
  VARCHAR INDICATORMODE = 'N',
  VARCHAR FORMAT              = 'UNFORMATTED',
  VARCHAR OPENMODE         = 'WRITE'
  );
 
  STEP EXPORT_TO_FILE
   (
      APPLY TO OPERATOR (FILE_WRITER() [1] )
      SELECT * FROM OPERATOR (EXPORT_OPERATOR() [1] );
   );
);
@@
//*
//FILEOUT  DD DSN=MYUSERI.SORT,
//       DISP=(NEW,CATLG,DELETE),
//       RECFM=FB,BLKSIZE=0,LRECL=383,BUFNO=160,
//       SPACE=(CYL,(25,25),RLSE)
//*
 
-7----+----8---
***************
TUU    ........
TUU    ........
TUU    ........
TUU    ........
TUU    ........
If I change the output file (FILELOUT) to RECFM=VB the ........ go away at end of the file

Why are the indicator bytes being written at the end when the file is RECFM=FB and INDICATROMODE='N' ?  
-7----+----
***********
TUU       
TUU       
TUU       
TUU       
TUU       
TUU       

   
 

Forums: 

Viewing all articles
Browse latest Browse all 870

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>