...
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.
...