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

BMS map INITIAL attribute


IBM Mainframe Forums -> CICS
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
vy

New User


Joined: 16 Jun 2009
Posts: 9
Location: schaumburg

PostPosted: Tue Dec 22, 2009 7:33 pm
Reply with quote

Hi all,

How to continue in next line for INITIAL verb where i need to display the label of length 50 using single DFHMDF macro. Thanks in advance.
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: Tue Dec 22, 2009 7:39 pm
Reply with quote

Have you tried what the manual (link at the top of the page) says about continuation of BMS lines:
Quote:
When coding, you should have the title in column 1, the macro in column 10, continuation lines should have * in column 72 and continue on column 16 on the next line.

Or there's always the option of splitting the text into smaller lines that will fit on one line.
Back to top
View user's profile Send private message
vy

New User


Joined: 16 Jun 2009
Posts: 9
Location: schaumburg

PostPosted: Wed Dec 23, 2009 11:07 am
Reply with quote

First of all thanks for your reply.

I understand what you mention for continuation but here in case of initial I like to display a label of 60 characters if I start my label from say 18th column in the BMS Map code I can not fit in the same line So I should use the continuation character * and continued in the second line but second line is not displayed on the screen in continuation with first line. Can you please suggest me that.


----+----1----+----2----+----3----+----4----+----5----+----6----+----7--
CONFVAR DFHMDF POS=(20,23), X
LENGTH=47, X
ATTRB=(BRT,PROT), X
INITIAL='WOULD YOU LIKE TO CONFIRM THIS SSN X
(Y/N)?'
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: Wed Dec 23, 2009 6:22 pm
Reply with quote

The manual indicates it works (from the CICS TS 3.2 Information Center):
Quote:
# Initial values (the INITIAL, XINIT, and GINIT keywords) are exceptions to the rule, because they may not fit even if you start on a new line. Except when double-byte characters are involved, you can split them at any point after the first character of the initial value itself. When you split in this way, use all of the columns through 71 and continue in column 16 of the next line. Double-byte character set (DBCS) data is more complicated to express than ordinary single-byte (SBCS) data. See Step 12 if you have DBCS initial values.
# Surround initial values by single quote marks. If you need a single quote within your text, use two successive single quotes (the assembler removes the extra one). Ampersands also have special significance to the assembler, and you use the same technique: use two ampersands where you want one, and the assembler removes the extra.
# If you use more than one line for a macro, put a character (any one except a blank) in column 72 of all lines except the last.
Back to top
View user's profile Send private message
vy

New User


Joined: 16 Jun 2009
Posts: 9
Location: schaumburg

PostPosted: Thu Dec 24, 2009 12:36 pm
Reply with quote

Thank you. It worked.
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: Thu Dec 24, 2009 5:52 pm
Reply with quote

Glad to hear the manual was right! icon_smile.gif
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 TSO initial setup / problems TSO/ISPF 9
No new posts XML Generate with Attribute & Ele... COBOL Programming 5
No new posts CALL MACRO EXECUTE FORM - Setting the... PL/I & Assembler 7
No new posts Initial Verification Process Checklis... All Other Mainframe Topics 0
No new posts Attribute field CICS 1
Search our Forums:

Back to Top