Hi,

I am using the following regular expression to extract records that contain a "+nnnnnn" - a plus sign followed by 6 numbers:

INCLUDE COND=(26,72,SS,RE,C'(\+)[0-9]{6}')
OPTION  COPY

But it does not seem to work - in using the same expression in an ISPF find command works: f RC'(\+)[0-9]{6}'

VIEW       DVPNV.#RISK.PROD.VLISTBT(QSOSWP00) - 01.00      Columns 00062 00133
Command ===>                                                  Scroll ===> CSR
=COLS> ---+----7----+----8----+----9----+----0----+----1----+----2----+----3---
000627                                                 000000000 4C
000628 C S9(6) COMP VALUE +206601.
000629 C S9(6) COMP VALUE +300000.                     000000004 4C
000630 C S9(6) COMP VALUE +300001.                     000000008 4C
000631 C S9(6) COMP VALUE +300002.                     00000000C 4C
000632 C S9(6) COMP VALUE +300003.                     000000010 4C
000633 C S9(6) COMP VALUE +300004.                     000000014 4C
000634 C S9(6) COMP VALUE +300005.                     000000018 4C
000635 C S9(6) COMP VALUE +300006.                     00000001C 4C
000636 C S9(6) COMP VALUE +300007.                     000000020 4C
000637 C S9(6) COMP VALUE +300009.                     000000024 4C
000638 C S9(6) COMP VALUE +300010.                     000000028 4C

Hi Girish,

We did test the job with similar data to yours and also the same control statements and we do see that the records have been written to output. 

Below is the input data:

Below is the job used:

And we are able to see output record as 

If you are still facing the issue, could you please share the joblog so that we can look into it further.

Thanks,

Manjunath

Hi,

The following is the job output:

Hi Girish,

If you are using HOD or PCOMM session for connecting to Mainframe, could you please check if "Host Code Page" is set to 1047, if not could you please change it to 1047 and try running your job again.

This is from DFSORT Application Programming Guide page xxvii

Please try and let us know if it is working.

Hi,

I am not sure how to specify the code page but here is the latest output:

                     J E S 2  J O B  L O G  --  S Y S T E M  D V 2 6  --  N O D E  T E M P E D
 
21.16.51 J0870582 ---- WEDNESDAY, 16 JUL 2025 ----
21.16.51 J0870582  IRR010I  USERID X824254  IS ASSIGNED TO THIS JOB.
21.16.53 J0870582  ICH70001I X824254  LAST ACCESS AT 21:16:39 ON WEDNESDAY, JULY 16, 2025
21.16.53 J0870582  $HASP373 @BTSRTGS STARTED - WLM INIT  - SRVCLASS BATWLM   - SYS DV22
21.16.53 J0870582  IEF403I @BTSRTGS - STARTED - TIME=21.16.53
21.16.53 J0870582  ACTR01I JOBNAME  STEPNAME PROCSTEP    RC   EXCP CPU-TIME   ELAPSED
21.16.53 J0870582  ACTR01I @BTSRTGS JS010                00   3913 00:00:00  00:00:00
21.16.53 J0870582  IEF404I @BTSRTGS - ENDED - TIME=21.16.53
21.16.53 J0870582  $HASP395 @BTSRTGS ENDED - RC=0000
------ JES2 JOB STATISTICS ------
  16 JUL 2025 JOB EXECUTION DATE
           12 CARDS READ
          107 SYSOUT PRINT RECORDS
            0 SYSOUT PUNCH RECORDS
           11 SYSOUT SPOOL KBYTES
         0.00 MINUTES EXECUTION TIME
        1 //@BTSRTGS JOB (BTT),'  SORT ',MSGCLASS=T,CLASS=4,                      J0870582
          //         REGION=0M,NOTIFY=&SYSUID
          //*
          IEFC653I SUBSTITUTION JCL - (BTT),'  SORT ',MSGCLASS=T,CLASS=4,REGION=0M,NOTIFY=X824254
        2 //JS010    EXEC PGM=ICEMAN,PARM='MOSIZE=MAX'
        3 //IDIOFF   DD  DUMMY
        4 //SYSOUT   DD  SYSOUT=*
        5 //SORTIN   DD  DSN=DVPNV.#RISK.PROD.VLISTBT(QSOSWP00),DISP=SHR
        6 //SORTOUT  DD  SYSOUT=*
        7 //SYSIN    DD  *
