Árvore de páginas

Versões comparadas

Chave

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

...

Bloco de código
languagepy
themeEclipse
firstline1
titleExemplo de Utilização
linenumberstrue
User function NFEEXCEL()

Local cParamixbcParam := iif( type("paramixb") == "A" .and. len(paramixb) > 0 , paramixb[1] , paramixb )

	Do case
		Case cParamIXB == "EXPDADOS"
			MsgInfo("Entrou no ponto de entrada 'EXPDADOS'.")
			
		Case cParamIXB == "DADOSXLS"
			AAdd(aAltDadosXLS , { "W2_CONAPRO","SW2" , "TESTE DADOSXLS" })
	
		Case cParamIXB == "SET_ESTRUTURA"
			 aAdd(aEstru,{"NOVO_CAMPO","C",30,0})
		
		Case cParamIXB == "IMPDADOS_WORK"
			MsgInfo("Entrou no ponto de entrada 'IMPDADOS_WORK'.")
		
		Case cParamIXB == "TELA_RETORNO"
    		aAdd(aCampos,{"NOVO_CAMPO" ,"","Meu Campo Novo","" })
		
		Case cParamIXB == "SET_ESTRUTURA_MACRO"
		   //A estrura criada terá os sequinte forma
		   //Nome do campo + tipo + tamanho
		   //Tipo: Char ou Decimal
		   //Tamanho se tipo Char (x) se Decimal (x,x)
		   //Ex. WK_NOME Char(30), WK_DEC DECIMAL (10,2)
			cStru += "WK_COD_I Char(20),WK_QTDE Decimal(13,3)"
		
		Case cParamIXB == "IMPDADOS_BASE"
			MsgInfo ("Entrou no ponto de entrada 'IMPDADOS_BASE'.")

	End Case

Return

...