Page tree
Skip to end of metadata
Go to start of metadata

Ponto-de-Entrada: MT103SE2 - Possibilita a adição de campos ao aCols de informação
Abrangências: Microsiga Protheus 10
Versões: Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Espanhol , Inglês
Descrição:
Este ponto de entrada tem o objetivo de possibilitar a adição de campos ao aCols de informações do título financeiro gravado para o documento de entrada, para as opções de visualização, inclusão e exclusão do documento.Ex.: Permite adicionar o campo de Vencimento Original ao aCols de informações quando visualizar ou excluir o documento.Localização: Function NfeFldFin() - Função responsável pelo tratamento do folder financeiro no documento de entrada.
Eventos

 Após a criação do aHeader e aCols de títulos financeiros conforme campos da tabela SE2.

Programa Fonte
MATA103X.PRX
Sintaxe

MT103SE2 - Possibilita a adição de campos ao aCols de informação ( [ PARAMIXB[1] ], [ PARAMIXB[2] ] ) --> aRet

Parâmetros:
NomeTipoDescriçãoDefaultObrigatórioReferência
PARAMIXB[1]VetorVetor contendo os registros adicionados por padrão para o aHeader de título financeiro
PARAMIXB[2]Array of RecordVariável lógica que determina se a operação é de visualização (.T.) ou não (.F.).
Retorno
    aRet(vetor)
  • Vetor contendo os campos que deverão ser incluídos ao aHeader de títulos financeiros, deverão ser criados na mesma estrutura dos campso padrões.
Observações

 Este ponto de entrada foi alterado para possibilitar a adição de campos no aCols mesmo na operação de inclusão do documento de entrada.

Os campos adicionais não serão gravados ao título através do documento de entrada incluído, para isto deverá ser utilizado um ponto de entrada de gravação como o MT100GE2 para o nOpc == 1 (Inclusão) ou M103DSE2 para o nOpc != 1 (Estorno).

O retorno do ponto de entrada deve ser um array contendo os campos que deverão ser incluídos no aHeader e aCols criado para os títulos financeiros, a estrutura do registro deve ser igual aos demais registros já criados pelo sistema, estes registros são passados como parâmetro pelo ponto de entrada.

Ex.: 

If  MsSeek("E2_VENCORI")   // Campo de Vencimento Original

AADD(aRet,{ TRIM(X3Titulo()),SX3->X3_CAMPO, SX3->X3_PICTURE,SX3->X3_TAMANHO,;

SX3->X3_DECIMAL, "",SX3->X3_USADO,SX3->X3_TIPO,SX3->X3_F3,SX3->X3_CONTEXT,;

SX3->X3_CBOX, SX3->X3_RELACAO, ".T."})

EndIf 

Exemplos
#INCLUDE "PROTHEUS.CH"User Function MT103SE2Local aHead:= PARAMIXB[1]Local lVisual:= PARAMIXB[2]Local aRet:= {}// Customizações desejadas para adição do campo no grid de informaçõesReturn (aRet)