ICH70001I X824254  LAST ACCESS AT 21:16:39 ON WEDNESDAY, JULY 16, 2025
IEF043I Actions taken by SMFLIMxx parmlib policy for @BTSRTGS JS010
        Step region below changed to NOLIMIT by policy - SMFLIM0C 0001
        Step region above changed to NOLIMIT by policy - SMFLIM0C 0001
        Step system reserved below set to   256K by policy - SMFLIM0C 0003
        Step system reserved above set to     1M by policy - SMFLIM0C 0003
        Step MEMLIMIT set to    20G  by policy - SMFLIM0C 0003
IEFA111I @BTSRTGS IS USING THE FOLLOWING JOB RELATED SETTINGS:
         SWA=ABOVE,TIOT SIZE=64K,DSENQSHR=DISALLOW,GDGBIAS=JOB
IEF236I ALLOC. FOR @BTSRTGS JS010
IEF237I DMY  ALLOCATED TO IDIOFF
IEF237I JES2 ALLOCATED TO SYSOUT
IGD103I SMS ALLOCATED TO DDNAME SORTIN
IEF237I JES2 ALLOCATED TO SORTOUT
IEF237I JES2 ALLOCATED TO SYSIN
IGD103I SMS ALLOCATED TO DDNAME SYS00001
IGD104I DVPNV.#RISK.PROD.VLISTBT                     RETAINED,  DDNAME=SYS00001
IEF142I @BTSRTGS JS010 - STEP WAS EXECUTED - COND CODE 0000
IEF285I   X824254.@BTSRTGS.J0870582.D0000102.?         SYSOUT
IGD104I DVPNV.#RISK.PROD.VLISTBT                     RETAINED,  DDNAME=SORTIN
IEF285I   X824254.@BTSRTGS.J0870582.D0000103.?         SYSOUT
IEF285I   X824254.@BTSRTGS.J0870582.D0000101.?         SYSIN
************************************************************************************************************************************
*                                        STEP  1  ------JOBSTEP TIMINGS------             ----PAGING COUNTS---                     *
* STEPNAME PROCSTEP PROGRAM     RC   EXCP   CONN     TCB      SRB     ELAPSED    SERV  SRVCLAS  PAGE  SWAP   VIO SWAPS             *
* JS010             ICEMAN      00   3913     40  00:00:00  00:00:00  00:00:00  33544 BATWLM       0     0     0     0             *
*                                                                                                                                  *
************************************************************************************************************************************
*                                                          EXCP STATISTICS                                                         *
*  DDNAME  EX CNT    DDNAME  EX CNT    DDNAME  EX CNT    DDNAME  EX CNT    DDNAME  EX CNT    DDNAME  EX CNT    DDNAME  EX CNT      *
*                                                                                                                                  *
*  SORTIN   3849     SYS00001   14                                                                                                 *
************************************************************************************************************************************
IEF373I STEP/JS010   /START 2025197.2116
IEF032I STEP/JS010   /STOP  2025197.2116
        CPU:     0 HR  00 MIN  00.39 SEC    SRB:     0 HR  00 MIN  00.00 SEC
        VIRT:  1316K  SYS:   528K  EXT:    25496K  SYS:    19888K
        ATB- REAL:                  1576K  SLOTS:                     0K
             VIRT- ALLOC:      20M SHRD:       0M
************************************************************************************************************************************
* @BTSRTGS ENDED.  NAME-  SORT               TOTAL CPU TIME=00:00:00.39  TOTAL ELAPSED TIME=00:00:00.49                            *
************************************************************************************************************************************
IEF375I  JOB/@BTSRTGS/START 2025197.2116
IEF033I  JOB/@BTSRTGS/STOP  2025197.2116
        CPU:     0 HR  00 MIN  00.39 SEC    SRB:     0 HR  00 MIN  00.00 SEC
  INCLUDE COND=(1,132,SS,RE,C'(\+)[0-9]{6}')
  OPTION COPY
