Versões comparadas

Chave

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

...

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

...

cChAntg := PARAMIXB[1]

...

 // Dados do cheque que será substituido
Local cChNovo := PARAMIXB[2] // Dados do cheque que será gerado 
Local aAreaSEF:= SEF->(GetArea())

DbSelectArea("SEF")
DbSetOrder(4)
DbSeek(cChAntg)

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

...

SEF->(DbCloseArea())

DbSelectArea("SEF")
DbSetOrder(4)
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->(MsUnlock())

...


SEF->(DbCloseArea())

SEF->(RestArea(aAreaSEF))

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.

...