Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Vanilda Moggio Machado

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Vanilda Moggio Machado

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Bloco de código
  
USER FUNCTION AG900SAF()

Local oModelNPN:= PARAMIXB[1]
Local nLInha   := PARAMIXB[2]
Local lRet     := .FT.

IF    nLInha> 0 .and. ( oModelNPN:GetDataId() > 0  .And. ! fWfldGet('NPN_QUANT') = 0 .And. ! oModelNPN:IsUpdated() )    
     lContinualRet := .TF.
Else 
    Help(,, "Aviso",,"Não foi encontrado Lote para este produto na safra!" , 1, 0 )    
EndIF
  
Return lRet