Agregar ceros a la derecha de un campo?

Post Reply
User avatar
leandro
Posts: 958
Joined: Wed Oct 26, 2005 2:49 pm
Location: Colombia
Contact:

Agregar ceros a la derecha de un campo?

Post by leandro »

amigos del foro, necesitando de nuevo su ayuda.

Lo que necesito es lo siguiente:

tengo un campo de la base da datos definido como caracter 15 con x registros

Ejemplo:

35356 <-contenido del campo

Necesito que me quede de la siguiente forma:

000000000035356 <-contenido del campo

De antemano gracias por su ayuda.
Saludos
LEANDRO ALFONSO
SISTEMAS LYMA - BASE
Bogotá (Colombia)
[ FWH 19.09 ] [ xHarbour 1.2.3 Intl. (SimpLex) (Build 20190613) ] [ Embarcadero C++ 7.30 for Win32 ]
User avatar
Armando
Posts: 2479
Joined: Fri Oct 07, 2005 8:20 pm
Location: Toluca, México
Contact:

Post by Armando »

Leandro:

Aunque hay confusión entre lo que dice el encabezado de tu mensaje y el ejemplo que muestras, asumo que el ejemplo es lo que quieres:

Intenta con:

nValor := cCampoDelRegistro
cValor := STRZERO(nValor,15)

Saludos, Armando
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
User avatar
leandro
Posts: 958
Joined: Wed Oct 26, 2005 2:49 pm
Location: Colombia
Contact:

si tienes razon

Post by leandro »

:D

Armando tienes razon es a la izquierda del campo, que pena por la confución, pero a buen entededor...... Y muchas gracias por tu ayuda anteriormente habia usado esta función pero no me acordaba cual era. Un abrazo.
Saludos
LEANDRO ALFONSO
SISTEMAS LYMA - BASE
Bogotá (Colombia)
[ FWH 19.09 ] [ xHarbour 1.2.3 Intl. (SimpLex) (Build 20190613) ] [ Embarcadero C++ 7.30 for Win32 ]
User avatar
MauroArevalo
Posts: 98
Joined: Thu Jan 19, 2006 11:47 pm
Location: Bogota DC. Colombia
Contact:

Post by MauroArevalo »

Leandro:
Un pequeño detalle en la respuesta que te da Armando:

si es un campo caracter tienes que convertirlo primero a un campo numerico y posteriormente aplicas el strzero

micampo:="12345 "

nVar:=STRZERO(VAL(micampo),15)

Saludos

Mauricio Arevalo
SISTEMAS HYM PLUS
Bogota DC. (Colombia)
User avatar
leandro
Posts: 958
Joined: Wed Oct 26, 2005 2:49 pm
Location: Colombia
Contact:

Gracias por sus respuestas

Post by leandro »

Definitivamente muchas gracias por toda la ayuda prestada. Tendre en cuenta las respuestas.
Saludos
LEANDRO ALFONSO
SISTEMAS LYMA - BASE
Bogotá (Colombia)
[ FWH 19.09 ] [ xHarbour 1.2.3 Intl. (SimpLex) (Build 20190613) ] [ Embarcadero C++ 7.30 for Win32 ]
User avatar
pymsoft
Posts: 383
Joined: Tue Oct 11, 2005 1:01 pm
Location: Savona - Italia
Contact:

Post by pymsoft »

Puedes tambien hacerlo asi:


cValor := PADL( nValor, 15, "0" )


Saludos
Pedro Gonzalez
Post Reply