Extraer datos de una cadena de caracteres.

[Maria Claudia Medina]

Buen dia amigos

Tengo la siguiente cadena de caracteres

1-Facturas A
2-Factuas B
12-Nota de Credito A
101-Nota de Debito B

Como hago para estraer de cada una de esas cadenas los caracteres que estas antes y despues del carcater '-'
Como pueden ver ese caracter '-' no tiene una posicion fija.

Se entienden lo que preciso?.
Bueno grupo muchas gracias.
saludos
MC Medina

[Cristian Novoa]

GETWORDNUM

[Zarlu]

Buenas tardes María!

Quizá así:

lcTexto="1-Facturas A"

? Substr(lcTexto,ATC("-",lcTexto)+1)

Suerte

zarlu

Chetumal, Quintana Roo, México

[Irwin Rodriguez]

lcCadena = '101-Nota de Debito B'

?GETWORDNUM(lcCadena, 1, '-')

?GETWORDNUM(lcCadena, 2, '-')

--
Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/62bc70eb-ea0b-47af-a3da-41b661b00c94n%40googlegroups.com.

[Luis Maria Guayan]

TEXT TO lc NOSHOW

1-Facturas A
2-Factuas B
12-Nota de Credito A
101-Nota de Debito B

ENDTEXT

FOR ln=1 TO ALINES(la,lc,1,"-")
  ? la(ln)
ENDFOR


Luis María Guayán
Tucumán, Argentina
_______________________________

Comunidad Visual FoxPro en Español
http://comunidadvfp.blogspot.com

El miércoles, 30 de marzo de 2022 a la(s) 14:18:02 UTC-3, mariacm...@gmail.com escribió:

[Esteban Micossi]

Gracias chicos.

Probe todas las sugerencias y funcionaron perfectamente, con las distintas funciones ALINES(),  GETWORDNUM()
Muy amables.

Les dejo cordiales saludos.

Atte

MC. Medina