IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

How to compile BMS
IBM Mainframe Forums -> CICS
Post new topic   Reply to topic Quick References
View previous topic :: View next topic  
Author Message
Vigneshwaran S
Warnings : 1
New User


Joined: 10 Dec 2008
Posts: 60
Location: Chennai
PostPosted: Fri May 07, 2010 12:51 pm
 Reply with quote
Hi all,

I'm working with CICS for the first time.

I have created a MAP and I' looking for JCL to compile the MAP.

I have tried using the JCL in this Link
www.ibmmainframes.com/about5920.html
fixed... bad tag construct!

Is it possible to compile the MAP alone?.Because i want to see how my map looks like!!!!

We do not have any Changeman utilities to compile the MAP.

Can anyone provide me a JCL?

Thanks in advance
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2481
Location: Netherlands, Amstelveen
PostPosted: Fri May 07, 2010 1:03 pm
 Reply with quote
Why is your link leading to :

*http://www.freebackgrounds.com/*
Back to top
View user's profile Send private message
Vigneshwaran S
Warnings : 1
New User


Joined: 10 Dec 2008
Posts: 60
Location: Chennai
PostPosted: Fri May 07, 2010 1:11 pm
 Reply with quote
Hi Peter,

Sorry about that!! But i do not know why it is misdirecting.
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy
PostPosted: Fri May 07, 2010 1:19 pm
 Reply with quote
because You did not fill correctly the provided tags

clicking on the url button You get ... ( with tags changed to show how it looks)
[u_r_l=http://yoururl.com]Type_Description_Here[/u_r_l]

which if filled correctly with
[u_r_l=http://www.ibmmainframes.com/about5920.html ]See this topic [/u_r_l]
would have shown

See this topic
and taken everybody in the right place
Back to top
View user's profile Send private message
Binop B

Active User


Joined: 18 Jun 2009
Posts: 407
Location: Nashville, TN
PostPosted: Sat May 08, 2010 11:36 am
 Reply with quote
Hi Vicky,
Quote:
Is it possible to compile the MAP alone?.Because i want to see how my map looks like!!!!
You could use the CECI SEND MAP command to see what the map looks like ... I haven't used this option much but i think this would serve your purpose... icon_smile.gif
Back to top
View user's profile Send private message
Vigneshwaran S
Warnings : 1
New User


Joined: 10 Dec 2008
Posts: 60
Location: Chennai
PostPosted: Mon May 10, 2010 8:30 am
 Reply with quote
Hi,

First i need to compile the MAP i have coded and then i can move it to CICS region by SEND map and in that CICS region i can receive my MAP using RECEIVE map command.

I'm looking for JCL to Compile my MAP!!!!
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA
PostPosted: Mon May 10, 2010 8:40 am
 Reply with quote
JCL to compile a map -- or anything else -- tends to be extremely site specific. You cannot expect JCL you get from a forum, another web site, or even a text book to work at your site. You must contact your coworkers, team leader, or site support group to get the appropriate JCL to do the compile.

For example, we don't know if your site is using Librarian, Panvalet, Endevor, Changeman, or some other source management tool -- and the compile JCL will depend at least partly on which (if any) of these are being used.
Back to top
View user's profile Send private message
Vigneshwaran S
Warnings : 1
New User


Joined: 10 Dec 2008
Posts: 60
Location: Chennai
PostPosted: Mon May 10, 2010 5:22 pm
 Reply with quote
HI all,

Actually in our Client mainframe system has Changeman to compile each and every module.

But i'm working in our organisation MF where we do not have any JCL or Changeman tool to compile it.

I somehow got a Cobol/PL1 JCL and i converted it into a Cobol/CICS JCL,

Code:


//ASMMAPS PROC INDEX='CCCCC.CCCC',                                   
//             MAPLIB='xxxx.xxxx.LOAD.NEW', /* Loadlib name */
//             DSCTLIB=bbbbb.cccc.aaaa.DSECT', /*DSECT lib name to create Symbolic JCL*/                                         
//             SRCLIB='XXXX.XXXX.XXXX.XXXX',    /* map PDS */                       
//             MAPNAME='YYYYY',                /* Map name */                       
//             ASMBLR=ss,               "ASSEMBLER PROGRAM NAME"   
//             REG=8192K,                   "REGION FOR ASSEMBLY"       
//             OUTC=X,                      "PRINT SYSOUT CLASS"       
//             WORK=SYSDA                  "WORK FILE UNIT"             
//COPY     EXEC PGM=IEBGENER                                           
//SYSPRINT DD SYSOUT=&OUTC                                             
//SYSUT2   DD DSN=&&TEMPM,UNIT=&WORK,DISP=(,PASS),                     
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=400),                     
//            SPACE=(400,(50,50))                                       
//SYSIN   DD DUMMY                                                     
//SYSUT1  DD DSN=&SRCLIB(&MAPNAME),DISP=SHR                             
//*-------------------------------------------------------------------*
//*               ASSEMBLE MAP                                        *
//*-------------------------------------------------------------------*
//ASMMAP   EXEC PGM=&ASMBLR,REGION=&REG,COND=(4,LT),                   
//    PARM='SYSPARM(MAP),DECK,NOLOAD'                                   
//SYSPRINT DD SYSOUT=&OUTC                                             
//SYSLIB   DD DSN=&INDEX..SDFHMAC,DISP=SHR                             
//         DD DSN=SYS1.MACLIB,DISP=SHR                                 
//         DD DSN=CEE.SCEEMAC,DISP=SHR                                 
//SYSUT1   DD UNIT=&WORK,SPACE=(TRK,(15,15))                           
//SYSUT2   DD UNIT=&WORK,SPACE=(TRK,(15,15))                           
//SYSUT3   DD UNIT=&WORK,SPACE=(TRK,(15,15))                           
//SYSPUNCH DD DSN=&&MAP,DISP=(,PASS),UNIT=&WORK,                       
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=400),                     
//            SPACE=(400,(50,50))                                       
//SYSIN    DD DSN=&&TEMPM,DISP=(OLD,PASS)                               
//SYSLIN   DD DUMMY                                 
//*-------------------------------------------------------------------*
//*                 LINK-EDIT STEP                                    *
//*-------------------------------------------------------------------*
//LINKMAP  EXEC PGM=IEWL,PARM='LIST,LET,XREF',COND=(4,LT,ASMMAP)       
//SYSPRINT DD SYSOUT=&OUTC                                             
//SYSLMOD  DD DSN=&MAPLIB(&MAPNAME),DISP=SHR                           
//SYSUT1   DD UNIT=&WORK,SPACE=(1024,(20,20))                           
//SYSLIN   DD DSN=&&MAP,DISP=(OLD,DELETE)                               
//*                                                                     
//*------------------------------------------------------------------* 
//*              DSECT GENERATION                                    * 
//*------------------------------------------------------------------* 
//ASMDSECT EXEC PGM=&ASMBLR,REGION=&REG,COND=(4,LT),                   
//  PARM='SYSPARM(DSECT),DECK,NOLOAD'                                   
//SYSPRINT DD SYSOUT=&OUTC                                             
//SYSLIB   DD DSN=&INDEX..SDFHMAC,DISP=SHR                             
//         DD DSN=SYS1.MACLIB,DISP=SHR                                 
//SYSUT1   DD UNIT=&WORK,SPACE=(CYL,(5,5))                             
//SYSUT2   DD UNIT=&WORK,SPACE=(CYL,(5,5))                             
//SYSUT3   DD UNIT=&WORK,SPACE=(CYL,(5,5))                             
//SYSPUNCH DD DSN=&DSCTLIB(&MAPNAME),DISP=OLD                           
//SYSIN    DD DSN=&&TEMPM,DISP=(OLD,DELETE)                             
//SYSLIN   DD DUMMY                                                     
//  PEND                                                               
//*                                                                     
//****************************************************************     
//BMSMAP  EXEC ASMMAPS                                                 



