PMA101CP - Confirmação da composição

Descrição

Ponto de entrada que será chamado na confirmação das opções "Importar Composição" e "Associar Composição". Poderá ser diferenciado o momento da chamada do ponto de entrada através do primeiro parametro passado que será:
AF2 para "Associar Composição"
AF5 para "Importar Composição"

Observações

Exemplos

User Function PMA101CP()
Local cAliasProj:= Paramixb[1]
Local cRecnoPRoj:= Paramixb[2]
Local cRecNoAE1 := Paramixb[3]
Local cQtde := Paramixb[4]
If PARAMIXB[1] == 'AF5
Msginfo ("Importação de Composição")
Else
Msginfo ("Associação de Composição")
Endif
Return

Preview

Veja também

Idioma

Português(Brasil)

Versões

Microsiga_Protheus10 e Microsiga_Protheus11

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

Parâmetros

PARAMIXB[1]: Alias da tabela (AF2 ou AF5)
PARAMIXB[2]: número do registro atualmente posicionado
PARAMIXB[3]: número do registro atualmente posicionado na tabela das composições
PARAMIXB[4]: Quantidade informada

Retorno

Eventos de chamada do Ponto de Entrada

If ExistBlock("PMA101CP")
ExecBlock("PMA101CP",.F.,.F.,{'AF5',AF5->(RecNo()),AE1->(RecNo()),n101Quant })
EndIf;
If ExistBlock("PMA101CP")
ExecBlock("PMA101CP",.F.,.F.,{'AF2',AF2->(RecNo()),AE1->(RecNo()),n101Quant })
EndIf

Variáveis

Local cAliasProj:= Paramixb[1]
Local cRecnoPRoj:= Paramixb[2]
Local cRecNoAE1 := Paramixb[3]
Local cQtde := Paramixb[4]

Programa Fonte

PMSA101.PRX