FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
Existen en DBASE la funcion IIF? ¿es equivalente IF?
Se puede usar en dbase la funcion IIF? se que existe IF pero no se si se utiliza para lo mismo, existe un modo de hacer lo mismo que el IIF?
un saludo y gracias a todos. |
#2
|
||||
|
||||
Si te refieres al lenguaje Xbase si existe y no es lo mismo que If.
Código:
FUNCTION PUSHDN(nRowini,cMsge,cColorbox,cColormsge) LOCAL nColini,nRowfin,nColfin,cScreen,I,nOldCursor,lRetorno:=.F.,nTecla LOCAL nMitad:=MAXCOL()/2 nOldCursor:=SETCURSOR() SETCURSOR(0) IF cMsge==NIL .OR. VALTYPE(cMsge) # "C" RETURN(nil) END IF nRowini == NIL .OR. nRowini > 22 nRowini:=22 END IF LEN(cMsge)>70 cMsge:=LEFT(cMsge,70) END IF cColorbox == NIL cColorbox:="R" END IF cColormsge == NIL cColormsge:="W/B" END nColini:=nMitad-(LEN(cMsge)/2)-2 nColfin:=nMitad+(LEN(cMsge)/2)+2 nRowfin:=nRowini+2 cScreen:=SAVESCREEN(nRowini,nColini,nRowfin,nColfin) BOXCONV(nRowini,nColini,nRowfin,nColfin,cColorbox) @ nRowini+1,nColini+2 SAY cMsge COLOR cColormsge WHILE nTecla # K_ENTER .AND. nTecla # K_ESC nTecla:=INKEY(0) END IIF (nTecla == K_ENTER, lRetorno:=.T.,lRetorno:=.F.) BOXCONC(nRowini,nColini,nRowfin,nColfin,cColorbox) @ nRowini+1,nColini+2 SAY cMsge COLOR cColormsge LOWERROR() BOXCONV(nRowini,nColini,nRowfin,nColfin,cColorbox) @ nRowini+1,nColini+2 SAY cMsge COLOR cColormsge FOR i:=1 TO 10000 NEXT RESTSCREEN(nRowini,nColini,nRowfin,nColfin,cScreen) SETCURSOR(nOldCursor) RETURN(lRetorno) Un Saludo.
__________________
Guía de Estilo de los Foros Cita:
|
#3
|
||||
|
||||
es solo DBASE :(
no hay una manera de emularla?
gracias. |
#4
|
||||
|
||||
stoy hablando de sql
es una sentencia de SQL lo que quiero construir.
un saludo. |
#5
|
||||
|
||||
Dbase III , Dbase IV?
Un Saludo.
__________________
Guía de Estilo de los Foros Cita:
|
#6
|
||||
|
||||
Entonces ólvidate de lo dicho, lo que hay que saber es si te concectas con el BDE, o con qué.
Un Saludo.
__________________
Guía de Estilo de los Foros Cita:
|
#7
|
||||
|
||||
es desde el database desktop, sera el BDE
un saludo.
|
#8
|
||||
|
||||
Sí estas utilizando entonces el BDE y no soporta esa instrucción.
Un Saludo.
__________________
Guía de Estilo de los Foros Cita:
|
|
|
|