ÍNDICE

1. Visión general
   
2. Ejemplo de utilización
   
3. Tablas

01. VISIÓN GENERAL

Solicitado um ponto de entrada para gravar informações adicionais na tabela de cadastro de cheques (SEF) quando utilizada a opção "Substituir" na rotina de cheques emitidos (FINA095).  

02. EJEMPLO DE UTILIZACIÓN

Criado ponto de entrada F090ALTSEF que permite gravar informações adicionais na tabela de cadastro de cheques (SEF) 

Configuraciones previas:

Acessar o TOTVS | Developer Studio - TDS
Criar um código fonte com as regras necessárias para a empresa.
Compilar o código fonte em questão.
Abaixo segue um exemplo para a utilização:

#Include 'Protheus.ch'

User Function F090ALTSEF()

Local nAcao := PARAMIXB[1]
/*
Este parametro recebera a ação executada
3-Inclusao de dados adicionais no novo cheque
5-Deleta as informações adicionais do cheque substituido
*/

IF nAcao == 5 // 5 - Deleta informações adicionais do cheque substituido
RecLock("SEF")
SEF->EF_NUMNOTA := "" //CARACTER
SEF->EF_VALORBX := 0 // NUMERICO
SEF->EF_DATAPAG := CTOD("//") // DATA
SEF->EF_TERCEIR := .F. // LOGICO
SEF->(MsUnlock())

Else // 3 - Inclui informações adicionais no novo cheque

RecLock("SEF")
SEF->EF_NUMNOTA := "10052019001" //CARACTER
SEF->EF_VALORBX := 199.59 // NUMERICO
SEF->EF_DATAPAG := CTOD("10/05/2019") // DATA
SEF->EF_TERCEIR := .T. // LOGICO
SEF->(MsUnlock())
EndIf

Return .T.

Flujo de prueba:
Acessar o módulo financeiro.
Acessar a rotina de cheques emitidos (Atualizações|Pago Eletronico|Cheques Emitidos)
Possuir cheques com o status de "não utilizado" e outra situação que possibilite substituir o cheque, por exemplo "pago vinculado"

Acessar o APSDU
Abra a tabela de cadastro de cheques (SEF) e filtre os cheques que serão utilizados no processo(O que será substituído e seu substituto.).
Observe o conteúdo dos campos tratados no ponto de entrada.Neste exemplo os campos são EF_NUMNOTA, EF_VALORBX, EF_DATAPAG, EF_TERCEIR.
Acessar o modulo financeiro e selecione o cheque a ser substituído, ou seja com o status "pago vinculado", e utilize a opção de substituir.

Preencha os campos necessários, utilizando a opção para deixar o antigo cheque a disposição para uma movimentação futura

Veja que o status de cada cheque foi alterado.

Acessar o APSDU e observe que as informações padrão foram alterada entre os cheques e que os campos utilizados no ponto de entrada também foram atualizados para o novo cheque gerado.
Acesse o Financeiro e realize novamente o procedimento, porém neste selecione o cheque gerado nos passos anteriores desse processo.

Preencha os dados necessários e confirme o processo.

Veja que os status foram alterado entre os cheques.

Voltei ao APSDU e podera observar que os campos tratados no ponto de entrada do cheque substituído foram apagados e as informações foram gravadas no novo cheque gerado.
Observação:
Todos os procedimentos devem ser realizados primeiramente em uma base de homologação.

03. TABLAS

SEF - cadastro de cheques

Versión: 12.1.17