Linha Microsiga Protheus

Árvore de páginas

Ponto-de-Entrada: MT103LCF - Bloqueio de campos para incluir informações no documento de Entrada.
Versões: Microsiga Protheus 8.11 , Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Espanhol , Inglês
Descrição: 
O Ponto de Entrada MT103LCF permite que os campos: Descontos, Vlr.Frete, Vlr.Despesas, Vlr.Seguro
da Aba: Descontos / Fretes / Despesas, sejam bloqueados a fim de que não se possa incluir informações no momento da inclusão de um Documento de Entrada.

Os parâmetros recebidos pelo ponto de entrada, estão no array PARAMIXB, sendo eles: 

PARAMIXB[1] = Nome do Campo

LOCALIZAÇÃO: Na função: NfeFldDsp

EM QUE PONTO: Sempre que entrar na Aba: Descontos / Fretes / Despesas

Caso o nome do campo não for encontrado no ponto de entrada, será considerado .T. e o programa irá funcionar normalmente na sua forma padrão.
Programa Fonte 
MATA103.PRW
Sintaxe

MT103LCF - Bloqueio de campos para incluir informações no documento de Entrada. ( < campo> ) --> lRet

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
campo Caracter Campo a ser bloqueado .T. X
Retorno
    lRet(logico)
  • Retorna .T. = Liberado e .F. = Bloqueado
Observações

Este ponto de entrada está inicialmente sendo aplicado a Aba: Descontos / Fretes / Despesas, porém,

o mesmo poderá ser utilizado por outras Abas caso houver outras necessidades de bloqueio de campos.

Exemplos 
user function MT103LCF()Local cCampo:=UPPER(PARAMIXB[1]) Local lRet :=.T.Do Case	Case cCampo == "F1_DESCONT"	     lRet = .T.	Case cCampo == "F1_FRETE"	     lRet = .F.	Case cCampo == "F1_DESPESA"	     lRet = .T.	Case cCampo == "F1_SEGURO"	     lRet = .T.EndCase Return (lRet)