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

How to underline a Field in Output Map


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

Active User


Joined: 04 Nov 2006
Posts: 109

PostPosted: Wed Dec 13, 2006 4:39 am
Reply with quote

hi,

i work with sdf2

i defined a field in a map with the und (underlined) attribute

it works well when i test the map on sdf2

when i run the program, the field in the map doesn't show up underlined though

what would be the problem?

how to change an attribute value dynamically? could u guys provide an example?

thanks
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3156
Location: Tucson AZ

PostPosted: Wed Dec 13, 2006 5:02 am
Reply with quote

Just a guess, I never used SDF (1 or 2) though I have installed it...grin... I learned the old way, harder, but when you have tightwad management,... icon_rolleyes.gif

Maybe this will help:
Quote:
HILIGHT specifies the default highlighting attribute for all fields in all maps in a mapset.
OFF is the default and indicates that no highlighting is used.
BLINK specifies that the field must blink.
REVERSE specifies that the character or field is displayed in reverse video, for example, on a 3278, black characters on a green background.
UNDERLINE specifies that a field is underlined.
The HILIGHT operand is ignored unless the terminal supports highlighting, as indicated by the RDO TYPETERM option HILIGHT(YES).
Check this out and "report back", more help can follow. icon_smile.gif
Back to top
View user's profile Send private message
jctgf
Currently Banned

Active User


Joined: 04 Nov 2006
Posts: 109

PostPosted: Wed Dec 13, 2006 5:11 am
Reply with quote

hi

could u could provide an example?

thanks
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3156
Location: Tucson AZ

PostPosted: Wed Dec 13, 2006 5:21 am
Reply with quote

Ah, come on, what example? Have you checked the
Quote:
RDO TYPETERM option HILIGHT
?

Before anything can be done, you need to sift through the mapset, map and field definitions looking for overriding parms.

Taking a step back, the SDF testing and the actual were done on the same terminal definition? Dang, is SDF a TSO or CICS function???? icon_confused.gif
Back to top
View user's profile Send private message
jctgf
Currently Banned

Active User


Joined: 04 Nov 2006
Posts: 109

PostPosted: Wed Dec 13, 2006 5:31 am
Reply with quote

sdf runs under tso

it creates an assembler macro and a cobol copybook from the map u have defined

jc
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3156
Location: Tucson AZ

PostPosted: Wed Dec 13, 2006 5:44 am
Reply with quote

Ya, I know what SDF generates, look a the macro definitions for the csect and look at the CICS Programming Reference in the appendix for some understanding of the BMS macros.

The perceived (by TSO and/or CICS) terminal definitions between two sub-systems CAN be different! Investigate that.
Back to top
View user's profile Send private message
flyfort

New User


Joined: 01 Sep 2006
Posts: 2

PostPosted: Thu Jan 18, 2007 6:51 pm
Reply with quote

Hi Buddy ...

I have recently worked with CICS screens. I too had same Problem so what I did was programmatic when u know that the control has entered the Flow for the first time You move to the Output Attribute of the Map Variable like this

Suppose the Map Field to be SC-CTRY-CDE. So the Output Variable will be SC-CTRY-CDEO and Input will be SC-CTRY-CDEI.So what u can do is this

MOVE ALL '_' TO SC-CTRY-CDEO

and then Send the MAP. By doing this you will get Underlines in the CICS SCREEN output.This is the Best way as far as I know. Underlines in SDF only Signifies that this is th Area that will be available for the output variable of the Screen to Display. Like if the Screen Portion while designing MAP in SDSF looks like

COUNTRY CODE ____________
CURRENCY CODE ____________

It will never mean all _ will be there in Actual Display of Map by SEND MAP command.It means that area will be display for Country Code and Currency Code.


Hope that it Explains Enough. U can Shoot me any doubts for CICS screens.
Back to top
View user's profile Send private message
UmeySan

Active Member


Joined: 22 Aug 2006
Posts: 771
Location: Germany

PostPosted: Thu Jan 18, 2007 7:55 pm
Reply with quote

Hi !

By creating a Field in a Map the DFHMDF macro defines a field within a map that is defined by the DFHMDI macro. A map contains zero or more fields. For each field there is a DFHMDF macro-statement.

For underlining a Field, your parameter is
HILIGHT= UNDERLINE

