Generate a delete idcams



IBM's flagship sort product DFSORT for sorting, merging, copying, data manipulation and reporting. Includes ICETOOL and ICEGENER

Generate a delete idcams

Postby samb01 » Wed Feb 18, 2015 4:02 pm

Hello,

i would like to build an delete idcams sysin.

I have a file with a list of file :

 BROWSE    XCF.PRG.FED           
 Command ===>                                       
********************************* Top of Data ******
B.XXX.A3103354                                  1 
B.XXXM.A2318413                                     
B.SI2M.J0717002.OCT2010                             
X.VCS.L1614451                                     
X.FCX1.L2209534                                     


file could have a length of 44
et and i would like to have


DELETE B.XXX.A3103354                                   NVSAM
DELETE B.XXXM.A2318413                                 NVSAM
DELETE B.FCVS.J0717002.OCT2010                   NVSAM
DELETE X.VCS.L1614451                                   NVSAM
DELETE X.FCX1.L2209534                                 NVSAM




Thank's for your help.
samb01
 
Posts: 236
Joined: Mon Nov 16, 2009 7:24 pm
Has thanked: 0 time
Been thanked: 0 time

Re: Generate a delete idcams

 

Re: Generate a delete idcams

Postby enrico-sorichetti » Wed Feb 18, 2015 6:14 pm

did You care to search the forum ?
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort
enrico-sorichetti
Global moderator
 
Posts: 2644
Joined: Fri Apr 18, 2008 11:25 pm
Has thanked: 0 time
Been thanked: 130 times

Re: Generate a delete idcams

Postby samb01 » Thu Feb 19, 2015 4:00 pm

i woul just like to know if I'd rather use OUTREC or BUILD ?

Thanks for your help.
samb01
 
Posts: 236
Joined: Mon Nov 16, 2009 7:24 pm
Has thanked: 0 time
Been thanked: 0 time

Re: Generate a delete idcams

Postby BillyBoyo » Thu Feb 19, 2015 4:48 pm

  INREC BUILD=(C'DELETE ',1,44,C'NVSAM')


That you get you close.
BillyBoyo
Global moderator
 
Posts: 3804
Joined: Tue Jan 25, 2011 12:02 am
Has thanked: 22 times
Been thanked: 264 times

Re: Generate a delete idcams

Postby samb01 » Thu Feb 19, 2015 7:54 pm

Hello billy Boyo,

thank you, it works. But i can't anderstand why i have dot at the end of each line :

                                                                               
 BROWSE    PROBCF.ECFSOVD.DADSFOR.PART1.DELIDCA       Line 00000000 Col 001 080
  Command ===>                                                  Scroll ===> CSR 
********************************* Top of Data **********************************
DELETE B.XDSD.A3103354                             NVSAM........................
DELETE B.XDSD.A2318413                             NVSAM........................
DELETE B.XDSD.J0717002.OCT2010                     NVSAM........................
DELETE X.XDSD.L3011423                             NVSAM........................
DELETE X.XDSD.L1714235                             NVSAM........................
DELETE X.XDSD.L2818523                             NVSAM........................


samb01
 
Posts: 236
Joined: Mon Nov 16, 2009 7:24 pm
Has thanked: 0 time
Been thanked: 0 time

Re: Generate a delete idcams

Postby samb01 » Thu Feb 19, 2015 9:50 pm

I succed to remove dots with that sysin

//SYSIN  DD    *                                   
 SORT FIELDS=COPY                                   
 INREC BUILD=(C' DELETE ',1,44,C'NVSAM',174:X)     
//*                                                 

samb01
 
Posts: 236
Joined: Mon Nov 16, 2009 7:24 pm
Has thanked: 0 time
Been thanked: 0 time


Return to DFSORT/ICETOOL/ICEGENER

 


  • Related topics
    Replies
    Views
    Last post