Ver Mensaje Individual
  #7  
Viejo 01/10/10, 05:53:55
fporcel fporcel is offline
Junior Member
 
Fecha de Ingreso: oct 2010
Mensajes: 1
Thumbs up Función devuelve Nombre del Mes

Te mando este ejemplo, creo que es más eficiente y lo puedes convertir fácilmente a cualquier Lenguaje o Base de Datos:
/////////////////////////////////////////////////////////////////////////
//Funtion: f_nom_mes
// Creada originalmente en Clipper y adaptada a Power Builder
//Argumentos:
//ai_num_mes número de mes (0 al 13 con, apertura y cierre)
//ai_lmes longitud de respuesta:
// Cuando es 3 DIC, o cuando es 9 DICIEMBRE
//Returns: String
//Descripción: Retorna el nombre del mes
////////////////////////////////////////////////////////////////////////
String ls_nom_mes, ls_nmeses

If ai_lmes =3 Then
ls_nmeses="APEENEFEBMARABRMAYJUNJULAGOSETOCTNOVDICCIE"
Else
ls_nmeses=" Apertura Enero Febrero Marzo Abril Mayo Junio Julio AgostoSetiembre OctubreNoviembreDiciembre Cierre"
End if
ls_nom_mes=mid(ls_nmeses,ai_num_mes*ai_lmes+1,ai_lmes)

Return ls_nom_mes
Responder Con Cita