Árvore de páginas

Ponto de Entrada

Descrição:

Ponto de Entrada utilizado para possibilitar customização (Observação do Item) no Ações Relacionadas da rotina Consulta de Pecas por Aplicação.

Localização:

Atualizações\Cad Peças\Aplicação de Peças (OFIOA620)

Eventos:

Static Function FS_NEWBOT(nTp)

Local nRecSB1 := aSB1Apl[oLbSB1Apl:nAt,len(aSB1Apl[oLbSB1Apl:nAt])]

If nTp == 0 // Teclas de Atalho

FS_TECLAS() // Teclas de Atalho

Else

If nRecSB1 > 0

SB1->(DbGoTo(nRecSB1))

If nTp == 1 // Consulta Analitica do Item

OC520Visual("SB1",nRecSB1,2) // Consulta Analitica do Item

ElseIf nTp == 2 // PE - Observacao do Item

ExecBlock("OXC09OBS",.F.,.F.) // PE - Observacao do Item

EndIf

SB1->(DbGoTo(nRecSB1))

EndIf

EndIf

Return()

Programa Fonte:

OFIXC009     

Função:

FS_NEWBOT 

Retorno:

 

 

Exemplo:

 

/*

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

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

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

±±ºPrograma ³ OXC09OBS º Autor ³ MIL º Data ³ 25/07/2016 º±±

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

±±ºDescricao ³ Customizacao no Acoes Relacionadas da Consulta de Pecas º±±

±±º ³ por Aplicacao º±±

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

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

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

*/

User Function OXC09OBS()

MsgAlert("Ponto de Entrada OXC09OBS executado com sucesso!","Atenção")

Return()