From: ReGReT 
Subject: Re: AYUDA
Date: 1997/12/06
Message-ID: #1/1
References: 
To: "C.Jorge" 
Organization: Unisource Espana NEWS SERVER
Newsgroups: fido.clipper


This is a multi-part message in MIME format.
--------------C5679EA7A81F33CE89839D65
Content-Type: text/plain; charset=iso-8859-1
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
Content-Transfer-Encoding: 8bit

C.Jorge wrote:

> Hola: estoy haciendo un peque�o programa en Dbase/Clipper5 y me ha
> surgido
> un problema que no he podido resolver:
>     Necesito transportar (REPLACE) desde un campo FECHA DD/MM/AA a un
> campo
> de caracteres de longitud 2. Solo quiero transportar, a este �ltimo
> campo,
> el MES (MM). Alguien conoce la forma de hacerlo y podr�a indic�rmelo ?
>
> GRACIAS MIL.
>     Mi e-mail:  faycan@dragonet.es


Hola.

Supongamos que el campo de caracteres de longitud  2 se llama MES
y la fecha la sacamos de date()

el codigo seria as�

local fecha:=date()
replace mes with transform(alltrim(str(month(fecha))),"99")

Ya me diras que tal....

                        Un saludo


--------------C5679EA7A81F33CE89839D65
Content-Type: text/x-vcard; charset=us-ascii; name="vcard.vcf"
Content-Transfer-Encoding: 7bit
Content-Description: Card for ReGReT
Content-Disposition: attachment; filename="vcard.vcf"

begin:          vcard
fn:             ReGReT
n:              ;ReGReT
email;internet: greenpixel@hotmail.com
note:           http:\\www.geocities.com\Hollywood\Academy\4144\
x-mozilla-cpt:  ;0
x-mozilla-html: TRUE
end:            vcard


--------------C5679EA7A81F33CE89839D65--