Home

Linha Microsiga Protheus

Páginas filhas
  • PMA101CP - Confirmação da composição

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Wiki Markup
||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