MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

What is this kind of code(in cobol linkage section) ?

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Application Programming
View previous topic :: View next topic  
Author Message
issac1029
Intermediate


Joined: 10 Dec 2005
Posts: 159
Topics: 75

PostPosted: Mon Jan 15, 2007 11:14 pm    Post subject: What is this kind of code(in cobol linkage section) ? Reply with quote

Code:
   File  Edit  Edit_Settings  Menu  Utilities  Compilers  Test  Help           
 -------------------------------------------------------------------------------
 VIEW       SACN.MCM.SRC.CNSI.BASE0(AMPCNASB) - 01.11       Columns 00001 00072
 Command ===>                                                  Scroll ===> CSR 
 000407 023200**************************************************************** 
 000408 023300*                                                              * 
 000409 023400 LINKAGE SECTION.                                                 
 000410 023500*                                                              * 
 000411 023600**************************************************************** 
 000412 023700     AMWKCI00 MOD,KEEP.                                           
 000413 023800     AMCFRT00 MOD,KEEP.                                           
 000414 023900     AMCFRS01 MOD,KEEP.                                           
 000415 024000     AMCFNA01 MOD,KEEP.                                           
 000416 024100     AMTRPSCS MOD,KEEP.                                           
 000417 024200     AMTRSD00 REDEF.                                             
 000418            AMWKNA00 MOD,KEEP. /* NEW ACCOUNT IN PROCESS WORK FILE*/     
 000419 024300     AMWKNA01 MOD,KEEP.                                           
 000420 024400     WSWKNA01 MODEL AMWKNA01 PREFIX 'WSWKNA01-' MOD,KEEP.         
 000421            HSWKNA01 MODEL AMWKNA01 PREFIX 'HSWKNA01-' MOD,KEEP.         
 000422 024405     AMWKNASB MOD,KEEP.                                           
 000423 024410     AMWKIF03 DEFER.                                             
 000424 024420     WSWKIF03 MODEL AMWKIF03 PREFIX 'WSWKIF03-' MOD,KEEP.         
 000425 024500     AMCTPC01 MOD,KEEP.                                           
 .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .
Back to top
View user's profile Send private message Send e-mail MSN Messenger
dbzTHEdinosauer
Supermod


Joined: 20 Oct 2006
Posts: 1411
Topics: 26
Location: germany

PostPosted: Mon Jan 15, 2007 11:34 pm    Post subject: Reply with quote

This is some kind of librarian service (like endovor, panvalet, etc...) that has its own keywords associated with expansion of Copybooks in the source generation step prior to the compile step.

Have you not asked your co-workers what type of library your site uses?

I don't recognize the keywords (e.g. MOD, KEEP). The keywords REDEF, MODEL and PREFIX I assume:
  • REDEF means insert/generate necessary COBOL keywords to cause this copybook to be bounded (same starting address) as the copybook preceding
  • MODEL & PREFIX probably means COPY xyz REPLACING ...


MOD, KEEP, DEFER - not going to guess.

what are the first 20 lines of this source?

provide a sample of JCL used to compile, please. Actually, the steps used to create the source for input to the compile step. that may provide some insight.
_________________
Dick Brenholtz
American living in Varel, Germany
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Application Programming All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group