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

Este Ponto de Entrada será executado na rotina de Agrega/desagrega (VEIXA040) antiga e permite incluir um conteúdo padrão para a janela de inclusão de uma peça.

Atenção: Para a versão nova do Agrega/Desagrega Multieventos, este ponto de entrada esta obsoleto, ou seja, não será executado.

Localização:

Atualizações \ MovAtendimento \ Agrega/desagrega (VEIXA040)

Eventos:

...

Else // Inclusao - Possibilita inserir conteudo ( inicializador / relacao nos campos ) na tela de Item ( SB1 )

If ExistBlock("VXX040RL") // Relacao dos Campos da tela de Item ( SB1 )

aVRelacao := ExecBlock("VXX040RL",.f.,.f.,{ nOperacao , aClone(aVRelacao) })

cGruIte := aVRelacao[1]

cCodIte := aVRelacao[2]

nQtd := aVRelacao[3]

nCus := aVRelacao[4]

EndIf

EndIf

Programa Fonte:

VEIXX040.PRW

Função:

FS_IAEITE()

Parâmetros:
NomeTipoDescrição
cAgrDesCaracter

Operação (1 = Agrega / 2 = Desagrega)

aRetVetor

Vetor que compõe o conteúdo do inicializador / relação dos campos.

Retorno:
NomeTipoDescrição
aRetVetor

Vetor que compõe o conteúdo inicial dos campos na tela.




aRet[1]VetorGrupo do Item
aRet[2]VetorCódigo do Item
aRet[3]VetorQuantidade
aRet[4]VetorCusto (Utilizado somente na Operação de Desagrega)

Exemplo:

Include totvs.ch

/*

VXX040RL - Ponto de Entrada na Tela de Inclusão de Peças do Agrega/Desagrega

Utilizado para trazer o conteudo padrao dos campos na tela


Retorno do Ponto de Entrada:

Array com o conteudo inicializador dos campos -


Obs.: disparado somente na Inclusão de Peças

*/

User Function VXX040RL()

Local cAgrDes := ParamIXB[01] // Operação ( 1 = Agrega / 2 = Desagrega )

Local aRet := ParamIXB[02] // Array com conteudo

/*

aRet[1] = Grupo do Item

aRet[2] = Codigo do Item

aRet[3] = Quantidade

aRet[4] = Custo ( utilizado somente na Operação de Desagrega )

*/

MsgInfo("Ponto de Entrada VXX040RL executado com sucesso!")

Return aRet