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

How to DARK a cics field dynamically(thru cobol program)


IBM Mainframe Forums -> CICS
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
arun.gopal
Warnings : 1

New User


Joined: 25 Jul 2006
Posts: 9
Location: Kerala, India

PostPosted: Fri Nov 25, 2011 3:33 pm
Reply with quote

Hi,
I need to dark a cics field dynamically. Suppose i have a field F1(Protected field) and i have moved 'X'6C' and X'7C' to the F1A(attribute) field but the field is not masked. Could you please suggest a solution for this?

Thanks in Advance.
Back to top
View user's profile Send private message
Garry Carroll

Senior Member


Joined: 08 May 2006
Posts: 1193
Location: Dublin, Ireland

PostPosted: Fri Nov 25, 2011 7:50 pm
Reply with quote

First, you shouldn't move the hex values. IBM supply attributes in DFHBMSCA tio be used for this. The X'6C' equates to DFHPROTN but I find no attribuite for X'7C'. DFHDARK is a X'4C'.

Garry.
Back to top
View user's profile Send private message
arun.gopal
Warnings : 1

New User


Joined: 25 Jul 2006
Posts: 9
Location: Kerala, India

PostPosted: Mon Nov 28, 2011 10:36 am
Reply with quote

Thanks for the response garry. i can include the DFHBMSCA copyook and
move DFHDARK to the fieldA valriable right.
I defined the FIELD as protected in map defintion and after darkenning the field it should remain as protected. Could you please let me know will it work if i mentioned above
Back to top
View user's profile Send private message
Raghu navaikulam

Active User


Joined: 27 Sep 2008
Posts: 193
Location: chennai

PostPosted: Tue Nov 29, 2011 11:22 pm
Reply with quote

Hi,

Use DFHPROTN to protect and non-display the field.


Regards
Raghu
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 each space in cobol string wi... COBOL Programming 3
No new posts Using API Gateway from CICS program CICS 0
No new posts COBOL -Linkage Section-Case Sensitive COBOL Programming 1
No new posts COBOL ZOS Web Enablement Toolkit HTTP... COBOL Programming 0
No new posts Replace Multiple Field values to Othe... DFSORT/ICETOOL 12
Search our Forums:

Back to Top