Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/327912/newLayout.css
Portuguese

Pagetitle
MT103LCF - Bloqueio de campos para incluir informações no documento de Entrada.
MT103LCF - Bloqueio de campos para incluir informações no documento de Entrada.

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:
NomeTipoDescriçãoDefaultObrigatórioReferência
campoCaracterCampo 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)