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

Map field Question


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

New User


Joined: 06 Apr 2007
Posts: 33
Location: USA

PostPosted: Wed Oct 01, 2008 10:10 pm
Reply with quote

A field in CICS map is alphanumeric X(10) and has its attr unprot, num, brt with mdt on. Now when i key in a date 01/01/2008, it works fine. On the second time I override the date to 100108 and use the DELETE key to wipe out the remaining 7-10 bytes on the screen. On receving the map, the vlaue 100108 has leading zeroes and the value is 0000100108 and therefore edit for the date fails. I am not sure why the field is populated with leading zeroes instead of 100108 left justified.
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


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

PostPosted: Wed Oct 01, 2008 10:13 pm
Reply with quote

Hello,

Possibly because you called it "num" on the screen?
Back to top
View user's profile Send private message
Earl Haigh

Active User


Joined: 25 Jul 2006
Posts: 475

PostPosted: Wed Oct 01, 2008 10:30 pm
Reply with quote

NUM fields default to left zero fill.

seems the map X(10) is expecting date to be entered with / characters.

change the attribute to just unprot,brt,fset
Back to top
View user's profile Send private message
ami777us

New User


Joined: 06 Apr 2007
Posts: 33
Location: USA

PostPosted: Wed Oct 01, 2008 11:27 pm
Reply with quote

The attr is set to CHAR when sending the map. Also the program doesnot expect '/' to be keyed in. Date routine takes care of the format. Any other ideas ??
Back to top
View user's profile Send private message
Earl Haigh

Active User


Joined: 25 Jul 2006
Posts: 475

PostPosted: Thu Oct 02, 2008 1:26 am
Reply with quote

yes,
change the field in the map to 6 positions rather than 10
Back to top
View user's profile Send private message
Earl Haigh

Active User


Joined: 25 Jul 2006
Posts: 475

PostPosted: Thu Oct 02, 2008 1:28 am
Reply with quote

The attr is set to CHAR when sending the map

this is not happening , if you are receiving a leftzero filled field.

0000100108
Back to top
View user's profile Send private message
ami777us

New User


Joined: 06 Apr 2007
Posts: 33
Location: USA

PostPosted: Thu Oct 02, 2008 4:41 am
Reply with quote

The attr is definitely set to char ('I' is the value). There are similar fields which doesnot have any problem when pressing the DELETE key but just for one field. It is strange to understand.
Back to top
View user's profile Send private message
Earl Haigh

Active User


Joined: 25 Jul 2006
Posts: 475

PostPosted: Thu Oct 02, 2008 5:14 am
Reply with quote

if you are moving the character I to FIELDA

move 'I' to FIELDA

and getting leftzero fill on input, it sounds more like the attribute
field contains low values or has been corrupted with a character
that is causing num attribute.

I would double check the program logic.

please post copy of

BMS map DFHMDF statement for the date field

and program logic that you say is setting the attribute
prior to CICS send map
Back to top
View user's profile Send private message
ami777us

New User


Joined: 06 Apr 2007
Posts: 33
Location: USA

PostPosted: Thu Oct 02, 2008 8:27 pm
Reply with quote

Thanks for the direction. DFHMDF was JUSTIFY (right, zero). I changed it to (left, blank) and it worked!. Thank You.
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 Replace Multiple Field values to Othe... DFSORT/ICETOOL 12
No new posts Question for file manager IBM Tools 7
No new posts Join 2 files according to one key field. JCL & VSAM 3
No new posts How to move the first field of each r... DFSORT/ICETOOL 5
No new posts question for Pedro TSO/ISPF 2
Search our Forums:

Back to Top