topic Período especiais no ano in Brasil

Período especiais no ano

Thu, 12 May 2011 17:10:01 GMT

Preciso criar uma espécie de um calendário anual com alguns períodos especiais. Ex:

Dia das mães

Dia dos pais

Dia dos namorados

Carnaval

Natal

Etc...

Assim consigo medir as vendas em algum peíodo em especial.

Período especiais no ano

Clever_Anjos — Thu, 12 May 2011 17:47:04 GMT

Carnaval e Semana Santa não tem uma regra específica (na verdade tem, mas é baseado em ciclo lunar, etc).
Sugiro que crie uma tabela em seu sistema com o campo data como chave e um flag indicando se é dia util ou não.

Período especiais no ano

Thu, 12 May 2011 18:02:03 GMT

Clever , muito obrigado pela dica vou fazer !!!!

Período especiais no ano

Wed, 29 Jun 2011 18:02:52 GMT

Senhores boa tarde.

Estou no mesmo dilema a verificação de dias uteis ou não, considernado os feriados no Brazil.

Só que não quero fazer a atualização ano a ano, assim criei o script a seguir (ainda nao finalizado) para achar as datas dos feriados fixos e móveis do Brasil.

Exite um calculo para verificar a pascoa e consequentemente depois de Achar a Pascoa encontrar os demais feriados móveis do ano corrente.

Vespera de Carnaval = Pascoa - 48 dias

Carnaval = Pascoa - 47 dias

Cinzas = Pascoa - 46 dias

Sexta Feira Santa = Pascoa - 2 dias

Corpus Christi = Pascoa + 60 dias

Para os feriados fixos criei os dados em in line, criei os aniverários de cidade para Itajaí e São Paulo pois são os dias que os banco não funcionam nas filiais da emrpesa que eu presto serviço.

Até ai tudo bem cheguei no resultados dos campos

Porem ainda preciso popular todos os campos em uma unica tabela. Maiores detalhes depois do código do script.

Cote:

Calendar:

LOAD * INLINE [

Holiday, Desc

01/01/, Confraternização Universal

01/25/, Aniversário São Paulo

04/21/, Tiradentes

05/01/, Dia do Trabalho

06/15/, Aniversário Itajaí

09/07/, Independência do Brasil

10/12/, Nossa Sra. Aparecida - Padroeira do Brasil

11/02/, Finados

11/15/, Proclamação da República

12/24/, Véspera de Natal

12/25/, Natal

12/31/, Véspera de Ano Novo];

// {Feriados Móveis}

Calendario:

Load

Date((Holiday&(Year(Today()))),'M/DD/YYYY') As Holiday,

//Para anos entre 1901 e 2099: X = 24 e Y = 5 para anos de 10

