Primer dia de cada mes en SQLite

HMG en Español

Moderator: Rathinagiri

Post Reply
jorge.posadas
Posts: 172
Joined: Mon May 19, 2014 7:43 pm
DBs Used: DBF, SQLite, MS-SQL, ACCESS, MariaDB (en proceso)
Location: Morelia, Mich. México
Contact:

Primer dia de cada mes en SQLite

Post by jorge.posadas »

Grupo,

Estoy trabajando con SQLite y se me ha presentado un problema:

1- Tengo una tabla que su estructura es PERIOD_ID, INITIAL_DATE, ENDING_DATE
2. Estoy haciendo un DO WHILE para llenar esta tabla con 3 años y deseo que en INITIAL_DATE me vaya poniendo el primer dia de cada mes
Pero no he encontrado el COMO ir obteniendo el primer dia de cada mes, he encontrado esto :
SELECT date('now','start of month');
pero ese me da el primer dia del mes actual, es decir si estoy en Julio me da el primer dia de Juilio, mi problema es el COMO pued ir obteniendo el primer día de cada mes en mi DO WHILE.

Espero me haya explicado.
De antemano agradezco la ayuda.
Cordialmente

POSADAS SOFTWARE
Jorge Posadas Ch.
Programador independiente
Morelia, Mich.
M é x i c o .
Movil +52 44 3734 1858
SKYPE: jorge.posadasch
Email: posoft@gmx.com
User avatar
koke
Posts: 116
Joined: Wed Aug 21, 2013 3:54 pm
DBs Used: DBF, mySql, mariaDB

Re: Primer dia de cada mes en SQLite

Post by koke »

Hola, si quieres formar la cadena desde hmg puedes usar la siguiente función.

google translate

Hi, if you want to form the string from hmg you can use the following function.

Code: Select all

Function boton()
	Local locmes := 0, locyear := 0, fecha := ""
	locyear := 2015
	Do While .t.
		For i:=1 To 12
			fecha := "'" + AllTrim(Str(locyear)) + "-" + StrZero(i,2) + "-" + "01" + "'"
			If StrZero(i,2) = StrZero(Month(date()),2)
				If locyear = Year(date())
					Return Nil 
				EndIf 
			EndIf 
		Next
		locyear++
	EndDo 
Return Nil
,___,
[O.o]
/)__)
-”–”-
KoKe
jorge.posadas
Posts: 172
Joined: Mon May 19, 2014 7:43 pm
DBs Used: DBF, SQLite, MS-SQL, ACCESS, MariaDB (en proceso)
Location: Morelia, Mich. México
Contact:

Re: Primer dia de cada mes en SQLite

Post by jorge.posadas »

Koke,

Muchas gracias estudiaré esto que me mandaste para ponerlo en mi PRG y ver los resultado

Un saludo desde Tizayuca, Hgo.
Cordialmente

POSADAS SOFTWARE
Jorge Posadas Ch.
Programador independiente
Morelia, Mich.
M é x i c o .
Movil +52 44 3734 1858
SKYPE: jorge.posadasch
Email: posoft@gmx.com
Post Reply