GET & SPACE()
GET & SPACE()
Amigos, gostaria de saber posso declarar um GET com tamanho igual ao do banco de dados sem usar o s.p.a.c.e(). Obrigado a todos.
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact:
Re: GET & SPACE()
por que não pode usar s.p.a.c.e()??
Re: GET & SPACE()
Euclides » acho que seja para ser automatico.
eu faço assim ex:
If lAppend
Agen->(DbGoBottom())
Agen->(DbSkip())
Endif
cCod_Agen := Agen->Cod_Agen
cNom_Agen := Agen->Nom_Agen
dessa maneira pega os valores automatico
eu faço assim ex:
If lAppend
Agen->(DbGoBottom())
Agen->(DbSkip())
Endif
cCod_Agen := Agen->Cod_Agen
cNom_Agen := Agen->Nom_Agen
dessa maneira pega os valores automatico
FWH2008 | xHarbour | BCC74 | SQLRDD
Re: GET & SPACE()
Pois é...
Perguntei porque eu faço assim... (para não ter que ´andar´ pela base de dados)
If lAppend
cCod_Agen := space(len(Agen->Cod_Agen))
cNom_Agen := space(len(Agen->Nom_Agen))
Endif
Até mais...
Euclides
Perguntei porque eu faço assim... (para não ter que ´andar´ pela base de dados)
If lAppend
cCod_Agen := space(len(Agen->Cod_Agen))
cNom_Agen := space(len(Agen->Nom_Agen))
Endif
Até mais...
Euclides