Boa tarde Pessoal.
Queremos bloquear os usuário de alterar o grupo do produto. Só conseguirem alterar quando estiver preenchido "8888". Usuários que eu colocar no parametro, podem alterar qualquer 1.
Criamos o fonte assim: User function ALTB1GR()
Local lRet := .F. Local cUserAltFormSB1 := SuperGetMV("DC_ALTB1GR") Local cLogin := UsrRetName(RetCodUsr())
If cLogin $ cUserAltFormSB1 .or. M->B1_GRUPO == "8888" lRet := .T.
Endif
Return(lRet)
Ok, funcionou, só aparece para editarem os 8888.
PORÉM quando tento alterar de 8888 para qualquer outro grupo da o seguinte: Modo edição não respeitado. Valor não pode ser atribuido. (grupo)
No modo de edição do B1_grupo está: IF(ALTERA,U_ALTB1GR(),.F.)
Alguém poderia me ajudar por favor ?
Obrigado desde já.
Atenciosamente.
