Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Usuário desconhecido (cassio.dias)

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Usuário desconhecido (cassio.dias)

Gravado em

Chave

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

01. DADOS GERAIS

Produto:

Solucoes_totvs_cross
SolucaoCrossTOTVS Backoffice

Linha de Produto:

Linhas_totvs
LinhaLinha Protheus

Segmento:

Segmentos_totvs
SegmentoBackoffice

Módulo:

Modulos_cross_segmentos
ModulosCrossSegmentosTOTVS Backoffice (Linha Protheus) - Financeiro (SIGAFIN)

Função:F040DESD


02. DESCRIÇÃO

Na geração do desdobramento, o ponto de entrada F040DESD será executado no momento da baixa do registro de origem.

    

Tabelas posicionadas:

No momento da chamada do ponto de entrada será posicionado na tabela.

    • SE1- Contasa Receber .


03. EXEMPLO DE UTILIZAÇÃO

Bloco de código
languagejava
themeMidnight
firstline1
titleF716BLQR
linenumberstrue
#INCLUDE "TOTVS.CH"  #INCLUDE "TOTVS.CH"

/*/{Protheus.doc} User Function F040DESD
    (Execblock executado no baixa do registro que originou o desdobramento)
    @type  Function
    @author Cassio S. Dias
    @since 07/11/2023
    @version 12.1.2310
    @return aRet, array
    @see (F040DESD)
    /*/
User Function F040DESD(aDados)

	aDados :={'000001', '01', 'FIN','000000004','','BOL'}

	dbSelectArea("SE1")
	dbSetOrder(2) //INDICE[2] -> E1_FILIAL+E1_CLIENTE+E1_LOJA+E1_PREFIXO+E1_NUM+E1_PARCELA+E1_TIPO
	if dbseek(xFilial("SE1")+aDados[1]+aDados[2]+aDados[3]+aDados[4]+aDados[5])
		Reclock("SE1",.F.)
		SE1->E1_HIST  :='NOVO HISTORICO'
		MsUnlock()
	ENDIF
Return





Templatedocumentos