Histórico da Página

Preview
Descrição	EICFI400 - Financeiro Importação
Observações	Utilizado durante a rotina de manutenção do Financeiro do Easy Import Control.
Exemplos	User Function EICFI400() Local cParam := If(Type("ParamIxb") = "A",ParamIxb[1],If(Type("ParamIxb") = "C",ParamIxb,"")) If cParam == "FI400EDIT_ATIT" MsgInfo("Entrou no ponto de entrada:'FI400EDIT_ATIT'.") EndIf // Mostra uma mensagem das despesas baixadas IF ParamIXB[1] == "FI400_POS_BAIXA_PA_OK" cMsg := "Despesas baixadas: " + line aDespesas := ParamIXB[2] For i := 1 To Len(aDespesas) SWD→(dbGoTo(aDespesas[i])) cMsg += SWD->WD_HAWB + " - " + SWD->WD_DESPESA + line Next MsgInfo(cMsg) EndIf // Mostra uma mensagem das despesas estornadas IF ParamIXB[1] == "FI400_ESTORNO_BAIXA_PA" cMsg := "Despesas estornadas: " + line aDespesas := ParamIXB[2] For i := 1 To Len(aDespesas) SWD->(dbGoTo(aDespesas[i][1])) cMsg += SWD->WD_HAWB + " - " + SWD->WD_DESPESA + " - " + aDespesas[i][2] + " - " + cValToChar(aDespesas[i][3]) + line Next MsgInfo(cMsg) EndIf Return Nil
Veja também

Updates

Idioma	Português(Brasil)
Versões	12.1.7
Sistemas Operacionais Suportados	Windows
Compatível com as Bases de Dados	Topconnect

Parâmetros

	Nome

			Tipo

		Descrição

			Default

		Obrigatório

		Referência

FI400EDIT_ATIT

Carácter

Objetivo deste ponto de entrada é permitir a customização do Array aTit que envia as informações para a tabela SE2 de títulos a pagar no módulo Financeiro(SIGAFIN).

Retorno

()

Eventos de chamada do Ponto de Entrada

Variáveis

	Nome

			Tipo

			Escopo

		Pode Alterar

		Descrição


	aTit

Array of Record

Privado

Sim

Utilizar conforme o exemplo: AADD(aTit,{"E2_ORIGEM" ,SE2->E2_ORIGEM ,NIL})

Programa Fonte

EICFI400.PRW

Árvore de páginas

Versões comparadas

Versão antiga 3

Nova versão 4

Chave