PDS with COBOL & Ezytrieve PGMS



Support for OS/VS COBOL, VS COBOL II, COBOL for OS/390 & VM and Enterprise COBOL for z/OS

Re: PDS with COBOL & Ezytrieve PGMS

Postby CICS Guy » Wed May 05, 2010 1:17 am

 FILE FILEA                                                             
   FIRST-343            1   343    A                                     
   PCC                  1     6    A                                     
   GRP-NO-ID            7     6    A                                     
   SUBGR-NO            13     3    A                                     
   PKG-NO              16     2    B                                     
   PKGSTRT             18    10    A                                     
   PKGEND              28    10    A                                     
   PKG-STAS-CD         38     2    A                                     
   SUBR-NO             40    12    A                                     

FLEA                                                             
 -343            1   343    A                                     
                 1     6    A                                     
 O-ID            7     6    A                                     
 -NO            13     3    A                                     
 O              16     2    B                                     
 RT             18    10    A                                     
 D              28    10    A                                     
 TAS-CD         38     2    A
Interesting, the first two bytes are copied, the next six skipped and then the rest are included in the copy......
I wonder what that 'COPY' could have been thinking those six were used for?
I wonder why the 'PCC' line had only three skipped?
CICS Guy
 
Posts: 246
Joined: Wed Jun 20, 2007 4:08 am
Has thanked: 0 time
Been thanked: 0 time

Re: PDS with COBOL & Ezytrieve PGMS

Postby dick scherrer » Wed May 05, 2010 2:44 am

Hello,

I wonder why the 'PCC' line had only three skipped?
I suspect because what was posted was not "Code'd" (it is now<g>).

I also suspect that information was on the screen(s) while this was happening that was not captured/posted.
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6268
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times

Re: PDS with COBOL & Ezytrieve PGMS

Postby debo » Thu May 06, 2010 5:15 pm

Hi,

sorry for late reply...We lost that PDS.But we are not much impacted with this,because most of the pgms are added in Endevor..

But Interestingly,we found this :
* COPY will create the output Dataset with same Attribute (same LRECL,BLKSIZE) vut with collapse
* The same COPY is working for PDS to PDS copy if the source PDS is having only jcls/Ezytrieves
* We dont know why its creatng problem when there are COBOL pgms..

IT may be like this ? Any one among the COBOL ogm may have with diffrent PROFILE ? ( like NUM ON sumthing )

Can any one Guess ?
debo
 
Posts: 19
Joined: Sat Apr 17, 2010 5:26 pm
Has thanked: 0 time
Been thanked: 0 time

Re: PDS with COBOL & Ezytrieve PGMS

Postby barrybert » Fri May 07, 2010 3:11 pm

Could one of the two new PDSs been defined with variable records?
barrybert
 
Posts: 3
Joined: Thu Apr 29, 2010 1:14 pm
Has thanked: 0 time
Been thanked: 0 time

Re: PDS with COBOL & Ezytrieve PGMS

Postby debo » Mon May 10, 2010 10:55 am

No....No Change in File Attributes, Same LRECL,Same RECFM=FB
debo
 
Posts: 19
Joined: Sat Apr 17, 2010 5:26 pm
Has thanked: 0 time
Been thanked: 0 time

Previous

Return to IBM Cobol

 


  • Related topics
    Replies
    Views
    Last post