Interested to Buy Any Domain ? << Click Here >> for more details...
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
- 3 Answers
- 12550 Views
- Accenture, I also Faced
- E-Mail Answers
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
Name the command which is used to release a record on which exclusive control is gained?
Can you define mdt?
Explain how many exceptional condition can be given in a handle condition?
If we wish to create bms executable, what are the basic steps that the user has to go through?
Can you define aica abend?
Can you define cemt?
mention the option used in the cics read command to gain accessibility directly to the file i/o area. (Assume cobol-ii).?
what is eib, how is can be used?
Can you define ppt and what are its uses?
Explain how do you set the mdt option to on status, even if data is not entered?
What is CICS ?
Explain the cics command that is used for reading a record from the tdq?
What is the pic clause for the data type of length option field type of data fields?
Define task work area?
When would you use abend command?
