Árvore de páginas

Versões comparadas

Chave

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

...

Bloco de código
languagesql
themeEclipse
linenumberstrue
Exemplo:
#include "Protheus.ch"
User Function NGSEPARASC( ) 

    Local aCampo := PARAMIXB[1] //Resgata o array passado como parâmetro.
    Local nX := 0

    For nX := 1 to Len(aCampo)
        MsgInfo( "Número da Solicitação de Compra: "+aCampo[nX][1]+" Produto: "+aCampo[nX][3] )
    Next nX
    
Return Nil