Histórico da Página
Ponto de Entrada para alteração de dados na tabela de Contas a Pagar.
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||
Segmento: | Manufatura | ||||
Módulo: | Manutenção de Ativos | ||||
Rotina: |
| ||||
Chamados Relacionados | TUJKUF | ||||
País(es): | Todos | ||||
Banco(s) de Dados: | Todos | ||||
Sistema(s) Operacional(is): | Todos |
Ponto de Entrada
Descrição: | Ponto de Entrada para que seja adicionado o valor do Desconto na tabela de Contas a Pagar, chamado na função de integração com o financeiro, após confirmar montar a tela de parcelas, sendo chamado individualmente para cada parcela (uma vez para cada linha). Outra aplicação é para realizar alteração de conteúdo dos títulos SE2 antes da chamada do ExecAuto FINA050, nesse momento passando como parâmetro o array completo com todos os títulos. |
Localização: | SIGAMNT: Atualizações/Multas/Multa |
Programa Fonte: | MNTA765.PRX |
Função: | MNTA7655() |
Parâmetros: |
Obs: Os parâmetros acima só são passados quando o ponto de entrada é chamado antes da integração com FINA050, conforme consta na descrição do PE. | ||||||||||
Retorno: |
| |||||||||
Observação: | O ponto de entrada tem duas aplicações: a) quando é chamado na rotina de multas, não envia parâmetros (portanto aPARAMIXB) é nulo, e espera como retorno o valor de desconto (caracter); b) quando é chamado na geração do título financeiro (SE2), envia como parâmetro o array de títulos (aPARAMIXB[1] = array) e espera como retorno o array atualizado. |
Exemplo:
#IncludeBloco de código | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
#Include 'Protheus.ch' |
User Function MNTA7655() |
Local xRet
IfLocal xRet If Type("PARAMIXB") == "A" |
//chamado na gravação do título |
SE2 xRet:= PARAMIXB[1] |
nPos := asCan(xRet,{|x| x[1] == "E2_HIST"}) |
If nPos > 0
If nPos > 0 xRet[nPos][2] := 'Multa gerada via módulo MNT.' |
EndIf
ElseEndIf Else //chamado para gravar |
desconto xRet:= M->TRX_DESCON |
EndIf
Return xRet
EndIf
Return xRet |