Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

ÍNDICE

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

01. VISIÓN GENERAL

Solicitado um ponto Se solicitó un punto de entrada para gravar informações adicionais na tabela de cadastro grabar información adicional en la tabla de registro de cheques (SEF) quando utilizada a opção "Substituir" na rotina al utilizar la opción "Sustituir" en la rutina de cheques emitidos (FINA095).  

02. EJEMPLO DE UTILIZACIÓN

Criado ponto Se creó el punto de entrada F095ALTSEF que permite gravar informações adicionais na tabela de cadastro grabar información adicional en la tabla de registro de cheques (SEF


Punto de Entrada

Descripción:

F095ALTSEF

Ubicación:

Financiero

Eventos:

Cheques Emitidos

Programa Fuente:

FINA095.PRW

Función:

A095Anular() - Función para Anular cheques

Retorno:

Ninguno

 


Configuraciones previas:Acessar o TOTVS

Acceda al TOTVS | Developer Studio - TDS

...

Cree un código fuente con las reglas necesarias para la empresa.

...

Compile el referido código fuente.
A continuación se muestra un ejemplo para la utilización:

#Include 'Protheus.ch'

User Function F095ALTSEF()

Local cChAntg := PARAMIXB[1] // Dados do Datos del cheque que será substituidose sustituirá
Local cChNovo := PARAMIXB[2] // Dados do Datos del cheque que será gerado se generará 
Local aAreaSEF:= SEF->(GetArea())

DbSelectArea("SEF")
SEF->(DbSetOrder(4))
IF SEF->(DbSeek(cChAntg) )

RecLock("SEF")
SEF->EF_NUMNOTA := "" //CARACTER
SEF->EF_VALORBX := 0 // NUMERICO
SEF->EF_DATAPAG := CTOD("//") // DATA
SEF->EF_TERCEIR := .F. // LOGICO
SEF->SEF→(MsUnlock())

EndIF

SEF->(DbCloseArea())

DbSelectArea("SEF")
SEF->(DbSetOrder(4))
IF SEF->(DbSeek(cChNovo))

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->SEF→(MsUnlock())

EndIF


SEF->(DbCloseArea())

SEF->(RestArea(aAreaSEF))

Return .T.Return 

Flujo de prueba:
Acessar o módulo financeiroAcceda al Módulo Financiero.
Acessar Acceda a rotina la rutina de cheques emitidos (AtualizaçõesActualizaciones|Pago Eletronicoelectrónico|Cheques Emitidosemitidos)
Possuir cheques com o status de "não utilizado" e outra situação que possibilite substituir o Tener cheques con el estatus "no utilizado" y otra situación que permita sustituir el cheque, por exemplo ejemplo "pago vinculado"

Acessar o Acceda al APSDU
Abra a tabela la tabla de cadastro registro de cheques (SEF)  e y filtre os los cheques que serão utilizados no processo(O que será substituído e seu substituto.se utilizarán en el proceso(El que será sustituido y su sustituto).
Observe o conteúdo dos el contenido de los campos tratados no ponto en el punto de entrada. Neste exemplo os campos são En este ejemplo los campos son 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 Acceda al Módulo Financiero y seleccione el cheque que se sustituirá, es decir con el estatus "pago vinculado" , e utilize a opção de substituiry utilice la opción de sustituir.

Preencha os Complete los campos necessáriosnecesarios, utilizando a opção para deixar o antigo la opción para dejar el antiguo cheque a disposição para uma movimentação futuradisposición para un movimiento futuro

Veja que o status Observe que se modificó el estatus de cada cheque foi alterado.

Acessar o Acceda al APSDU e y observe que as informações padrão foram alterada se modificó la información estándar entre os cheques e y que os los campos utilizados no ponto en el punto 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.
Image Removed
Preencha os dados necessários e confirme o processo.
Image Removed
Veja que os status foram alterado entre os también se actualizaron para el nuevo cheque generado.
Acceda al Financiero y realice nuevamente el procedimiento, pero en este seleccione el cheque generado en los pasos anteriores de este proceso.
Image Added
Complete los datos necesarios y confirme el proceso.
Image Added
Observe que se modificaron los estatus entre los 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çãoRegrese al APSDU y observe que los campos tratados en el punto de entrada del cheque sustituido se borraron y la información se grabó en el nuevo cheque generado.
Observación:
Todos los procedimientos deben realizarse primeramente en una base de homologación.

03. TABLAS

SEF -  cadastro registro de cheques


Versión: 12.1.17

...