Saludos a los del Foro. Gracias Sr. Chiaravel por su respuesta inmediata, me sirve de mucho el video, y tambien el manual que tienen en su pagina . Bueno ahora que estoy investigando, hice un pequeño algoritmo dentro de una Formula (en Sintaxis Crystal), cuando la compruebo no me bota error, sin embargo, cuando ejecuto el reporte me bota en blanco la formula.

El campo que estoy usando es: Sales_Shipper_ttx.SALES_CARRIER.SHIPPER_INSTRUCT
y contiene los sguientes datos: ABC, BCA, CAB (un ejemplo),
y lo que estoy tratando de hacer es extraer la 2da palabra de este contexto, es decir, "BCA".

Este es el codigo que uso, disculpen si mi codigo es de principiante, como veran estoy tratando de sacarle el jugo a esto desde cero, despues lo perfeccionare , pero por el momento me gustaria que me ayudaran con el problemilla. Gracias.


Local numberVar i;
Local NumberVar LongVariable := Length ({Sales_Shipper_ttx.SALES_CARRIER.SHIPPER_INSTRUCT });
Local numberVar cont:= 0;
Local stringVar sVariable;
Local stringVar sDomicilio;

for i := 1 to LongVariable Do
(
sVariable := Mid({Sales_Shipper_ttx.SALES_CARRIER.SHIPPER_INSTR UCT}, i, 1);
if sVariable = "," then
(
cont := cont + 1;
)
else
(
cont := cont + 0;
);

if cont=2 then
(
EXIT FOR
);

if cont=1 then
(
sDomicilio=sDomicilio + sVariable;
);

);

sDomicilio

__________________
-----------------------
Alejandro Flores R.

Utiliza la función Split:

Dim astrPalabras() As String, strTexto As String

astrPalabras = Split(strTexto, ",")

Lo que hace es devolver un array y en cada posición del array el texto que hay entre coma y coma.

Por tanto para acceder a la segunda palabra solo tendría que acceder a la segunda posición del array.

astrPalabras(1)

Espero que te sirva una saludo.