how to make the entire screen protected. i.e., for example
when we design a delete screen before deleting the details
we need to popup a screen saying do u wish to delete(Y/N).
When this screen appears i want to make the previous screen
fields as protected.Please help me with the anser. i need
the entire screen to be protected.
Thanks in advance
Answer Posted / lenin
I am not sure how to make the entire screen as protected by
a single statement. But we can protect the fields
individully by moving the user defined value to the
attribute field of the fields.
Attribute byte is a 1 byte field, in which the third bit
indicates whether it is protected(1) or unprotected (0) and
for all other fields we can give any of 0 or 1
For Ex: 00100101 ---- if this value is in attribute byte
then the filed is protected we can say, as the third bit is
1.
The decimal value of it(00100101) is 37.
The following program will show you how to move this value
to the attribute byte of the map fields.
01 fiel1 pic s9(4) comp value 37.
01 fiel2 redefines fiel1.
02 a pic x.
02 b pic x.
Move b to nameA. // name field will be protected.
Like this we move b to all the unproteceted fields on the
screen.
Please correct me if i am wrong and provide me the correct
soultion....
| Is This Answer Correct ? | 5 Yes | 1 No |
Post New Answer View All Answers
Explain how many exceptional condition can be given in a handle condition?
Explain how many conditions can you include in a single handle condition command?
What is the procedure to solve an ASRA ABEND?
Explain how do you dynamically set the cursor position to a specific field?
What is meant by MDT? Furthermore, comment on FRSET and FSET ?
when an xctl is done, does the tranid change ? Is a new task created ? Does it cause an implicit syncpoint to be issued ?
Code the related portions of cics/cobol-i programs to gain addressability to twa area assigned to a particular task. Assme that the size of twa area is 300bytes. What are the advantages if cobol-ii is used in the place of cobol?
Can you explain cics translator?
What is the meaning of the eibaid field?
What is eib?
Specify cics transaction initiation process?
Highlight the difference between a symbolic map and physical map?
Explain the difference between cics program control table (pct) and cics processing program table (ppt)?
How to handle exceptional conditions in cics?
Name the three ways available for a program to position the cursor on the screen?