Histórico da Página

01.

...

DATOS GENERALES

Rotina Baixa a Pagar Manual

Linha Línea de Produto producto:	Microsiga Protheus®
Segmento:	Serviços Servicios
Módulo:	Financeiro Financiero
Rutina:	FINA080 -	Baja por pagar manual

02.

...

DESCRIPCIÓN

O ponto El punto de entrada SE5FI080 será executado para gravar dados complementares na tabela se ejecutará para grabar datos complementarios en la tabla SE5, FK2 e y FK6.

Ele será executado em dois Este se ejecutará en dos momentos:

Para carregar os dados complementares no registro principal da baixa da tabela SE5 - quando receber como parâmetro o Sub-model cargar los datos complementarios en el registro principal de la baja de la tabla SE5, cuando reciba como parámetro el Submodelo de Id FK2DETAIL
Para carregar os dados complementares nos registros auxiliares da baixa da tabela FK6 - quando receber como parâmetro o Sub-model cargar los datos complementarios en los registros auxiliares de la baja de la tabla FK6, cuando reciba como parámetro el Submodelo de Id FK6DETAIL

ObservaçãoObservación: o ponto el punto de entrada SE5FI080 pode ser utilizado em conjunto com os pontos de entradas citados abaixo, em Demais Informaçõespuede utilizarse en conjunto con los puntos de entradas citados a continuación, en Otras informaciones.

03.

...

PARÁMETROS

NomeDescriçãoCaracter adicionar dados complementares no registro da tabela Sub-model para adicionar dados complementares no registro da tabela FK2 ou FK6 (conforme o ponto de execução

Nombre	Tipo	Descripción
ParamIXB[1]	Carácter	String para	incluir datos complementarios en el registro de la tabla SE5.
ParamIXB[2]	Objeto	Submodelo para incluir datos complementarios en el registro de la tabla FK2 o FK6 (de acuerdo con el punto de ejecución).

04.

...

DEVOLUCIÓN

DescriçãoCaracter contendo os valores a serem gravados na tabela

Tipo	Descripción
Carácter	String	con los valores que se grabarán en la tabla SE5.

05.

...

EJEMPLO DE

...

UTILIZACIÓN

Bloco de código

theme	Midnight
title	SE5FI080

#INCLUDE "TOTVS.CH"

User Function SE5FI080() as character

Local cCamposE5 := ParamIxb[1] as character
Local oSubModel := ParamIxb[2] as object

//------------------------------------------------------------------------
//-- GravaçãoGrabación dodel registro principal dade la baixabaja (SE5 ey FK2)
If oSubModel:cID == "FK2DETAIL" 
    If "NOR" $ oSubModel:GetValue("FK2_MOTBX") 
        //-- SE5
        cCamposE5 += ",{" 
        cCamposE5 += " 'E5_CUSTOM','Campo customizadopersonalizado.' " 
        cCamposE5 += "} " 

        //--FK2
        oSubModel:SetValue("FK2_CUSTOM","Campo customizadopersonalizado.")
    EndIf 
EndIf

//------------------------------------------------------------------------
//-- GravaçãoGrabación de doslos valores acessóriosaccesorios (FK6)
If oSubModel:cID == "FK6DETAIL" 
    oSubModel:SetValue("FK6_CUSTOM","Campo customizadopersonalizado.")
EndIf

Return cCamposE5