Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Map field Question

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
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    Post subject: Map field Question
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

Site Director


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

PostPosted: Wed Oct 01, 2008 10:13 pm    Post subject:
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    Post subject:
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    Post subject: Reply to: Map field Question
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    Post subject:
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    Post subject:
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    Post subject: Reply to: Map field Question
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    Post subject:
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    Post subject: Reply to: Map field Question
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    IBMMAINFRAMES.com Support Forums -> CICS All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts INVALID FIELD OR CONSTANT IN SORTOF ?? Ron Klop DFSORT/ICETOOL 8 Wed Jan 11, 2017 3:44 pm
No new posts Performing arithmetic on input field zh_lad DFSORT/ICETOOL 31 Tue Dec 06, 2016 8:04 pm
No new posts Add PD field from 2nd file to PD in 1st Sushant Garje DFSORT/ICETOOL 6 Thu Dec 01, 2016 4:32 pm
No new posts How to split the records using the am... vnktrrd DFSORT/ICETOOL 24 Fri Oct 28, 2016 7:33 pm
No new posts Sort records based on numeric field. Alks SYNCSORT 2 Wed Oct 19, 2016 10:14 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us