Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Migration of unmigrated content due to installation of a new plugin

Ponto de Entrada

Descrição:

Ponto de Entrada na rotina de Transferencia de Peças, executado após a gravação de cada VS3 (3=Inclusão e 4=Alteração)

Localização:

Atualizações / Mov.Peças / Transf. de Peças

Eventos:

...

If lPEOM430GRV

ExecBlock("OM430GRV",.f.,.f.,{ nOpc , aCols[ni] , VS3->(RecNo()) }) // Ponto de Entrada apos a gravação do VS3

EndIf

...

Programa Fonte:

OFIOM430.PRW

Função:

FS_OK()

Parâmetros:
NomeTipoDescrição

nOpc

Numerico

nOpc ( 3=Inclusão / 4=Alteração )

aLinha

Array

linha posicionada na grid de peças (aCols)

nRECVS3

Numerico

RecNo do VS3 referente a peça (VS3)

Retorno:

N/A


Exemplo:

Include totvs.ch

/////////////////////////////////////////////////////////////////////////

// Ponto de Entrada executado apos gravar cada linha da aCols de Peças //

// na tela de Transferência de Peças ( OFIOM430 ) //

/////////////////////////////////////////////////////////////////////////

User Function OM430GRV()


Local nOpc := PARAMIXB[1] // numero, nOpc ( 3=Inclusão / 4=Alteração )

Local aLinha := PARAMIXB[2] // array, linha posicionada na grid de peças (aCols)

Local nRECVS3 := PARAMIXB[3] // numero, RecNo do VS3 referente a peça (VS3)


MsgAlert("Ponto de Entrada 'OM430GRV' executado com sucesso.")

/*

If nOpc == 3 .or. nOpc == 4

VS3->(DBGoTo(nRECVS3))

RecLock("VS3",.f.)

VS3->VS3_TESTE1 := aLinha[FG_POSVAR("VS3_TESTE1")]

VS3->VS3_TESTE2 := aLinha[FG_POSVAR("VS3_TESTE2")]

MsUnLock()

EndIf

*/

Return



OBS: Este Ponto de Entrada se relaciona com os Pontos de Entrada abaixo:

OM430CPO Ponto de Entrada para inserir campos adicionais da tabela Itens do Orçamento (VS3) na montagem da tela de Transferência de Peças (OFIOM430)

OM430COL Ponto de Entrada para manipular o conteúdo da linha da grid (aCols) de Peças na tela de Transferência de Peças (OFIOM430)

OM430EDT Ponto de Entrada executado para liberar campos adicionais para edição na grid de Peças da tela de Transferência de Peças (OFIOM430)