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: |
| |||||||||||||||
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