Cobol - Leer archivo de texto

Buen dia a todo el foro:
Estoy leyendo un archivo de texto, el cual en uno de los campos me trae importe de la siguiente manera "1495.30". El punto decimal me viene incorporado dentro del campo.

Bien. Ahora el tema es que yo quiero dejarlo en un campo definido 9(06)v99 y no encuentro
la forma de acomodar el punto decimal.

Estoy un poco perdido y agradecería cualquier ayuda.

Saludos.
Miguel Santillan
Pergamino (Bs.As) Argentina

Tienes que meter el "1495.30" en una estructura asi:
01 cifra.
02 entero pic 9(6).
02 punto pic x.
02 decimal pic 99.
Asi tienes separadas las 3 partes de la cifra y la igualas a:
01 definitiva.
02 entero2 pic 9(6).
02 decimal2 pic 99.
77 NUMERO PIC 9(6)V99.

Haces:
Mueves to número "1495.30" to CIFRA.
MOVE ENTERO TO ENTERO2
MOVE DECIMAL TO DECIMAL2.
MOVE DEFINITIVA TO NUMERO.
Espero que lo hayas entendido en caso contrario preguntame en mi página, [email protected]

Un saludo desde Gijón, Asturias(España) Alberto.

Define el campo de lectura como de edición:
CAMPO PIC ZZZZ.ZZ
y luego simplemente muévelo sobre el NUMERO PIC 9(6)V99. Esto con RMCOBOL funciona perfectamente. Ojo con el DECIMAL POINT IS COMMA.