ICE201I 1 RECORD TYPE IS F - DATA STARTS IN POSITION 1
ICE751I 0 C5-NONE   C6-NONE   C7-NONE   C8-NONE   E9-H60647 C9-NONE   E5-H54278 E7-NONE
ICE143I 0 BLOCKSET     COPY  TECHNIQUE SELECTED
ICE250I 0 VISIT http://www.ibm.com/storage/dfsort FOR DFSORT PAPERS, EXAMPLES AND MORE
ICE000I 1 - CONTROL STATEMENTS FOR 5655-ZOS, Z/OS DFSORT V3R1  - 21:16 ON WED JUL 16, 2025 -
            INCLUDE COND=(1,132,SS,RE,C'(\+)[0-9]{6}')
            OPTION COPY
ICE193I 0 ICEAM1 INVOCATION ENVIRONMENT IN EFFECT - ICETD1 ENVIRONMENT SELECTED
ICE252I 1 PARMLIB OPTIONS WERE MERGED WITH INSTALLATION MODULE DEFAULTS
ICE088I 0 @BTSRTGS.JS010   .        , INPUT LRECL = 133, BLKSIZE = 32718, TYPE = FBA
ICE093I 0 MAIN STORAGE = (MAX,16777216,16763998)
ICE156I 0 MAIN STORAGE ABOVE 16MB = (16699008,16686720)
ICE127I 0 OPTIONS: OVFLO=RC0 ,PAD=RC0 ,TRUNC=RC0 ,SPANINC=RC16,VLSCMP=N,SZERO=Y,RESET=Y,VSAMEMT=Y,DYNSPC=256
ICE128I 0 OPTIONS: SIZE=16777216,MAXLIM=1048576,MINLIM=262144,EQUALS=N,LIST=Y,ERET=ABEND,MSGDDN=SYSOUT
ICE129I 0 OPTIONS: VIO=N,RESDNT=ALL ,SMF=SHORT,WRKSEC=Y,OUTSEC=Y,VERIFY=N,CHALT=N,DYNALOC=N             ,ABCODE=016
ICE130I 0 OPTIONS: RESALL=12288,RESINV=0,SVC=109 ,CHECK=N,WRKREL=N,OUTREL=N,CKPT=N,COBEXIT=COB2,ZSORT=N
ICE131I 0 OPTIONS: TMAXLIM=16777216,ARESALL=12288,ARESINV=0,OVERRGN=65536,CINV=Y,CFW=N,DSA=0
ICE132I 0 OPTIONS: VLSHRT=N,ZDPRINT=Y,IEXIT=Y,TEXIT=N,LISTX=N,EFS=NONE    ,EXITCK=S,PARMDDN=DFSPARM ,FSZEST=Y
ICE133I 0 OPTIONS: HIPRMAX=OPTIMAL,DSPSIZE=MAX ,ODMAXBF=0,SOLRF=Y,VLLONG=N,VSAMIO=N,MOSIZE=MAX
ICE235I 0 OPTIONS: NULLOUT=RC0
ICE236I 0 OPTIONS: DYNAPCT=100,MOWRK=Y,TUNE=OLD ,EXPMAX=75%    ,EXPOLD=5%     ,EXPRES=50%
ICE084I 0 BSAM ACCESS METHOD USED FOR SORTOUT
ICE084I 0 BSAM ACCESS METHOD USED FOR SORTIN
ICE751I 1 EF-H54278 F0-NONE   E8-NONE
ICE090I 0 OUTPUT LRECL = 133, BLKSIZE = 32718, TYPE = FBA
ICE055I 0 INSERT 0, DELETE 112697
ICE054I 0 RECORDS - IN: 112697, OUT: 0
ICE173I 0 NO RECORDS FOR THE SORTOUT DATA SET - RC=0
ICE267I 0 ZSORT ACCELERATOR PATH NOT USED    RSN=195
ICE052I 0 END OF DFSORT

Hi,

The Rocket Reflection emulation software had the code page set to 037 changing it to 1047 worked.  Not sure if this change will affect other components like COBOL programs, JCLs etc.

Thanks.