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
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 sflpag and sflsiz ?
how can I give more performance to some selected pages?
what is the use of jdftval in join logical file?
What are the different opcodes used for file operation on a subfile in a rpg pgm?
Why we sometimes use same file name in file and tofile in ovrdbf and sometimes different?
can you specify a display file to be used in the following modes input,output, or combined modes ?
is there any way to dynamically merge other html scripts into a given html?
what is a join logical file?
Hello, I have created a CMD type object. In one of the fields in Display file , I would like to see All the Source files present by pass the name of Library. Tried using CHoice(Keyword) and Choicepgm on PARM , but doesn't seems to be working. Any help please..
How to reverse a string using RPG?
how do you use exceptional write in c specs?
what opcode will be used to test the zone of a character field?
how do you specify the number of records to roll in a subfile ?
what is the use of sflend keyword?
What are the types of data structure in as400?