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.