Fala pessoal tudo bem? Estou com uma dúvida... vocês sabem se é possível editar a obrigatoriedade de um campo para um único usuário? Sem mudar a configuração para os demais? Quero editar o campo A1_CGC, tabela SA1. Grato desde já.
Edição obrigatoriedade Campos para único usuário
- Você vai ver essas setas em qualquer página de pergunta. Com elas, você pode dizer se uma pergunta ou uma resposta foram relevantes ou não.
- Edite sua pergunta ou resposta caso queira alterar ou adicionar detalhes.
- Caso haja alguma dúvida sobre a pergunta, adicione um comentário. O espaço de respostas deve ser utilizado apenas para responder a pergunta.
- Se o autor da pergunta marcar uma resposta como solucionada, esta marca aparecerá.
- Clique aqui para mais detalhes sobre o funcionamento do TOTVS DevForum!
2 respostas
-
Pessoal, acabei ver que não é possível fazer isso. Mudou para um, vai para todos. Valeu um ótimo dia a todos
-
-
é possivel sim Luca, segue exemplo do PE CRMA980 que fiz comparando por nome de usuario mas você pode mudar para codigo,etc.
Para mais exemplos , https://tdn.totvs.com/pages/releaseview.action?pageId=616215550
#Include "protheus.ch" #Include "totvs.ch" #Include "FWMVCDEF.ch" /*/{Protheus.doc} CRMA980 (Customizações via PE no CRMA980) @type user function @author Leandro Lemos @since 20/09/2024 @version P12 @param param_name, param_type, param_descr @return return_var, return_type, return_description @example (examples) @see (links_or_references) /*/ User Function CRMA980() Local aParam := PARAMIXB Local xRet := .T. Local cIDPonto := '' Local cIDModel := '' Local oObj := NIL default __LOGTELA := Nil If aParam <> NIL oObj := aParam[1] cIDPonto := aParam[2] cIDModel := aParam[3] cIDPonto == 'MODELVLDACTIVE' ModifModel(oObj, cIDPonto, cIDModel) EndIf EndIf Return xRet /*/{Protheus.doc} ModifModel (Aplica modificações ao modelo de dados, atualmente utilizado para validar permissões de campos) @type user function @author Leandro Lemos @since 20/09/2024 @version P12 @param oObj, object, model @param cIDPonto, character, Id do ponto em execução @param cIDModel, character, id do model @return return_var, return_type, return_description @example (examples) @see (links_or_references) /*/ Static Function ModifModel(oObj, cIDPonto, cIDModel) Local cUsrBlq := "jose,maria,joao" if Lower(PswChave(RetCodUsr())) $ cUsrBlq // MODELO -> SUBMODELO -> ESTRUTURA -> PROPRIEDADE -> BLOCO DE CÓDIGO -> X3_WHEN := .F. oObj:GetModel("SA1MASTER"):GetStruct():SetProperty("A1_CGC", MODEL_FIELD_WHEN, FwBuildFeature(STRUCT_FEATURE_WHEN , ".F.")) endif Return lRet -