PALABRAS COMUNES DE DOS CAMPOS

Colt, que extraños son tus pedidos ¿son necesidades de tu aplicacion o
trabajos practicos de la escuela/universidad?

Aqui va una forma de como hacerlo:

SELECT MiTabla
SCAN ALL
CREATE CURSOR Masc (NomMasc C(30))
ln = ALINES(la, ALLTRIM(MiTabla.NombresMasc), .T., " ")
FOR lnI = 1 TO ln
INSERT INTO Masc (NomMasc) VALUES (la(lnI))
ENDFOR
CREATE CURSOR Feme (NomFeme C(30))
ln = ALINES(la, ALLTRIM(MiTabla.NombresFem), .T., " ")
FOR lnI = 1 TO ln
INSERT INTO Feme (NomFeme) VALUES (la(lnI))
ENDFOR
SELECT NomMasc FROM Masc ;
WHERE EXISTS ;
(SELECT * FROM Feme ;
WHERE NomMasc = NomFeme) ;
INTO CURSOR MiCursor
SELECT MiCursor
lc = ""
SCAN ALL
lc = lc + ALLTRIM(MiCursor.NomMasc) + " "
ENDSCAN
REPLACE NombresIguales WITH lc IN MiTabla
ENDSCAN

Otra pregunta: ¿En que ciudad y pais vives?

Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos



"colt clint" escribió en el mensaje
news:

HOLA, AMIGOS!

Por favor, si tengo una tabla with 3 campos:

nombresmasc
nombresfem
nombresiguales

Como puede ser rellenado automaticamente el campo NOMBRESIGUALES con las
palabras/nombres comunes entre NOMBRESMASC y NOMBRES FEM?


OBSERVACIÓN: Cada campo tiene muchas palabras/nombres.

Muchas gracias anticipadamente,

Saludos


Colt


PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway