Relatório baseado em 2(dois) DBF´S

Fórum sobre a linguagem CA-Clipper.

Moderador: Moderadores

Avatar do usuário
Netavin
Usuário Nível 3
Usuário Nível 3
Mensagens: 306
Registrado em: 28 Fev 2007 08:37
Localização: Cacoal-RO

Relatório baseado em 2(dois) DBF´S

Mensagem por Netavin »

Saudações a todos!!
Colegas, possuo (imaginariamente) 2 DBF´S: DBF_1 e DBF_2. São produtos em estoque. O primeiro, estoque real, contábilizado; O segundo, estoque paralelo. Como proceder para tirar um rela, sendo a coluna 1, o estoque do DBF_1 e na coluna 2, o estoque do DBF_2 ? Já vi exemplos de relatórios diversos. Mas neste formato não encontrei.

Netavin.
TK90 / TK95 / APPLE IIe / 286 / 386 / 486 / 586 / AMD Atlhon
" Sem saber que era impossível, foi lá e fez !! "
Avatar do usuário
edutek
Usuário Nível 1
Usuário Nível 1
Mensagens: 45
Registrado em: 21 Set 2005 21:16
Localização: Campo Grande-MS

Mensagem por edutek »

Faz um relacionamento entre nas tabelas

use dbf1 alias dbf1
index on nome to x
set orde to x
use dbf2 alias dbf2
index on codigo to y
set order to y
select dbf1
set relation to codigo into dbf2

go top
do while .not. eof()
@ 01,01 SAY DBF1->CODIGO
@ 01,15 SAY DBF1->QTDE
@ 01,30 SAY DBF2->QTDE
SKIP
......
enddo


Grosseiramente seria assim
Eduardo Mendes
eduardo@conesnet.com.br
xharbour 1.0.0 + gtwvw + dbfcdx + xdev + sqlib + hwgui (printdos e msgs)
clipper 5.2e + exospace
Avatar do usuário
Netavin
Usuário Nível 3
Usuário Nível 3
Mensagens: 306
Registrado em: 28 Fev 2007 08:37
Localização: Cacoal-RO

Mensagem por Netavin »

Obrigado "Edu" !!
... mãos a obra então. Te reporto sobre os resultados.

[]´s

Netavin
TK90 / TK95 / APPLE IIe / 286 / 386 / 486 / 586 / AMD Atlhon
" Sem saber que era impossível, foi lá e fez !! "
Avatar do usuário
Netavin
Usuário Nível 3
Usuário Nível 3
Mensagens: 306
Registrado em: 28 Fev 2007 08:37
Localização: Cacoal-RO

2 DBF´s

Mensagem por Netavin »

Valeu pela dica Edutek ! O era esse mesmo.
Grato!

Netavin.
TK90 / TK95 / APPLE IIe / 286 / 386 / 486 / 586 / AMD Atlhon
" Sem saber que era impossível, foi lá e fez !! "
Responder