Lab 03 — Usuários e Segurança INTERMEDIÁRIO

Duração estimada: 45–60 min | Pré-requisito: Autoridade *SECADM ou superior

Objetivos

1Liste todos os usuários:

WRKUSRPRF

Pressione F11 para ver data de último login e status.

2Filtre usuários desabilitados:

WRKUSRPRF USRPRF(*ALL) STATUS(*DISABLED)

3Exiba detalhes do seu próprio perfil:

DSPUSRPRF USRPRF(*CURRENT)

📝 Observe: User class, Password expiration interval, Status, Sign-on attempts not valid.

4Crie o usuário de teste:

CRTUSRPRF USRPRF(LABTEST01) PASSWORD(Lab@2024) USRCLS(*USER) TEXT('Usuario teste - Lab 03') PWDEXPITV(30)

5Verifique a criação:

DSPUSRPRF USRPRF(LABTEST01)

Confirme: classe *USER, status *ENABLED, expiração em 30 dias?

6Altere a descrição:

CHGUSRPRF USRPRF(LABTEST01) TEXT('Usuario teste Lab03 - Operacao TI')

7Configure expiração de senha para 60 dias:

CHGUSRPRF USRPRF(LABTEST01) PWDEXPITV(60)

8Defina biblioteca inicial:

CHGUSRPRF USRPRF(LABTEST01) CURLIB(QGPL)

9Desabilite o usuário:

CHGUSRPRF USRPRF(LABTEST01) STATUS(*DISABLED)

10Confirme:

DSPUSRPRF USRPRF(LABTEST01)

O campo Status deve mostrar *DISABLED.

11Reabilite:

CHGUSRPRF USRPRF(LABTEST01) STATUS(*ENABLED)

12Simule desbloqueio por tentativas inválidas:

CHGUSRPRF USRPRF(LABTEST01) PWDLCK(*NO)

13Verifique quem tem acesso a um arquivo:

DSPOBJAUT OBJ(QGPL/QCLSRC) OBJTYPE(*FILE)

📝 Quais usuários têm acesso e com qual autoridade?

14Conceda autoridade de leitura ao usuário de teste:

GRTOBJAUT OBJ(QGPL/QCLSRC) OBJTYPE(*FILE) USER(LABTEST01) AUT(*USE)

15Confirme e revogue:

DSPOBJAUT OBJ(QGPL/QCLSRC) OBJTYPE(*FILE)
RVKOBJAUT OBJ(QGPL/QCLSRC) OBJTYPE(*FILE) USER(LABTEST01) AUT(*ALL)

16Verifique as políticas:

DSPSYSVAL SYSVAL(QPWDMINLEN)
DSPSYSVAL SYSVAL(QPWDMAXLEN)
DSPSYSVAL SYSVAL(QMAXSIGN)
DSPSYSVAL SYSVAL(QPWDEXPITV)

17Exclua o usuário de teste:

DLTUSRPRF USRPRF(LABTEST01) OWNOBJOPT(*NODLT)

18Confirme a exclusão (deve retornar erro CPF2204):

DSPUSRPRF USRPRF(LABTEST01)