can anyone tell me what is DFHEILL Lib?

Also i'm getting the following error while defining map,

Code:


 ** ASMA044E Undefined symbol - DFHM1                                       
 ** ASMA435I Record 1172 in CICSTS32.CICS.SDFHMAC(DFHMDI) on volume: A03S52



I'm checking with my mainframes team. Any suggestions from experts?
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy
PostPosted: Mon May 10, 2010 5:28 pm
 Reply with quote
that what usually happens in a DO IT YOURSELF situation

why not ask Your support for the proper procedures and datasets to be used ?
Back to top
View user's profile Send private message
Binop B

Active User


Joined: 18 Jun 2009
Posts: 407
Location: Nashville, TN
PostPosted: Mon May 10, 2010 6:39 pm
 Reply with quote
Hi Vicky,
Quote:
But i'm working in our organisation MF where we do not have any JCL or Changeman tool to compile it.
Are u sure on this ? Certainly there will be some place where all the JCLs are maintained ... icon_rolleyes.gif
Back to top
View user's profile Send private message
Vigneshwaran S
Warnings : 1
New User


Joined: 10 Dec 2008
Posts: 60
Location: Chennai
PostPosted: Mon May 10, 2010 6:47 pm
 Reply with quote
Hi,

Yeah they have JCL but we need to change it according to our use.I meant only with small changes!!!

I have got solution to the problem!!!!!

They have not given me proper Access to my ID.

Thanks all for posting!!!

Today i have learnt so many things as i'm working on CICS for the first time!!!! icon_biggrin.gif icon_biggrin.gif
Back to top
View user's profile Send private message
Vigneshwaran S
Warnings : 1
New User


Joined: 10 Dec 2008
Posts: 60
Location: Chennai
PostPosted: Mon May 10, 2010 6:49 pm
 Reply with quote
Hi all,

Just in Curiosity Can anyone tell me what is DFHEILL??

Thanks all!!
Back to top
View user's profile Send private message
Binop B

Active User


Joined: 18 Jun 2009
Posts: 407
Location: Nashville, TN
PostPosted: Mon May 10, 2010 6:51 pm
 Reply with quote
Quote:
Today i have learnt so many things as i'm working on CICS for the first time!!!!
This is just a start !!! "Dark" days lay ahead of you... icon_biggrin.gif ... and yeah ... Welcome to the world of CICS ... icon_wink.gif
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix
PostPosted: Mon May 10, 2010 8:30 pm
 Reply with quote
Hello,

Quote:
Just in Curiosity Can anyone tell me what is DFHEILL
I suspect this is something site-specific rather than something used on most cics systems. . .

Unless you know of some reason to pursue this, i'd suggest spendng no more time on it. . .
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CICS

 

Similar Topics
Topic Forum Replies
No new posts Compile Several JCL JOB Through one r... CLIST & REXX 4
No new posts Compile rexx code with jcl CLIST & REXX 6
No new posts C Compile time time stamps Java & MQSeries 10
This topic is locked: you cannot edit posts or make replies. How To Write, Compile and Execute Cob... COBOL Programming 5
No new posts Print out all lines with 'IBM' compil... CLIST & REXX 8
Search our Forums:

Back to Top
IBMMainframes.com is not an official and/or affiliated with IBM® in anyway
Board Rules | FAQ | Downloads | Wiki | SiteMap | Contact Us