Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Migration of unmigrated content due to installation of a new plugin

FA60SIT2

Descrição:

Ponto de entrada criado para completar a gravação da SE5 gerada do estorno da cobrança descontada( E5_TIPODOC =  "E2" ). 
No momento da sua chamada está posicionado na SE5 de estorno.

Localização:

Atualizações > Contas a Receber

Eventos:

Transferências

Programa Fonte:

FINA060

Função:

FA060Trans - Transferir

Retorno:

 Nulo 

 

Exemplo:

#Include 'Protheus.ch'

User Function FA60SIT2() 

//não recebe parâmetros

//Já está posicionado no registro da SE5 de estorno da cobrança descontada e no título (SE1).

If SE5->E5_TIPODOC ==   "E2"

   //realiza complemento da gravação na SE5

   Reclock("SE5", .F.)

   SE5->E5_HISTOR := "Est.Tit. Des. "+ SE1->E1_HIST

   SE5->(MsUnlock())

EndIf

Return