Interested to Buy Any Domain ? << Click Here >> for more details...
How to write a password mask program in as400?
like the password which i type should be displayed
as '*****' r ###### which the user wishes to dispaly
if u could help me with url r the solution in written code
this will help me
- 21 Answers
- 36295 Views
- Accenture, SNS, I also Faced
- E-Mail Answers
Answer Posted / abhishek bajpai
Hi All,
Quite hectic to snd t code to evry1 so copying it below.You
can add to the below code to verify the pwd etc. based on
ur requirement.
DSPF:
A DSPSIZ(24 80 *DS3)
A R REC1
A FLD1 10A O 7 3
A FLD001 1 B 5 3CHECK(ER) DSPATR(ND)
PGM:
fTest15 cf e workstn
/free
dow %Len(%Trim(fld1)) < 10;
Exfmt rec1;
If fld001 <> *Blanks;
fld1 = %Trim(fld1) + '*';
endif;
enddo;
*Inlr = *on;
/end-free
Thnx
| Is This Answer Correct ? | 0 Yes | 0 No |
Post New Answer View All Answers
what is a logical file?
Explain this error: "all record formats for externally-described file abcd ignored or dropped due to error; file ignored."?
Why we sometimes use same file name in file and tofile in ovrdbf and sometimes different?
what is a program described file in rpg?
what is meant by object lock requests,held locks and locks waiting to be applied(wrkobjlck) why should we apply for locks.Please explain sir.
what is the disadvantage of using global variable?
how many specifications are there in rpg/400? What are they?
. How to know why the OPM job is in MSGWAIT state?..WHAT COULD BE THE REASON FOR it?
which are the query selection criteria, which can be given in a query?
can error messages as a result of a comp, range or values keyword be overridden?
Space & Skip Are Which Level Keywords?
describe the difference between the dowxx and douxx operations?
define the purpose of the leave operation?
what is the version of os/400 that we have?
What is array in as400? What are the types of array?
