PC Toledo

Enviado: **04 Jul 2013 08:48**

Olá pessoal, bom dia!

Estou querendo fazer algo parecido com o que está abaixo mas está dando erro... em primeiro lugar, será que é mesmo possível?

Código: Selecionar todos


	  a_Temp :=  { {'Nome','Text_2','nome'}, ;
					{'E_Categ','CB_Categ','categoria'}, ;
					{'E_Model','CB_Model','modelo'}, ;
					{'E_Setor','CB_Setor','setor'}, ;
					{'E_Fabric','CB_Fabric','fabricante'}, ;
					{'E_Local','CB_Local','local'}, ; . . . . 

		If BloqueiaRegistroNaRede("MOV")
			FOR h = 1 to 21
				tVar1 := a_Temp[h,1]
				tVar2 := a_Temp[h,2]
				tVar3 := a_Temp[h,3]
				IF LEN(ALLTRIM(EQP->&(tvar1))) <> LEN(ALLTRIM(Main.&(tvar2).DisplayValue))
					cLinha := "-" + DTOC(DATE()) + ";" + TIME() + " [" + PADR(ALLTRIM(cUser),12) + ;
						  	"] {" + PADL(ALLTRIM( &(tvar3)) ) + "}",11) + ":" + ;
							PADL(ALLTRIM(EQP->&(tvar1)),30) + " -> "	+ PADR(ALLTRIM(Main.&(tvar2).DisplayValue),30) + " ; " + IK_CRLF

Sei que dá pra fazer com o DisplayValue pq já fiz antes e funcionou mas com o EQP ->

?

Please help me!!!

Enviado: **04 Jul 2013 18:37**

Não entendi o que está querendo fazer, e muito menos o que faz .DisplayValue em fonte Clipper.

Enviado: **04 Jul 2013 20:26**

Usei macro direto, é bastante útil, mas to meio enferrujado nisso e, além do mais, to com meu HD em recuperação, vamos ver se acerto de memória.

Se não estou enganado, vc tem que primeiro construir o string inteiro e depois aplicar a macro. Exemplo:

Código: Selecionar todos

escolha=15
var="eqp->c"+strzero(escolha,3)
?var -> eqp->c015 (string)
var2=&var
?var2 -> vai trazer o conteúdo do campo C015 do DBF de alias EQP

Enviado: **09 Jul 2013 16:54**

SRs., boa tarde!

José Quintas, .DisplayValue de fato não é Clipper mas Minigui. Postei aqui por julgar que a dúvida em si era de Clipper.

Eolo, era exatamente isso, cara. Mil Obrigados. Depois de testar, funcionou perfeitamente.

Grato!!!

PC Toledo

Ajuda - acesso "genérico" ao DBF

Ajuda - acesso "genérico" ao DBF

Ajuda - acesso "genérico" ao DBF

Ajuda - acesso "genérico" ao DBF

Ajuda - acesso "genérico" ao DBF