Fabian:
Suponiendo que tenes un get y un say desde recursos:
Redefine Get oProveedor var cProveedor ID 102 of oDlg PICTURE "99";
VALID VALPROVE(@cProveedor, @cNProveedor,oProveedor,oNProveedor)
WHEN wnro_niv # 2 UPDATE
Redefine SAY oNProveedor PROMPT " "+cNProveedor ID 103 of oDlg FONT oFnt1
COLORS CLR_BLACK,CLR_WHITE
oProveedor:bKeyDown :={|nk| TeclasGAm(oDlg,nK,@cProveedor,oProveedor)}
FUNCTION ValProve(c,cNom,oProveedor,oNProveedor)
Local SEL_FIELD1 := { { || PROVEEDO->DES },;
{ || PROVEEDO->COD } },;
SEL_ENC1 := { oemtoansi("Descripci¢n"),;
oemtoansi("C¢digo") }
Local AREA_ACT:=SELECT()
Local Ret:=.F.,Ord_Ant
cSearch:=""
SELECT PROVEEDO
ORD_ANT:=INDEXORD()
DBSETORDER(1)
IF ! PROVEEDO->(DBSEEK(PADL(c,2,"0"),.F.))
PROVEEDO->(DBSEEK(PADL(c,2,"0"),.T.))
SELEAGREGA("PROVEEDO",239,129,.T.,SEL_FIELD1,SEL_ENC1,2,oemtoansi("Seleccion
e Proveedor..."))
ELSE
RET:=.T.
ENDIF
c:=VAL(PROVEEDO->COD)
cNom:=PROVEEDO->DES
PROVEEDO->(DBSETORDER(ORD_ANT))
SELECT(AREA_ACT)
oNProveedor:Refresh()
return RET
Saludos,
Daniel Puente
Mar del Plata, Argentina
puenteda@...
----- Original Message -----
From: "fabian zamorano" <fabalzamol@...>
To: <DesarrolloClipper@...>
Sent: Wednesday, March 16, 2005 1:55 PM
Subject: [CA-Clipper] ayuda...con los say en fivewin
>
> hola..estoy desarrollando un programa en fivewin...y deseo que me
ayuden..si
> pueden...lo que pasa es que no puedo mostrar una informacion...me explico:
>
> yo quiero que cuando ingrese un dato me muestre otro asociado..ejemplo:
>
> codigo nombre valor
> 123(ingreso) alguna cosa(muestra) $ 2.000(ingreso)
>
>
> el codigo y el nombre se encuentran en una base de datos, si yo ingreso el
> codigo ¿como muestro el nombre?
>
> tengo todos los say declarados
>
> eso no mas..gracias...
>
>
>
>
> ------------------------------
> DesarrolloClipper:
> Desarrollo de Software en CA-Clipper
> ------------------------------
> Direcciones de la lista:
> Publicar un mensaje: DesarrolloClipper@...
> Suscribirse........: DesarrolloClipper-Subscribe@...
> Desuscribirse......: DesarrolloClipper-Unsubscribe@...
> Administrador......: DesarrolloClipper-Owner@...
> Página de la lista.: http://www.gruposyahoo.com.ar/group/DesarrolloClipper
> ------------------------------
> http://www.navegana.com/dinero/chanzes.html
> Enlaces de Yahoo! Grupos
>
>
>
>
>
>
>
>