|
Hola Foreros:
quisiera me pudieran ayudar en esto:
Tengo un Campo alfabético de 13
caracteres LLAMADO wrfc (es un
RFC)
'SPIbbbb115FG5' b=
Espacios
'SPI
' Las Primeras 4 Posisiones es la letra del RFC
000115 despues
el la pocision 5 viene el año de 6 caracteres
'FG'
que en este ejemplo seria 00/01/15 formato
AAMMDD
'5' ,
sin embargo cuando los separo con :
wrfl = %SUBSTR(WRFC:1:4)
wrff = %SUBSTR(WRFC:5:10)
wrfh = %SUBSTR(WRFC:11:2)
wrfd = %SUBSTR(WRFC:13:1)
el Campo de wrff me deja '000115'
el campo es albabetico
pero para enlasar a un archivo que tiene el rfc
separado
tiene
FACRFL char
4
FACRFF
NUMERICO 6
FACRFH char
2
FACRFD char
1
En este archivo esta el facrff
asi bbb115
y el que yo saque del WRFC es '000115'
de tal forma que cuando hago un move del campo
wrff a facrff no me quita los
zeros
ya probe %editw y el %
editc , peno no me los sustituye
como puedo quitarle los zeros de la izquierda
cundo muevo un campo albabetico a un numerico dejandome espacios a la
izquoerda
espero me puedan ayudar saludos y gracias de ante
mano
|
