Modify dynamically DFHMDI attribute size of BMS map

lemonface · New User Joined: 11 Jul 2007 Posts: 4 Location: france

Hi !

I would like to modify in my COBOL program the DFHMDI size attribute of my BMS map before sending him.

Is it possible

Thanks

William Thompson · Posted: Thu Jul 12, 2007 2:01 pm

That value is imbedded in the csect, normally unavailable for alteration.
What is your need to change it?

lemonface · New User Joined: 11 Jul 2007 Posts: 4 Location: france

I've many mapset with same content where the only difference is their size.
I would like use one mapset and dynamically modify his size.

William Thompson · Posted: Thu Jul 12, 2007 2:50 pm

Why are the sizes different?
One would think that the map size is determined by the screen size, wouldn't one?

Earl · Posted: Fri Jul 13, 2007 1:58 am

WIth the DFHMDI statement you can specify expected target physical screen size,

has nothing to do with size of Map copybook in your cobol program.

what exactly are you trying to accomplish ?

lemonface · New User Joined: 11 Jul 2007 Posts: 4 Location: france

I would like to simulate small windows like confirmation windows but i would like to modify the map size according to the context.

William Thompson · Posted: Fri Jul 13, 2007 1:31 pm

lemonface · New User Joined: 11 Jul 2007 Posts: 4 Location: france

Ok i'll try this way.

Thx for your help.

William Thompson · Posted: Fri Jul 13, 2007 1:45 pm

A hint?

Create a small map, accounting for every byte in the square area it occupies. Then either hex view the csect in the loadlib or CECI/CEDF send it and examine the sent data to get the primary valuse for the SBAs and SFs and such......
I think there is a functional characteristics manual for 3270s that contains all the values for the screen commands.

Earl · Posted: Fri Jul 13, 2007 7:45 pm

You can not create BMS maps on the fly, If intent on using BMS , it is possible to show Popup windows, but you would have to construct another
bms mapset/map of a fixed image.

The only REAL way to create on the fly popup screens would be to construct 3270native mode datastreams in your program and use
'exec cics send text noerase' commands.

If you are not experienced with 3270 native mode datastreasm, I could
code you an API that would create popup on the fly and send to screen
for you. you code
EXEC CICS LINK PROGRAM ('ELHPOPUP')
COMMAREA (WS-CONTEXT-DATA)
END-EXEC.

Send me a private email post, and we can discuss in detail.