Histórico da Página
...
Bloco de código | ||||||||||
---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
User function NFEEXCEL()
Local xRet := nil
Local cParam := iif( type("paramixb") == "A" .and. len(paramixb) > 0 , paramixb[1] , paramixb )
Do case
Case cParam == "EXPDADOS"
MsgInfo("Entrou no ponto de entrada 'EXPDADOS'.")
Case cParam == "DADOSXLS"
AAdd(aAltDadosXLS , { "W2_CONAPRO","SW2" , "TESTE DADOSXLS" })
Case cParam == "SET_ESTRUTURA"
aAdd(aEstru,{"NOVO_CAMPO","C",30,0})
Case cParam == "IMPDADOS_WORK"
MsgInfo("Entrou no ponto de entrada 'IMPDADOS_WORK'.")
Case cParam == "TELA_RETORNO"
aAdd(aCampos,{"NOVO_CAMPO" ,"","Meu Campo Novo","" })
Case cParam == "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 cParam == "IMPDADOS_BASE"
MsgInfo ("Entrou no ponto de entrada 'IMPDADOS_BASE'.")
Case cParam == "EXP_DADOS_DUIMP"
// a posição 2 do paramixb são os campos padrões que serão exportados.
// Deverá retornar um vetor da seguindo estrutura:
// { 1 - Campo da tabela ,
// 2 - Se será editável ("true" - editável / "false" - não editável) ,
// 3 - Cor da coluna em hexadecimal sem a # }
xRet := aClone(paramixb[2])
aAdd( xRet, { "W6_DT_EMB", "false", "3065ee" })
End Case
Return xRet |
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas