Primer dia de cada mes en SQLite

HMG en Español

Moderator: Rathinagiri

Post Reply
jorge.posadas
Posts: 65
Joined: Mon May 19, 2014 7:43 pm
DBs Used: DBF, SQLite, MS-SQL, ACCESS, MariaDB (en proceso)
Location: Tizayuca, Hgo. México
Been thanked: 3 times
Contact:

Primer dia de cada mes en SQLite

Post by jorge.posadas » Thu Jul 12, 2018 9:28 pm

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

Jorge Posadas Ch
Tizayuca, Hgo.
M é x i c o .
Movil +52 5514272013
SKYPE: jorge.posadasch
Email: jorge.posadas@gmail.com

User avatar
koke
Posts: 49
Joined: Wed Aug 21, 2013 3:54 pm
DBs Used: DBF, mySql, mariaDB
Has thanked: 6 times
Been thanked: 16 times

Post by koke » Fri Jul 13, 2018 12:42 pm

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: 65
Joined: Mon May 19, 2014 7:43 pm
DBs Used: DBF, SQLite, MS-SQL, ACCESS, MariaDB (en proceso)
Location: Tizayuca, Hgo. México
Been thanked: 3 times
Contact:

Post by jorge.posadas » Fri Jul 13, 2018 2:06 pm

Koke,

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

Un saludo desde Tizayuca, Hgo.
Cordialmente

Jorge Posadas Ch
Tizayuca, Hgo.
M é x i c o .
Movil +52 5514272013
SKYPE: jorge.posadasch
Email: jorge.posadas@gmail.com

Post Reply