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

Partial color change of a field in CICS Screen.


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

New User


Joined: 28 Sep 2017
Posts: 3
Location: India

PostPosted: Fri Sep 29, 2017 7:56 pm
Reply with quote

Hi!

I have a requirement to change some of the text in a variable in CICS. When I'm trying to pass color to Field attribute the whole field will change but I want only some of the text from that field to be highlighted with different color.

Ex: I have a variable of length 79 declared on a map. Data is gonna come from another system and Its length will be anything from 1 to 79. there is a text called Label in data which I want to highlight. other text in the same variable should remain Green. If Variable is declared as 79. I want to highlight 6 characters in that variable it may exist any where in that variable.

Input 1 : xxxxxxxxxxxxxLABELxXXXXXXX

Input 2 :XXXXXXXXXXXXXxasdaxxxxxxxxxxxxxxLABELXXXX

Is there any way to acheive this.. And I want to utilize the whole line without any space.

Back to top
View user's profile Send private message
prino
Warnings : 1

Senior Member


Joined: 07 Feb 2009
Posts: 1241
Location: Vilnius, Lithuania

PostPosted: Fri Sep 29, 2017 10:29 pm
Reply with quote

Ah, another "requirement".

Who came up with it, some PHB, or you yourself ("which I want to highlight"), to fancify your output?

It's possible, but you'll have to overlay BMS maps on BMS maps.
Back to top
View user's profile Send private message
waseem0424

New User


Joined: 28 Sep 2017
Posts: 3
Location: India

PostPosted: Sat Sep 30, 2017 3:07 pm
Reply with quote

It is actually a requirement from business. I'm not able to display it through BMS MAp overlay as well because positions are not fixed they vary for different data .


My screen contains 17 Lines, Each of 79 character length. I have declared each line as a single variable and displaying the lines dynamically from cobol program as per the length of data. In this data there will b three labels which may come anywhere and I have to highlight them.
Back to top
View user's profile Send private message
prino
Warnings : 1

Senior Member


Joined: 07 Feb 2009
Posts: 1241
Location: Vilnius, Lithuania

PostPosted: Sat Sep 30, 2017 3:20 pm
Reply with quote

Your requirement is, and I'm pretty sure about that, impossible to fulfil without using multiple BMS maps. Unlike ISPF, CICS doesn't know the concept of shadow variables!
Back to top
View user's profile Send private message
waseem0424

New User


Joined: 28 Sep 2017
Posts: 3
Location: India

PostPosted: Sat Sep 30, 2017 3:40 pm
Reply with quote

Thank you Prino,

Is it possible to generate BMS Maps in Cobol program dynamically? If yes then how?
Back to top
View user's profile Send private message
prino
Warnings : 1

Senior Member


Joined: 07 Feb 2009
Posts: 1241
Location: Vilnius, Lithuania

PostPosted: Sat Sep 30, 2017 4:03 pm
Reply with quote

waseem0424 wrote:
Is it possible to generate BMS Maps in Cobol program dynamically? If yes then how?

BMS Maps are load modules, and you (general "you", not you you!) can generate them dynamically with a COBOL program (if COBOL supports RECFM=U), but you wouldn't be able to install them in CICS anyway.

Far more importantly, adding load modules dynamically to a production library would open a hole the size of a galaxy in the system integrity!
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 A command to change LRECL of an exist... JCL & VSAM 7
This topic is locked: you cannot edit posts or make replies. Passing a field name to COBOL program COBOL Programming 10
No new posts How to get RBA value from CICS EVENT CICS 5
This topic is locked: you cannot edit posts or make replies. Sample CICS Webservices Program CICS 1
No new posts BMS map length field greater than zero CICS 3
Search our Forums:

Back to Top