Nao.... se voce manipula assim tranquilo.... mas se voce fizesse as contas
com +365 ai daria errado nos anos bisextos.
Eu vi que alguem postou uma tabela de feriados aqui. Nao olhei, entao nao
opino sobre ela.
Mas a ideia do Filipe pode resolver seu problema. Colocando por exemplo
Carnaval. todos os feriados que terminarem com . serao moveis.
Isso iria funcionar como quebra-galho mas pode resolver.
Eu nao sei como funcionam os feriados, mas se voce diz que somente 4 sao
moveis, da pra fazer uma rotina tranquila pra nao pega-las.
Algo mais ou menos assim:
SELECT * FROM FERIADOS WHERE FERIADO NOT IN ('CARNAVAL', 'SEXTA-FEIRA
SANTA', 'CORPUS CRISTI', 'PASCOA')
Cláudio Anderson de Araújo Prudente
Analista/Desenvolvedor de Sistemas
[EMAIL PROTECTED]
----- Original Message -----
From: "Eduardo Silva ®" <[EMAIL PROTECTED]>
To: <delphi-br@yahoogrupos.com.br>
Sent: Thursday, March 02, 2006 9:12 AM
Subject: RES: [delphi-br] Exportar Feriados
Filipe, não entendi pq tratar os anos bissextos????
A data do feriado em si não muda nada, já que para exportar eu uso um
copy(data,1,2) + copy(data,4,2) + (ano + 1).....
Ou tem algo errado????
-----Mensagem original-----
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Filipe
Enviada em: quinta-feira, 2 de março de 2006 08:28
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Exportar Feriados
Bom, como o Claudio disse, você terá que ter algo que os diferencie, mas
acho que não precisa ser na tabela. Você pode, por exemplo, colocar um
caractere especial atrás dos feriados móveis. Pode até ser um que nem
apareça! por exemplo, se vc for no bloco de notas e segurar Alt e pressionar
2, 5, 5, aparece um caracter em branco, mas que não é um espaço. Coloque um
desses atrás do nome do seu feriado e pronto! Você já tem como
diferenciá-los.
var
Feriado: String;
begin
if Feriado[Length(Feriado)] = SeuCaracterEspecial then
ShowMessage(Feriado +' é um feriado móvel.');
end;
Ps.: Lembre-se de tratar anos bissextos depois de 29 de fevereiro, e anos
subsequentes aos bissextos antes de 28 de fevereiro. Pode usar a função
IsLeapYear.
[]'s
Filipe Geyer
----- Original Message -----
From: Eduardo Silva ®
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, March 01, 2006 6:17 PM
Subject: RES: [delphi-br] Exportar Feriados
Nossa cara, não tem nada que os diferencie. Os feriados móveis são
apenas
4: - carnaval, sexta-feira santa, corpus cristi e pascoa, os outros são
fixos.
Na verdade eu tenho 4 botões no meu form que de acordo com o ano atual
eu
calculo os feriados móveis e o resto eu ia colocando na mão, mas pra não
ficar inserindo todo ano os mesmos, eu queria fazer essa exportação,
isto é,
pega o ano atual + 1 e joga os feriados para o proximo ano, só que tem o
problemas desses feriados que a cada ano caem em uma data diferente, ai
é
que o bicho pegou....e eu não to sabendo como me virar...
-----Mensagem original-----
De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED]
nome de [EMAIL PROTECTED]
Enviada em: quarta-feira, 1 de março de 2006 17:58
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Exportar Feriados
Primeiro voce precisa saber o que diferencia o feriado movel do fixo
na
sua
tabela. Se existir esse separador fica facil. Se nao existir vai
complicar
muito, a ponto de voce ter que saber o nome de todos os feriados
moveis e
incluir na rotina de exportacao com diversos ifs pra nao migra-los.
Cláudio Anderson de Araújo Prudente
Analista/Desenvolvedor de Sistemas
[EMAIL PROTECTED]
----- Original Message -----
From: "Eduardo Silva ®" <[EMAIL PROTECTED]>
To: "Grupo Delphi-br" <delphi-br@yahoogrupos.com.br>
Sent: Wednesday, March 01, 2006 4:57 PM
Subject: [delphi-br] Exportar Feriados
> Galera, tenho uma tabela onde eu cadastro os feriados do ano. Eu
coloquei
um
> botão para exportar os feriados de um ano para o outro (assim não
preciso
> digitar os "mesmos" feriados a cada mudança de ano).
>
> Meu problema esta nos feriados móveis (carnaval, pascoa, sexta-feira
santa
e
> corpus cristhi). Eu preciso exportar todos os feriados gravados na
tabela
> naquele ano + 1, menos os feriados móveis. Alguem pode me dar uma
luz?
>
> Se eu exportar todos de uma vez, os feriados móveis vem errado, por
isso
eu
> preciso exportar apenas os feriados fixos(ano novo, tiradentes, 7 de
> setembro, dentre outros).
>
> Como eu poderia fazer?
>
> __ __
> / \ /| |'-.
> .\__/ || | |
> _ / `._ \|_|_.-'
> | / \__.`=._) (_
> |/ ._/ |"""""""""|
> |'. `\ | | Eduardo de Almeida Silva
> ;"""/ / | | Kobra Sistemas
> ) /_/| |.-------.| Desenvolvimento de Software
> ' `-` ' " "
>
>
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
>
>
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Yahoo! Grupos, um serviço oferecido por:
PUBLICIDADE
------------------------------------------------------------------------
----
--
Links do Yahoo! Grupos
a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
Serviço do Yahoo!.
__________ Informação do NOD32 1.1422 (20060301) __________
Esta mensagem foi verificada pelo NOD32 Sistema Antivírus
http://www.nod32.com..br
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Yahoo! Grupos, um serviço oferecido por:
PUBLICIDADE
--------------------------------------------------------------------------
----
Links do Yahoo! Grupos
a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
Serviço do Yahoo!.
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Yahoo! Grupos, um serviço oferecido por:
PUBLICIDADE
----------------------------------------------------------------------------
--
Links do Yahoo! Grupos
a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
Serviço do Yahoo!.
__________ Informação do NOD32 1.1424 (20060302) __________
Esta mensagem foi verificada pelo NOD32 Sistema Antivírus
http://www.nod32.com.br
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Links do Yahoo! Grupos
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
