DATOS DE CURSOR - INSERTAR EN CAMPO MEMO

142 views
Skip to first unread message

Anderson Narbaja

unread,
Jun 18, 2014, 11:07:45 AM6/18/14
to publice...@googlegroups.com
Buenos dias grupo,

una consulta, la cual me tiene dando dolores de cabeza, tengo un cursor de n lineas las cuales quiero insertarlas en un campo memo,no se si me explico bien, pero aqui les pongo un ejemplo.

Cursor:

linea 1: JOSE VILCA / SUPERVISOR
linea 2: DARREN PAUCAR / ASISTENTE
linea 3: JOSE COAQUIRA / JEFE

y necesito que el campo memo se llene de la siguiente manera

JIOSE VILCA / SUPERVISOR
DARREN PAUCAR / ASISTENTE
JOSE COAQUIRA / JEFE

Si alguien tiene alguna idea estare agradecido,

Saludos,

Anderson.

Fidel Charny

unread,
Jun 18, 2014, 11:15:12 AM6/18/14
to publice...@googlegroups.com
Anderson
Si con líneas te refieres a registros y todos esos valores están en el mismo campo y con Cursor te refieres a un cursor de VFP:
lcToMemo=""
select ElCursor
SCAN
       lcToMemo=lcToMemo + trim(campo)+chr(13)
ENDSCAN
lcToMemo=left(lcToMemo,len(lcTomemo)-1)

SELECT NoSeQueTabla
Replace CampoMemo with lcToMemo

Si el tema no es así, pues comenta.

Anderson Narbaja

unread,
Jun 18, 2014, 11:39:32 AM6/18/14
to publice...@googlegroups.com
Estimado Fidel,

gracias por la ayuda, me explico mejor tengo un cursor que eh creado a partir de una tabla el cual tiene 03 campos, y "n" registros; yo eh intentado realizarle un scan, paro no se como insertarlos en el campo memo de la tabla, este es el cursor que necesito inserta ren el campo memo

select x.docu,allt(lookup(o110.apater,x.traba,o110.codigo))+" "+allt(lookup(o110.amater,x.traba,o110.codigo))+" "+allt(lookup(o110.nombre,x.traba,o110.codigo)) as nombre,;
  x.tracto,x.plataforma from x into cursor wk

Gracias,

Anderson


El 18 de junio de 2014, 10:26, Anderson Narbaja <anderson...@gmail.com> escribió:
Estimado Fidel,

gracias por la ayuda, me explico mejor tengo un cursor que eh creado a partir de una tabla el cual tiene 03 campos, y "n" registros; yo eh intentado realizarle un scan, paro no se como insertarlos en el campo memo de la tabla, este es el cursor que necesito inserta ren el campo memo

select x.docu,allt(lookup(o110.apater,x.traba,o110.codigo))+" "+allt(lookup(o110.amater,x.traba,o110.codigo))+" "+allt(lookup(o110.nombre,x.traba,o110.codigo)) as nombre,;
  x.tracto,x.plataforma from x into cursor wk

Gracias,

Irwin Rodriguez

unread,
Jun 18, 2014, 11:46:10 AM6/18/14
to publice...@googlegroups.com
Hola Anderson,

El ejemplo que te respondió el colega Fidel esta muy bueno y creo que cumple con lo que requieres.

Saludos!
--
Ing. Irwin Rodríguez
 
Consultor Informático
 
"Tu pensamiento puede hacer que el universo trabaje para proveerte lo que deseas, pero tus acciones deben ser tales para que recibas justamente lo que mereces. No vas a recibir lo que deseas de caridad ni te llegará sin hacer nada."

NOTA: La información mostrada en este mensaje es de caracter Confidencial y está dirigida unicamente a los contactos señalados en el encabezado; si el lector de este correo no es el destinatario del mismo, se le notifica que cualquier copia o distribución queda totalmente prohibida. Si usted ha recibido este mensaje por error, por favor notifique inmediatamente al remitente por este mismo medio y bórrelo de su sistema.

Anderson Narbaja

unread,
Jun 18, 2014, 12:31:30 PM6/18/14
to publice...@googlegroups.com
Estimados,

muchas gracias, me sirvio el codigo, 

Saludos,

Anderson
Reply all
Reply to author
Forward
0 new messages