As flyfort mentioned, for every field there are special generated declarations in the copybook. He had moved underscores in the OutputArea. But you could also change the Attribute-Byte of the mapfield.
This could be done by moving the adaquate Hex-string to the attribute-byte. Also there are standard BMS (BasicMappingSupport) attributes you could use. In your case it's DFHUNDLN.


Attention: I rember an APAR for a quiet similar situation:

CICS EXTENDED ATTRIBUTES OF BMS SCREENS LOST WHEN REDISPLAYED WHILE DEBUGGING

But i think that had been in summer-2004.

Regards, UmeySan


[fld] DFHMDF
[,POS={number | (line,column)}]
[,ATTRB=([{ASKIP | PROT | UNPROT[,NUM]}]
[,{BRT | NORM | DRK}]
[,DET]
[,IC]
[,FSET])]
[,COLOR={DEFAULT | color}]
[,JUSTIFY=([{LEFT | RIGHT}][,{BLANK | ZERO}])]
[{,INITIAL='char data' |
XINIT=hex data |
GINIT='graphic char data'}]
[,HILIGHT={OFF | BLINK | REVERSE | UNDERLINE}]
[,PS={BASE | psid}]
[,VALIDN=([MUSTFILL][,MUSTENTER][,TRIGGER])]
[,LENGTH=number]
[,GRPNAME=group-name | ,OCCURS=number]
[,PICIN='value']
[,PICOUT='value']
[,OUTLINE={BOX |
([LEFT][,RIGHT][,OVER][,UNDER])}]
[,SOSI={NO | YES}]
[,TRANSP={YES | NO}] (1)
[,CASE=MIXED]
Back to top
View user's profile Send private message
flyfort

New User


Joined: 01 Sep 2006
Posts: 2

PostPosted: Sun Jan 21, 2007 4:00 pm
Reply with quote

Hi UmeySan

Thanks I never knew about DFHUNDLN and I am sure I will use this for my ongoing project. I am sure it should work. I understand that writing a Macro will provide much flexibility and would help a lot in lot many concerns but now a days at many places we use BMS. Its easy but not that Flexible. I had to tweak my Physical Generation for MAPS before I could use them as I want......

Thanks for this
Back to top
View user's profile Send private message
Krishna Velamur

New User


Joined: 22 Aug 2008
Posts: 22
Location: Hyderabad

PostPosted: Tue Aug 26, 2008 2:43 pm
Reply with quote

Suppose the field is FIELD-1.

To move underlines dynamically, you can code this statement

MOVE UNDERLINES to FIELD-1H (copybook field).
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix

PostPosted: Tue Aug 26, 2008 8:42 pm
Reply with quote

Hello and welcome to the forums,

Please notice that you replied to a topic that has been inactive for about a year and a half. There might not be much more dialog. . . icon_smile.gif
Back to top
View user's profile Send private message
jctgf
Currently Banned

Active User


Joined: 04 Nov 2006
Posts: 109

PostPosted: Wed Aug 27, 2008 2:36 am
Reply with quote

it's quite the reverse! the answer is actually very useful!
thanks a lot!
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix

PostPosted: Wed Aug 27, 2008 2:49 am
Reply with quote

Which is why we don't usually lock or delete inactive topics.

Every now and again, something very useful happens icon_wink.gif

d
Back to top
View user's profile Send private message
zos5415

New User


Joined: 29 Aug 2008
Posts: 18
Location: China

PostPosted: Thu Dec 10, 2009 2:18 pm
Reply with quote

Before you can use the parm HILIGHT= UNDERLINE .

you must add MAPATTS=(COLOR,HILIGHT,PS), in the DFHMSD
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10888
Location: italy

PostPosted: Thu Dec 10, 2009 2:45 pm
Reply with quote

The topic has been resurrected after
Code:
...          2 year(s) - (months difference / 12 )
...          2 year(s) - (difference )
...         35 months
...       1053 days
...      25294 hours
...    1517658 minutes
...   91059480 seconds
for related answers

and after
Code:
...          1 year(s) - (months difference / 12 )
...          1 year(s) - (difference )
...         16 months
...        470 days
...      11291 hours
...     677489 minutes
...   40649340 seconds
for mundane chat
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 Help required to reset decimal points... DFSORT/ICETOOL 10
No new posts REXX/CMS How to place command console... CLIST & REXX 4
No new posts Reroute print output via REXX/SDSF TSO/ISPF 6
No new posts Sorting Date Field DFSORT/ICETOOL 4
No new posts Concatenate 2 input datasets and give... JCL & VSAM 2
Search our Forums:

Back to Top