Arquivo

Textos com Etiquetas ‘CommaIO’

Importação e Exportação utilizando a classe CommaIO (Parte 2)

2, novembro, 2009 Sem comentários

Fala pessoal…
Continuando o útlimo post (Importação e Exportação utilizando a classe CommaIO (Parte 1)) , irei postar hoje como importar um arquivo utilizando a classe CommaIO.

Vamos lá…
O arquivo que vocês exportaram utilizando as dicas do último post, com o código abaixo vocês irão importar esse arquivo.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53

//Inicio <DynamicsAxBR>
static void commaIoRead(Args _args)
{
    #File
 
    Dialog               dialog = new Dialog("Importar");
    DialogField         dialogFieldCaminho;
 
    CommaIo           commaIo;
    FileIoPermission  fileIoPermission;
 
    Container           filtro = ["txt", #AllFilesName+#txt], readCon;
    TimesFutebol      timesFutebol; //Table Buffer
    ;
 
    dialog.filenameLookupFilter(filtro);
    dialogFieldCaminho = dialog.addField(TypeId(FileNameOpen), "Selecione o arquivo");
 
    if(dialog.run())
    {
        fileIoPermission = new fileIoPermission(dialogFieldCaminho.value(), #io_read);
        fileIoPermission.assert();
 
        commaIo = new CommaIo(dialogFieldCaminho.value(), #io_read);
        commaIo.inFieldDelimiter(";");
 
        if(commaIo)
        {
            try
            {
                while(commaIo.status() == IO_Status::Ok)
                {
                    readCon = commaIo.read();
                    if(conlen(readCon) > 0)
                    {
                        ttsbegin;
                        timesFutebol.IdTime = conpeek(readCon, 1);
                        timesFutebol.NomeTime = conpeek(readCon,2);
 
                        timesFutebol.insert();
                        ttscommit;
                    }
                }
                info("Arquivo importado com sucesso!");
            }
            catch(Exception::Error)
            {
                throw error("Erro ao importar o arquivo!");
            }
        }
    }
}
//Fim <DynamicsAxBR>

Bom galera era isso, se restou alguma dúvida que eu não expliquei, por favor comentem que irei tentar responder para vocês.

Abraço e até a próximaaa !

Categories: X++ Tags: , , ,

Importação e Exportação utilizando a classe CommaIO (Parte 1)

31, outubro, 2009 1 comentário

Fala pessoal…
Hoje e amanhã irei falar de uma classe muito interessante que o AX nos oferece, a classe “CommaIO”, com ela é possível que você escreva em arquivos que estão fora do AX, por exemplo arquivos do word, txt entre outros.
Hoje irei colocar um exemplo de exportação utilizando a classe “CommaIO”, e amanhã irei colocar o exemplo de importação continuando o exemplo, vamos lá…

Primeiramente eu criei uma tabela com 2 campos, e populei essa tabela veja:

Tabela de exemplo CommaIO

Tabela de exemplo CommaIO

commaIO Tabela populada

Agora vamos criar o job que exporta os dados da tabela para um arquivo “.txt”, separando os arquivos com “;”:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46

//Inicio <DynamicsAxBR>
static void commaIoWrite(Args _args)
{
    #File
 
    Dialog               dialog = new Dialog("Exportar");
    DialogField         dialogFieldCaminho;
 
    CommaIo             commaIo;
    FileIoPermission    fileIoPermission;
 
    Container             filtro = ["txt", #AllFilesName+#txt], readCon;
    TimesFutebol        timesFutebol; //Table Buffer
    ;
 
    dialog.filenameLookupFileName('arquivo');
    dialog.filenameLookupFilter(filtro);
    dialogFieldCaminho = dialog.addField(TypeId(FileNameSave), "Salvar como");
 
    if(dialog.run())
    {
        fileIoPermission = new fileIoPermission(dialogFieldCaminho.value(), #io_write);
        fileIoPermission.assert();
 
        commaIo = new CommaIo(dialogFieldCaminho.value(), #io_write);
        commaIo.outFieldDelimiter(';');
 
        if(commaIo)
        {
            try
            {
                while select timesFutebol
                {
                    readCon = [timesFutebol.IdTime, timesFutebol.NomeTime];
                    commaIo.writeExp(readCon);
                }
                info("Arquivo criado com sucesso!");
            }
            catch(Exception::Error)
            {
                throw error("Erro ao exportar o arquivo!");
            }
        }
    }
}
//Fim <DynamicsAxBR>

Nesse job você seleciona o local do arquivo para onde ele será exportado, qualquer dúvida comentem !!

PS: Amanhã, irei colocar o exemplo de importação…AGUARDEM!!

Abraços.

Categories: X++ Tags: , , ,