Boa noite moçada, estou criando uma rotina para imprimir NFs e necessito de colocar os nomes dos campos do arquivo de NFs num dbedit para que eu possa escolher.
Como fazer isto de uma forma que eu não necessite digita-los um a um.
O motivo pelo qual necessito fazer isto é para escolher o campo e então escolher a linha e coluna onde será impresso o valor deste campo na NF.
Obrigado a todos
Colocar o nome dos campos de um DBF no dbedit
Moderador: Moderadores
Um exemplo
Código: Selecionar todos
use seu_banco_nota
vachoice:= {}
vbanco:= seu_banco_nota->(dbstruct())
Aeval(vbanco,{|afield| AADD(vachoice,aField[1])})
achoice(1,1,10,50,vachoice)
Inkey(0)Daniel
Harbour + Minigui + dbfcdx
Marinas-Gui Pena que parou o suporte
Harbour + Minigui + dbfcdx
Marinas-Gui Pena que parou o suporte
Legal, era isto mesmo que eu queria, só uma coisinha mais.
Como fazer para capturar o nome do campo para um campo de outro arquivo?
Grande abraço
Grande abraço
olhe o ex.
Código: Selecionar todos
use seu_banco_nota
vachoice:= {}
vbanco:= seu_banco_nota->(dbstruct())
Aeval(vbanco,{|afield| AADD(vachoice,aField[1])})
use banco_para_dados
For x:= 1 to len(vachoice)
append blank
replace seu_campo with vachoice[x] //seu_campo tem 10 caracter
next
Inkey(0)Daniel
Harbour + Minigui + dbfcdx
Marinas-Gui Pena que parou o suporte
Harbour + Minigui + dbfcdx
Marinas-Gui Pena que parou o suporte
