Say you have the following code written to hide a password as it’s being input. The problem occurs when a user is forced to reset his password. The REINPUT statment puts the cursor back at the #NEWPASSW field, but because it’s a non-display field, the user doesn’t see the cursor there. Any ideas of a work-around to somehow force the cursor to display?
MAP (AD=M IP=OFF)
RESET #ORG(A11) #USERNAME(A7) #INPASSW(A8) #NEWPASSW(A8)
#USER-STATUS(A1) #MSG(A60)
MAP (AD=M IP=OFF)
02/25 'ACCESS CONTROL SIGN-ON'
04/02 'ORGANIZATION' 17T 'USER NAME' 29T 'PASSWORD' 40T 'NEW PASSWORD'
05/02 #ORG 17T #USERNAME 29T #INPASSW (AD=N) 40T #NEWPASSW (AD=N)
#USER-STATUS := 'R'
IF #USER-STATUS = 'R' AND #NEWPASSW = ' '
DO MOVE '604 - PASSWORD HAS BEEN RESET-NEW PASSWORD IS REQUIRED' TO #MSG
BACKOUT TRANSACTION
REINPUT #MSG MARK 4
DOEND
END