if(((if((((Mod(((19)*(Mod(Year(Today()),19)))+(24),30)) // d

+ // +

(Mod((2*(Mod(Year(Today()),4))+4*(Mod(Year(Today()),7))+6*(Mod(((19)*(Mod(Year(Today()),19)))+(24),30))+5),7)))// e

>=10 // Maior que 9

(

'4/'& // Abril

(((Mod(((19)*(Mod(Year(Today()),19)))+(24),30)) // d

+ // +

(Mod((2*(Mod(Year(Today()),4))+4*(Mod(Year(Today()),7))+6*(Mod(((19)*(Mod(Year(Today()),19)))+(24),30))+5),7)))// e

-9 // Menos 9

) &'/'&(year(Today())) // YYYY

), ('3/'& // Março

(((Mod(((19)*(Mod(Year(Today()),19)))+(24),30)) // d

+ // +

(Mod((2*(Mod(Year(Today()),4))+4*(Mod(Year(Today()),7))+6*(Mod(((19)*(Mod(Year(Today()),19)))+(24),30))+5),7)))// e

+22 // Mais 22

)&'/'&(year(Today())) // YYYY

)))

='4/26/2076'), '4/19/2049',

if(((if((((Mod(((19)*(Mod(Year(Today()),19)))+(24),30)) // d

+ // +

(Mod((2*(Mod(Year(Today()),4))+4*(Mod(Year(Today()),7))+6*(Mod(((19)*(Mod(Year(Today()),19)))+(24),30))+5),7)))// e

>=10 // Maior que 9

(

'4/'& // Abril

(((Mod(((19)*(Mod(Year(Today()),19)))+(24),30)) // d

+ // +

(Mod((2*(Mod(Year(Today()),4))+4*(Mod(Year(Today()),7))+6*(Mod(((19)*(Mod(Year(Today()),19)))+(24),30))+5),7)))// e

-9 // Menos 9

) &'/'&(year(Today())) // YYYY

), ('3/'& // Março

(((Mod(((19)*(Mod(Year(Today()),19)))+(24),30)) // d

+ // +

(Mod((2*(Mod(Year(Today()),4))+4*(Mod(Year(Today()),7))+6*(Mod(((19)*(Mod(Year(Today()),19)))+(24),30))+5),7)))// e

+22 // Mais 22

)&'/'&(year(Today())) // YYYY

))) ='4/25/2049'), '4/18/2049',

(if((((Mod(((19)*(Mod(Year(Today()),19)))+(24),30)) // d

+ // +

(Mod((2*(Mod(Year(Today()),4))+4*(Mod(Year(Today()),7))+6*(Mod(((19)*(Mod(Year(Today()),19)))+(24),30))+5),7)))// e

>=10 // Maior que 9

(

'4/'& // Abril

(((Mod(((19)*(Mod(Year(Today()),19)))+(24),30)) // d

+ // +

(Mod((2*(Mod(Year(Today()),4))+4*(Mod(Year(Today()),7))+6*(Mod(((19)*(Mod(Year(Today()),19)))+(24),30))+5),7)))// e

-9 // Menos 9

) &'/'&(year(Today())) // YYYY

), ('3/'& // Março

(((Mod(((19)*(Mod(Year(Today()),19)))+(24),30)) // d

+ // +

(Mod((2*(Mod(Year(Today()),4))+4*(Mod(Year(Today()),7))+6*(Mod(((19)*(Mod(Year(Today()),19)))+(24),30))+5),7)))// e

+22 // Mais 22

)&'/'&(year(Today())) // YYYY

))))) As Pascoa, // Se (d + e) > 9 então DIA = (d + e - 9) e MES = Abril senão DIA = (d + e + 22) e MES = Março

Desc

Resident Calendar;

Drop Table Calendar;

Calendarios:

Load

Date(if( Year(today())>1, Pascoa - 48, ''),'M/DD/YYYY') As Vespera,

Date(if( Year(today())>1, Pascoa - 47, ''),'M/DD/YYYY') As Carnaval,

Date(if( Year(today())>1, Pascoa - 46, ''),'M/DD/YYYY') As Cinzas,

Date(if( Year(today())>1, Pascoa - 2, ''),'M/DD/YYYY') As SextaFeiraSanta,

Date(if( Year(today())>1, Pascoa + 60, ''),'M/DD/YYYY') As CorpusChristi,

Pascoa,

Holiday,

Desc

Resident Calendario;

Drop Table Calendario;

Calendarios:

Load

Vespera,

Carnaval,

Cinzas,

SextaFeiraSanta,

CorpusChristi,

Pascoa,

Holiday,

Desc,

networkdays('01/01/2011', Today(), Holiday) As NetWorkDay // Calula os dias uteis de 01-Jan-2011 até Hoje considerando os feriados (Holyday).

Resident Calendarios;

Drop Table Calendarios;

Unquote

Resultado:

Holiday	Desc
1/1/2011	Confraternização Universal
1/25/2011	Aniversário São Paulo
4/21/2011	Tiradentes
5/1/2011	Dia do Trabalho
6/15/2011	Aniversário Itajaí
9/7/2011	Independência do Brasil
10/12/2011	Nossa Sra. Aparecida - Padroeira do Brasil
11/2/2011	Finados
11/15/2011	Proclamação da República
12/24/2011	Véspera de Natal
12/25/2011	Natal
12/31/2011	Véspera de Ano Novo

Pascoa	Vespera	Carnaval	Cinzas	CorpusChristi	SextaFeiraSanta
4/24/2011	3/7/2011	3/8/2011	3/9/2011	6/23/2011	4/22/2011

Todos esses dados estão em uma unica tablea

Pergunto diante da realidade ai vai a pergunta para finalizar este assunto de calendário com feriados fixos e móveis no Brasil.

Como colocar todas as colunas em apenas 01 coluna ?

Colunas ( Vespera, Carnaval, Cinzas, SextaFeiraSanta, CorpusChristi, Pascoa, Holiday) As nova Coluna

Desde já agradeço

ps: observem que trabalho com a data em Mes/Dia/Ano ('M/DD/YYYY')

Período especiais no ano

Wed, 29 Jun 2011 18:56:08 GMT

Boa Tarde,

Você consegue manipular as informações utilizando funções do sistema: (FieldName() e NoOfFields() )

Assumindo que no seu script a ultima tabela "Calendarios" alterei para "CALENDARIO_TMP", o tratamento que consegui realizar segue abaixo. (crie uma nova aba e copie e cole):

FERIADO_FIXO:
LOAD
Holiday,
Desc
RESIDENT CALENDARIO_TMP;

FERIADO_VARIAVEL_TMP:
LOAD
Vespera,
Carnaval,
Cinzas,
SextaFeiraSanta,
CorpusChristi,
Pascoa
RESIDENT CALENDARIO_TMP;

LET qtde_fields = NoOfFields('FERIADO_VARIAVEL_TMP');

FOR i=1 TO qtde_fields

LET campo=FieldName($(i), 'FERIADO_VARIAVEL_TMP');
FERIADO:
LOAD
$(campo) AS Holiday,
'$(campo)' AS Desc
RESIDENT FERIADO_VARIAVEL_TMP;

NEXT
// a tabela anterior contem a mesma qtde de campos, o concatenate é realizado automaticamente.
FERIADO:
LOAD *
RESIDENT FERIADO_FIXO;

DROP TABLE CALENDARIO_TMP;
DROP TABLE FERIADO_VARIAVEL_TMP;

Re: Período especiais no ano

Thu, 30 Jun 2011 01:32:04 GMT

Eduaro Correa muito obrigado por sua ajuda.

Realizei algumas adaptações para a minha realidade e tenho o resultado final que eu esperava. Ponto para você!

Abaixo compartilho o código todos para quem desejar ter uma tabela anual com os calendários do Brasil.

___________________________________________________________________________________________________________________________

SET

ThousandSep=',';

SET

DecimalSep='.';

SET

MoneyThousandSep=',';

SET

MoneyDecimalSep='.';

SET

MoneyFormat='$#,##0.00;($#,##0.00)';

SET

TimeFormat='h:mm:ss TT';

SET

DateFormat='M/D/YYYY';

SET

TimestampFormat='M/D/YYYY h:mm:ss[.fff] TT';

SET

MonthNames='Jan;Feb;Mar;Apr;May;Jun;Jul;Aug;Sep;Oct;Nov;Dec';

SET

DayNames='Mon;Tue;Wed;Thu;Fri;Sat;Sun';

//*****************************************************Feriados*************************************************************************************

// Feriados Fixos

Calendar:

LOAD

* INLINE [

;

// {Feriados Móveis}

Pascoa:

Load

((Holiday&(Year(Today()))),'M/DD/YYYY') As Holiday,
//Para anos entre 1901 e 2099: X = 24 e Y = 5 para anos de 10

if(((if((((Mod(((19)*(Mod(Year(Today()),19)))+(24),30)) // d

+
// +

(
Mod((2*(Mod(Year(Today()),4))+4*(Mod(Year(Today()),7))+6*(Mod(((19)*(Mod(Year(Today()),19)))+(24),30))+5),7)))// e

>=
10 // Maior que 9

),

(

'4/'

& // Abril

(((
Mod(((19)*(Mod(Year(Today()),19)))+(24),30)) // d

+
// +

(
Mod((2*(Mod(Year(Today()),4))+4*(Mod(Year(Today()),7))+6*(Mod(((19)*(Mod(Year(Today()),19)))+(24),30))+5),7)))// e

-
9 // Menos 9

) &
'/'&(year(Today())) // YYYY

), (
'3/'& // Março

(((
Mod(((19)*(Mod(Year(Today()),19)))+(24),30)) // d

+
// +

(
Mod((2*(Mod(Year(Today()),4))+4*(Mod(Year(Today()),7))+6*(Mod(((19)*(Mod(Year(Today()),19)))+(24),30))+5),7)))// e

+
22 // Mais 22

)&
'/'&(year(Today())) // YYYY

)))

=
'4/26/2076'), '4/19/2049',

if

(((if((((Mod(((19)*(Mod(Year(Today()),19)))+(24),30)) // d

+
// +

(
Mod((2*(Mod(Year(Today()),4))+4*(Mod(Year(Today()),7))+6*(Mod(((19)*(Mod(Year(Today()),19)))+(24),30))+5),7)))// e

>=
10 // Maior que 9

),

(

'4/'

& // Abril

(((
Mod(((19)*(Mod(Year(Today()),19)))+(24),30)) // d

+
// +

(
Mod((2*(Mod(Year(Today()),4))+4*(Mod(Year(Today()),7))+6*(Mod(((19)*(Mod(Year(Today()),19)))+(24),30))+5),7)))// e

-
9 // Menos 9

) &
'/'&(year(Today())) // YYYY

), (
'3/'& // Março

(((
Mod(((19)*(Mod(Year(Today()),19)))+(24),30)) // d

+
// +

(
Mod((2*(Mod(Year(Today()),4))+4*(Mod(Year(Today()),7))+6*(Mod(((19)*(Mod(Year(Today()),19)))+(24),30))+5),7)))// e

+
22 // Mais 22

)&
'/'&(year(Today())) // YYYY

))) =
'4/25/2049'), '4/18/2049',
(
if((((Mod(((19)*(Mod(Year(Today()),19)))+(24),30)) // d

+
// +

(
Mod((2*(Mod(Year(Today()),4))+4*(Mod(Year(Today()),7))+6*(Mod(((19)*(Mod(Year(Today()),19)))+(24),30))+5),7)))// e

>=
10 // Maior que 9

),

(

'4/'

& // Abril

(((
Mod(((19)*(Mod(Year(Today()),19)))+(24),30)) // d

+
// +

(
Mod((2*(Mod(Year(Today()),4))+4*(Mod(Year(Today()),7))+6*(Mod(((19)*(Mod(Year(Today()),19)))+(24),30))+5),7)))// e

-
9 // Menos 9

) &
'/'&(year(Today())) // YYYY

), (
'3/'& // Março

(((
Mod(((19)*(Mod(Year(Today()),19)))+(24),30)) // d

+
// +

(
Mod((2*(Mod(Year(Today()),4))+4*(Mod(Year(Today()),7))+6*(Mod(((19)*(Mod(Year(Today()),19)))+(24),30))+5),7)))// e

+
22 // Mais 22

)&
'/'&(year(Today())) // YYYY

)))))
As Pascoa, // Se (d + e) > 9 então DIA = (d + e - 9) e MES = Abril senão DIA = (d + e + 22) e MES = Março

Desc
Resident

Calendar;
Drop

Table Calendar;

Calendario_Temporario:

Load

Date

(if( Year(today())>1, Pascoa - 48, ''),'M/DD/YYYY') As Vespera_de_Carnaval,

Date

(if( Year(today())>1, Pascoa - 47, ''),'M/DD/YYYY') As Carnaval,

Date

(if( Year(today())>1, Pascoa - 46, ''),'M/DD/YYYY') As Cinzas,

Date

(if( Year(today())>1, Pascoa - 2, ''),'M/DD/YYYY') As Sexta_Feira_Santa,

Date

(if( Year(today())>1, Pascoa + 60, ''),'M/DD/YYYY') As Corpus_Christi,

Date

(Pascoa, 'M/DD/YYYY') As Pascoa,

Holiday

,

Desc

Resident

Pascoa;
Drop

Table Pascoa;

Feriados_Fixo:

load

Holiday

,

Desc

Resident

Calendario_Temporario;
Feriado_Variavel:

Load

Vespera_de_Carnaval

,

Carnaval

,

Cinzas

,

Sexta_Feira_Santa

,

Corpus_Christi

,

Pascoa

Resident

Calendario_Temporario;
Drop

Table Calendario_Temporario;
LET

qtde_fields = NoOfFields('Feriado_Variavel');
FOR

i=1 TO qtde_fields
LET

campo = FieldName($(i) , 'Feriado_Variavel');
Feriado:

Load

$(campo)

As Holiday,

if

(upper('$(campo)' )='VESPERA_DE_CARNAVAL', 'Véspera de Carnaval',

if

(upper('$(campo)' )='SEXTA_FEIRA_SANTA', 'Sexta Feira Santa',

if

(upper('$(campo)' )='CORPUS_CHRISTI', 'Corpus Christi',

if

(upper('$(campo)' )='CINZAS', 'Quarta Feira de Cinzas', '$(campo)' )))) As Desc
Resident

Feriado_Variavel;
Next

Feriado:

// a tabela anterior contem a mesma qtde de campos, o concatenate é realizado automaticamente.

Load

Date

(Holiday, 'M/DD/YYYY') As Holiday,

Desc

Resident

Feriados_Fixo;
Drop

Table Feriado_Variavel;

___________________________________________________________________________________________________________________________

Muito obrigado

Abraços Weslley!

Date

Re: Período especiais no ano

aderlanrm — Thu, 24 Apr 2014 21:23:37 GMT

Já que o Evandro não marcou, marquei sua resposta como certa.

O código é muito bom, você não tem interesse de fazer um QVW de exemplo e postar aqui na comunidade como arquivo? #ficaadica

Abraço.