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 

Need help identifying this BMS Macro

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> CICS and Middleware
View previous topic :: View next topic  
Author Message
jagbrew
Beginner


Joined: 09 Aug 2004
Posts: 5
Topics: 4
PostPosted: Mon Aug 09, 2004 3:15 pm    Post subject: Need help identifying this BMS Macro Reply with quote
I have been given this MACRO statement to understand but I can't seem to find it in any CICS manuals I've found. Anybody know of the docuentation for the following MACRO being specified,.

I have shortened the field defintions down, for readability, but it looks like some sort of substitution, but can't find a reference for how it works or what dialect it would work in.
Code:

         MACRO                               
         GEN2 &C,&D                                                   

                 
DWSEL&C  DFHMDF POS=(&D,02),LENGTH=01,
                            ATTRB=(UNPROT,FSET),                                   
                           INITIAL='_'                                             
                DFHMDF POS=(&D,04),LENGTH=01
                                                                 
DWDY1&C  DFHMDF POS=(&D,06),
                             LENGTH=12,
                             ATTRB=(PROT,FSET)
                                                                     
         MEND                     
         GEN2  01,33                                                   
         GEN2  02,34                                                           
         GEN2  03,35                                                           
         GEN2  04,36                                                           
         GEN2  05,37                                                           
         GEN2  06,38                                                   
         GEN2  07,39
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose
PostPosted: Mon Aug 09, 2004 3:41 pm    Post subject: Reply with quote
Jagbrew,

The code you have shown is an assembler macro. check this link for a detailed explanation of MACRO & MEND.

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ASMR1003/CCONTENTS?DT=20000721044852

Hope this helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
jagbrew
Beginner


Joined: 09 Aug 2004
Posts: 5
Topics: 4
PostPosted: Mon Aug 09, 2004 4:00 pm    Post subject: Thank you... Reply with quote
This was exactly what I needed to find... now I can send it to the developers and let them figure out how to handle them.
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 -> CICS and Middleware 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