Árvore de páginas

Ponto de Entrada

Descrição:

Este ponto de entrada esta localizado após a gravação do item da SB5, durante o processo de integração do arquivo de preços R&M Scania.

Localização:

Atualizações / Mov Integracao / Atualização dos Dados das Peças SCANIA (OFIIA420)

Eventos:

If ExistBlock("IA420DPG")

ExecBlock("IA420DPG",.f.,.f.,{SB5->B5_FILIAL,SB5->B5_COD,SB5->B5_CODFAB,cLinha})

EndIf

Programa Fonte:

OFIIA420.PRW

Função:

FS_GRAVA()

Parâmetros:
NomeTipoDescrição

cFilial

Caractere

ParamIXB[01] // SB5->B5_FILIAL

cCodItem

Caractere

ParamIXB[02] // SB5->B5_COD

cCodFab

Caractere

ParamIXB[03] // SB5->B5_CODFAB

cLinha

Caractere

ParamIXB[04] // cLinha

Retorno:

Não há.


Exemplo:

Include totvs.ch

/*

ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ

±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±

±±ÉÍÍÍÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍ»±±

±±ºPrograma ³ IA420DPG º Autor ³ MIL º Data ³ 12/01/23 º±±

±±ÌÍÍÍÍÍÍÍÍÍÍØÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍ͹±±

±±ºDescricao ³ Este ponto de entrada esta localizado após º±±

±±º a gravação do item da SB5, durante o processo de integração º±±

±±º do arquivo de preços R&M Scania. º±±

±±ÈÍÍÍÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ±±

±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±

ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß

*/

User Function IA420DPG()


Local cFilial := ParamIXB[01] // SB5->B5_FILIAL

Local cCodItem := ParamIXB[02] // SB5->B5_COD

Local cCodFab := ParamIXB[03] // SB5→B5_CODFAB

Local cLinha := ParamIXB[04] // cLinha


MsgInfo("Ponto de Entrada IA420DPG executado com sucesso!","Atenção")


Return