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.
Relatório baseado em 2(dois) DBF´S
Moderador: Moderadores
Relatório baseado em 2(dois) DBF´S
TK90 / TK95 / APPLE IIe / 286 / 386 / 486 / 586 / AMD Atlhon
" Sem saber que era impossível, foi lá e fez !! "
" Sem saber que era impossível, foi lá e fez !! "
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
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
eduardo@conesnet.com.br
xharbour 1.0.0 + gtwvw + dbfcdx + xdev + sqlib + hwgui (printdos e msgs)
clipper 5.2e + exospace
2 DBF´s
Valeu pela dica Edutek ! O era esse mesmo.
Grato!
Netavin.
Grato!
Netavin.
TK90 / TK95 / APPLE IIe / 286 / 386 / 486 / 586 / AMD Atlhon
" Sem saber que era impossível, foi lá e fez !! "
" Sem saber que era impossível, foi lá e fez !! "

