quinta-feira, 28 de janeiro de 2010

Hamburguer de forno Por: GIZELE CRISTINA NUNES

INGREDIENTES:
§                     6 hamburgueres
§                     1 cebola grande cortada em 6 fatias
§                     1 lata de molho de tomate tradicional
§                     6 fatias de mussarela
             óleo para untar
MODO DE PREPARO:
1.                 Preaqueça o forno em temperatura média (180c).
 
2.                 Unte um refratário grande e coloque os hamburgueres, um ao lado do outro.
 
3.                 Leve ao forno por 15 minutos.
 
4.                 Coloque 1 fatia de cebola sobre cada hamburguer, cubra com o molho de tomate tradicional e as fatias de mussarela.
 
5.                 Leve de volta ao forno por mais de 10 minutos.
Sirva em seguida.
6 porções
40min


Fonte: http://tudogostoso.uol.com.br - visita: 19/06/2008

SQL Server

Para ajudar em algumas funções que sempre procuramos:

--habilitar link para outro servidor

EXEC sp_addlinkedserver  
   @server='servidor',
   @srvproduct='',
   @provider='SQLNCLI',
   @datasrc='servidor'


-- zerar campo identid
DBCC CHECKIDENT (NomeTabela, RESEED, 0)


-- backup para inserir em código fonte

BACKUP DATABASE [master] TO
DISK = N'C:\Arquivos de programas\Microsoft SQL Server\MSSQL.1\MSSQL\Backup\master.bak'
WITH NOFORMAT, NOINIT,  NAME = N'Monalisa-Full Database Backup', SKIP, NOREWIND, NOUNLOAD,STATS = 10

GO

--Inserir  texto no banco

BULK
INSERT Cidade
        FROM 'D:\Banco\cepS\Cidade.csv'
            WITH
    (
                CODEPAGE = 'ACP', --aceita acentos
                FIELDTERMINATOR = ',', --define separador
                ROWTERMINATOR = '\n' -- define termino da linha
    )


------------inserir cfop, conecta no exel
sp_addlinkedserver N'Excel',
N'Jet 4.0',
N'Microsoft.Jet.OLEDB.4.0',
N'C:\Banco\cfop.xls',
NULL,
N'Excel 8.0'
go

sp_addlinkedsrvlogin N'Excel', false, sa, N'ADMIN', NULL

go

EXEC sp_linkedservers

INSERT INTO CFOP

(CFOP, CFOPDesc)

      SELECT cfop,cfopdesc

      FROM Excel...cfop$--nome da planilha

Att

Fernando

quarta-feira, 27 de janeiro de 2010

Sub Relatório no crystal C#

Tive certa vez um problema ao abrir um relatorio com sub relatório, e por mais que tentava não conseguia mudar.
Mas tudo mudou ao alterar a ordem e forma das chamadas dos subrelatórios.
Segue abaixo o codigo contido dentro de um form proprio para gerar RPT, onde envio os selects para a geração dos mesmos através do form que os chama.

using System;
using System.Collections.Generic;
using System.ComponentModel;

using System.Data;
using System.Data.SqlClient;

using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;

using CrystalDecisions.CrystalReports.Engine;
using CrystalDecisions.Shared;

using System.IO;

using xxx.Camada_Logica;

namespace xxx
{
public partial class frmVisualisaRelatorio : Form
{
ClsComponentes Comp = new ClsComponentes();
public string strSQL,nomeForm, strReportPath, strTable;
public bool PossuiFoto = false, PossuiSub = false;


public frmVisualisaRelatorio()
{
InitializeComponent();
}

private void frmVisualisaRelatorio_Load(object sender, EventArgs e)
{
ListaProdutos();
}

private void ListaProdutos()
{
ReportDocument reportDocument = new ReportDocument();
SqlConnection oConn = new SqlConnection();
DataSet oDataSet = new DataSet();
clsImagem Imagem = new clsImagem();
byte[] imagem1, imagem2;
oConn.ConnectionString = Comp.Conexao1;
oConn.Open();
try
{
SqlDataAdapter oDA = new SqlDataAdapter(strSQL, oConn);
oDA.Fill(oDataSet);
if (PossuiFoto)
{
for (int i = 0; i <>
{
if (File.Exists(Convert.ToString(oDataSet.Tables[0].Rows[i]["ProdFoto1"])))
{
imagem1 = imagem2 = Imagem.GetArrayFromImagen(Image.FromFile(Convert.ToString(oDataSet.Tables[0].Rows[i]["ProdFoto1"])));
}
else
imagem1 = null;//Imagem.GetArrayFromImagen(Image.FromFile(this.strReportPath.Replace("\\bin\\Debug", "") + "\\Resources\\NoPhoto.jpg"));

if (File.Exists(Convert.ToString(oDataSet.Tables[0].Rows[i]["ProdFoto2"])))
{
imagem2 = Imagem.GetArrayFromImagen(Image.FromFile(Convert.ToString(oDataSet.Tables[0].Rows[i]["ProdFoto2"])));
}
else
imagem2 = null;// Imagem.GetArrayFromImagen(Image.FromFile(this.strReportPath.Replace("\\bin\\Debug", "") + "\\Resources\\NoPhoto.jpg"));

oDataSet.Tables[0].Rows[i]["Imagem1"] = imagem1;
oDataSet.Tables[0].Rows[i]["Imagem2"] = imagem2;
}
}

reportDocument.Load(strReportPath);
//libera acesso quando for dns, não usando dataset para a criação do realtorio
reportDocument.SetDatabaseLogon("sa", "bigboss");
if (PossuiSub)
{
//1ª forma de chamar onde estava dando erro
//SubreportDocument1 = reportDocument.OpenSubreport("crtProdutoEstoque.rpt");
//SubreportDocument2 = reportDocument.OpenSubreport("crtProdutoEstrutura.rpt");
//SubreportDocument1.Database.Tables[0].SetDataSource(oDataSet.Tables[1]);
//SubreportDocument2.Database.Tables[0].SetDataSource(oDataSet.Tables[2]);
//2ª forma de chamar onde rodou corretamente no caso de haver subrelatorios
switch (nomeForm)
{
case "Produto":
reportDocument.Subreports["crtProdutoEstoque.rpt"].Database.Tables[0].SetDataSource(oDataSet.Tables[1]);
reportDocument.Subreports["crtProdutoEstrutura.rpt"].Database.Tables[0].SetDataSource(oDataSet.Tables[2]);
break;
case "Estagio":
reportDocument.Subreports["crtEstagioProducao.rpt"].Database.Tables[0].SetDataSource(oDataSet.Tables[1]);
reportDocument.Subreports["crtEstagioProduto.rpt"].Database.Tables[0].SetDataSource(oDataSet.Tables[2]);
reportDocument.Subreports["crtEstagioServico.rpt"].Database.Tables[0].SetDataSource(oDataSet.Tables[3]);
break;
}
}
//3 passo: definir o DataSource do relatório
//reportDocument.SetDataSource(oDataSet);
//define a tabela para atualização depois de ter criado os subrelatorios caso haja
reportDocument.Database.Tables[0].SetDataSource(oDataSet.Tables[0]);
//4 passo: visualizar o relatório
crystalReportViewer1.DisplayGroupTree = false;
crystalReportViewer1.ReportSource = reportDocument;
}
catch (Exception ex)
{
MessageBox.Show("Erro na geração deste relatório!");
this.Close();
System.Diagnostics.Debug.WriteLine(ex.Message);
}

finally
{
//liberando os objetos
oConn.Dispose();
oDataSet.Dispose();
oConn = null;
oDataSet = null;
}
}
}
}

segunda-feira, 25 de janeiro de 2010

Excesso


Eclesiastes 1,1-18

Meditava esta palavra, e num toque de Deus compreendi, tudo se torna "vaidade das vaidades ecle. 1,2", simples assim, nos excessos que temos tudo vai se tornando vaidade, o Eclesiastes coloca claro no final que buscou e acumulou muita sabedoria e com ela muita tristeza, e ai esta mais uma verdade bíblica, tudo o que trazemos em exagero em nossas vidas vem acumulado de tristezas.
Certo momento de minha vida, esqueci de estar em casa, exagerava nas milhas saídas, era quase inreconhecivel, não tinha dialogo, acumulava desentendimento, até que um irmão disse: "tua familia é igreja também", aprendi que tinha de distribuir melhor meu tempo.
Reconhecer que precisamos de sabedoria, ciência é um fator importante em nossas vidas, mas maior ainda é reconhecer o ponto onde estamos, se minha ciência está afastando as pessoas de mim, já não é valida para minha vida, e se tornou apenas vaidade. O trabalho é assim também, o dinheiro, devemos ganha-lo sim, ter uma vida confortavel, claro, trabalhar para garantir o futuro dos nossos filhos, perfeito, mas não posso dar um futuro para um filho sem fazer parte dele, sem ao menos saber seu herói favorito, ou ser para ele um herói, o excesso de ausência machuca, é necessário um tempo para cada coisa ecle 3,1-8.
O equilíbrio, quando encontramos, nossas orações são mais eficazes, nossas conversas em família são mais produtivas, nosso trabalho é mais rentável em todos os aspectos, nosso contato com Deus se torna mais amigo ainda, e sendo mais amigo de Deus, compreendo mais suas vontades para comigo, e entendo o valor do tempo e passo a viver sem excessos, mas sim com o necessário.
Que nossos corações possam aprender a buscar o equilíbrio e a harmonia da vida em Oração, para assim podermos ser os luzeiros neste mundo.

Senhor ajuda-me a encontrar o equilíbrio, e que este seje banhado em seu Santo Espírito, possa eu em minha pequenez reconhecer que posso, mas além disso que tudo posso em Ti que me fortalece. Que possa aprender cada dia mais com os irmãos e compartilhar cada dia mais o que aprendo, que minhas quedas sejam regadas pelo levantar e recomeçar em Ti aprendendo e crescendo cada dia mais. AMEM.

Fernando Valota


sábado, 23 de janeiro de 2010

Costela Assada

Para quem gosta de uma boa Costela.

Costela
Descubra os segredos do tempero ideal para assar a carne

Ingredientes:

Costela

Sal

Água

Ovo

Modo de preparo:

Primeiro é preciso preparar o tempero. Para saber o ponto ideal para salgar a costela a dica é colocar um ovo caipira na panela ou na tigela, com um pouco de água. Jogue o sal até a hora que o ovo começar a boiar. Depois despeje a água salgada na carne, dentro de um recipiente, e deixe salgar por 12 horas. Passado o tempo determinado enrole a carne no papel alumínio dando quatro voltas e leve à churrasqueira por 4 horas. Depois retire o papel alumínio e deixe a carne dourar.

Dica: O espeto tem que estar a uma distância de um metro do fogo.

Bom Apetite!


Publicado em 21/3/2009


Fonte: http://tvtem.globo.com/nossocampo/receitas.asp?ID=1478(visita em 23/01/2010)
Indicado por um amigo: Thiago

Relatorio em PDF com C# (asp.net)

importar para o sistema a dll itextsharp - http://sourceforge.net/projects/itextsharp/

using iTextSharp.text;
using iTextSharp.text.pdf;
using iTextSharp.text.html;


protected void btnRelatorio_Click(object sender, EventArgs e)
{
if (gvCliProf.Rows.Count > 0)
{
// creation of the document with a certain size and certain margins
Document document = new Document(PageSize.A4.Rotate(), 30, 30, 30, 30);

try
{
// creation of the different writers
// um detalhe ao publicar deve-se retirar o arquivo gerado durante a construção se eventualmente ele o mesmo for, o sistema o recriará com as permissões do wwwroot.
//estancia o documento.
PdfWriter.GetInstance(document, new FileStream(Request.PhysicalApplicationPath + @"PDF\\Campanha.pdf", FileMode.Create));

// we add some meta information to the document
document.AddAuthor("xxx");
document.AddSubject("xxxx");
//abre para registro.
document.Open();
//instância da tabela e criação da mesma
iTextSharp.text.Table datatable = new iTextSharp.text.Table(7);
//altura da Tabela
datatable.Padding = 4;
//alinhamento dentro da celula
datatable.Spacing = 0;
//datatable.setBorder(Rectangle.NO_BORDER);
//float[] headerwidths = { 10, 24, 12, 12, 7, 7, 7, 7, 7, 7 };
//gera a medida de cada célula, deve-se conter a quantidade de células especificadas na instância da tabela
float[] headerwidths = { 10, 15, 30, 20, 40, 24, 15 };
//instacia de tamanho
datatable.Widths = headerwidths;
datatable.WidthPercentage = 100;

// the first cell spans 7 columns
//gera uma celula com o tamanho total das celulas no caso 7 celulas
Cell cell = new Cell(new Phrase(@"Cliente\Nome do Relatorio", FontFactory.GetFont(FontFactory.HELVETICA, 24, Font.BOLD)));
cell.HorizontalAlignment = Element.ALIGN_CENTER;
cell.Leading = 30;
cell.Colspan = 7;
cell.Border = Rectangle.NO_BORDER;
cell.BackgroundColor = new Color(0xC0, 0xC0, 0xC0);
datatable.AddCell(cell);
// the first cell spans 7 columns
//nova célula no tamanho da columns
cell = new Cell(new Phrase("Campanha: " + txtNum.Text + " - " + txtNomeCampanha.Text, FontFactory.GetFont(FontFactory.HELVETICA, 18, Font.BOLD)));
cell.HorizontalAlignment = Element.ALIGN_CENTER;
cell.Leading = 20;
cell.Colspan = 7;
cell.Border = Rectangle.NO_BORDER;
cell.BackgroundColor = new Color(0xC0, 0xC0, 0xC0);
datatable.AddCell(cell);

//cria cabeçario.

// These cells span 2 rows
datatable.DefaultCellBorderWidth = 2;
datatable.DefaultHorizontalAlignment = 1;
datatable.DefaultRowspan = 2;
datatable.AddCell("Id");
datatable.AddCell("Código");
//datatable.AddCell(new Phrase(@"Nome\Apelido", FontFactory.GetFont(FontFactory.HELVETICA, 14, Font.BOLD)));
datatable.AddCell(@"Nome\Apelido");
datatable.AddCell("Celular");
datatable.AddCell("e-mail");
datatable.AddCell("Profissão");
// This cell spans the remaining 6 columns in 1 row
//mescla varias colunas
//datatable.DefaultRowspan = 1;
//datatable.DefaultColspan = 6;
//datatable.AddCell("Permissions");
// These cells span 1 row and 1 column
//volta ao normal
datatable.DefaultColspan = 1;
datatable.AddCell("Paticipação");

// this is the end of the table header, finaliza cabeçario
datatable.EndHeaders();


//insere intens selecionados em um grid
datatable.DefaultCellBorderWidth = 1;
datatable.DefaultRowspan = 1;
int i = 0;
while ( i Menor gvCliProf.Rows.Count )
{
GridViewRow row = gvCliProf.Rows[i];
bool isChecked = ((CheckBox)row.FindControl("chkSelecao")).Checked;
if (isChecked)
{

datatable.DefaultHorizontalAlignment = Element.ALIGN_LEFT;
datatable.AddCell(gvCliProf.Rows[i].Cells[1].Text);//id
datatable.AddCell(gvCliProf.Rows[i].Cells[2].Text);//cod empresa
datatable.DefaultHorizontalAlignment = Element.ALIGN_CENTER;
datatable.AddCell(HttpUtility.HtmlDecode(gvCliProf.Rows[i].Cells[3].Text));//nome apelido
datatable.AddCell(HttpUtility.HtmlDecode(gvCliProf.Rows[i].Cells[4].Text));//celular
datatable.AddCell(HttpUtility.HtmlDecode(gvCliProf.Rows[i].Cells[5].Text));// email
datatable.AddCell(HttpUtility.HtmlDecode(gvCliProf.Rows[i].Cells[6].Text));//profissao
datatable.AddCell(gvCliProf.Rows[i].Cells[7].Text);//participou
}
i++;
}
//adiciona o documento
document.Add(datatable);
// we close the document
document.Close();
//redireciona para mostrar
Response.Redirect("~/PDF/Campanha.pdf");

}
catch (IOException ex)
{
document.Close();
throw ex;
}
catch (Exception ex)
{
document.Close();
throw ex;
}
}
else
{
ScriptManager.RegisterStartupScript(this, this.GetType(), "Mensagem", @"window.alert('Sem Clientes\Profissionais!');", true);
}
}

Está é uma adaptação ao exemplo mostrado no link acima, para facilitar e ajudar a quem necessita gerar relatórios sem o uso do Crystal, está uma opção free.
E mais detalhes voce pode encontrar no tutorial contido no site: http://itextsharp.sourceforge.net/tutorial/

att

Fernando Valota

sexta-feira, 22 de janeiro de 2010

Basta um Toque!


Marcos 3,7-12
'Tu és o filho de Deus! Marcos 3,11' diziam os espíritos imundos ao ve-lo, e aos enfermos bastava um toque para serem curados, tamanha é a presença da Trindade, de sua união representada em Jesus, onde está o Filho está o Pai e seu Espirito Santo, e toda a graça do Amor perfeito. Amor este que nos é derramado por apenas um toque de fé.
Ao olhar para Jesus ele nos Ama, se toca-lo com fé ele nos Cura, e ao Adorarmos o céu se abre sobre nós com todas as suas bençãos.
Neste pequeno trecho da Palavra de Deus, pude entender como a Trindade é viva em Cristo, como a autoridade de Jesus é reconhecida e como nossa fé é fundamental para a realização da obra de Deus. Focando nas curas, a propria Palavra nos ensina a todo momento "Tua fé te Salvou!", portanto que em nossos corações tenhamos a certeza de que somente pela nossa fé conseguiremos chegar ao coração de Deus e lá estando "basta um toque", ser Adorador por Amor.



Fernando Valota


terça-feira, 19 de janeiro de 2010

O Tempo do Jejum. Mc 2,18-22


Hoje, para que servira o jejum?
Quando Jesus caminhava entre os homens a graça e o sinal maior do sacrifício estava Nele, com sua ida gloriosa ao céu, nos tornamos portadores da graça e também do sacrifício, não somente a ponto de derramar o sangue contra o pecado, como dizia Paulo(Heb 12, 4), mas também do sacrifício do coração, de estar acima do que o mundo vem nos pedindo para ser, ou seja, ser mais Irmão que solitário, mas ainda assim pecamos!
Com isso, o pecado, perdemos a condição maior, de estar na graça e não porque Deus quer, mas por não entendermos as vezes que somos fracos e pro si só nos afastamos.
O Jejum vem como uma condição de retorno e fortalecimento, na qual rebaixo o meu Humano sacrificando-o em mim mesmo, minha vontade diante do meu objeto de jejum passa a não ser importante, tudo isso para que a oração e a suplica sejam agradáveis ao coração de Deus. Um beneficio visível do jejum além das graças diante de Deus, é o auto-controle, onde nossos vícios e desvios são vencidos, ou seja, onde antes reinava uma vontade contraria a minha liberdade em Deus, passa a viver um amor maior a minha pessoa, e me amando mais posso amar mais o próximo, pois todo amor verdadeiro vem de Deus.
Os Santos nos ensinam que quando sacrificamos nosso querer, abrimos espaço para o querer de Deus, e o jejum é uma linda porta para este querer.

Fernando Valota

quarta-feira, 13 de janeiro de 2010

Marcos 1,29-39 Deserto em Oração


"...De manhã, tendo levantado muito antes do amanhecer, ele saiu e foi para um lugar deserto, e ali se pôs em oração. Marcos 1,35"
Toda vez que nos colocamos a disposição para algo, devemos nos preparar para o tal, assim também nos ensina Jesus.
Após um dia de graças e manifestações do Amor de Deus, vem um momento de "deserto em oração", para poder entender os planos de Deus e lhe render a Glória devida pelas suas maravilhas.
Não adianta muito querer entender os planos de Deus se não tiver a vontade de faze-lo e a demonstração desta vontade acontece através da oração, uma oração que nasce no louvor e na adoração.
Estar pronto é estar em oração e através disto os milagres de Deus acontecem em nossas vidas e nas vidas de quem estiver ao nosso redor.

terça-feira, 12 de janeiro de 2010

Marcos 1,21b-28 “Autoridade.”


Sabemos, mas temos anseio de viver sob a autoridade de Jesus?

Nesta passagem nos é mostrado à autoridade de Jesus, no pregar, e sobre as forças malignas, autoridade que assustava e encantava, e gerava ciúmes dos fariseus, pois não tinham esse poder em suas orações.

Podemos analisar a seguinte situação, os fariseus pensavam em ter status, e não em mostrar o verdadeiro Deus, já Jesus, tudo o que queria era mostrar o Pai, por isso orava e quando pregava todo poder de Deus era manifestado, e o próprio Jesus vivia sob o Senhorio de Deus. Com isso pergunto a mim mesmo, quero viver sob o Senhorio de Jesus, sob sua Autoridade?

Viver sob tal situação não nos condiciona a ser submissos como se não tivéssemos pensamentos e razão, mas ser reconhecedor do Senhorio de Cristo, o qual todo joelho se dobra no Céu, na terra e nos infernos (Fl 2,6). É estar caminhando ao lado de uma força benéfica que tem como vontade nos tornamos cada vez mais felizes, e com alegrias duradouras e não passageiras. E quanto mais próximo de Dele estamos mais longe da mentalidade dos fariseus ficamos, e com isso mais luz para nossa vida e para a dos outros levamos.

Nossa conexão com tal amor vem de uma única forma, a Oração, onde todas as barreiras são quebradas, e onde passamos a sentir que estamos reconhecendo Jesus como Senhor, e deixando sua Autoridade e Poder realizar em nossas vidas aquilo que é melhor para nós.

Nenhum mal tem poder quando a família, a pessoa, a empresa, você esta Sob a proteção e Sob o Senhorio de Jesus.


Fernando Valota

quarta-feira, 6 de janeiro de 2010

"...os seus corações estavam insensíveis." Marcos 6,45-52


Lendo esta palavra do Evangelho comecei a meditar, e um trecho no final já, me tocou profundamente: "os seus corações estavam insensíveis.", a passagem retrata o momento em que Jesus caminhava sobre as aguas, e ao ser avistado foi considerado um fantasma, os apóstolos se apavoraram começando a gritar, já estavam apavorado porque não tinham entendido o milagre da Multiplicação dos Pães (ver Marcos 6,34-44), e no ultimo versículo é dito "...os seus corações estavam insensíveis.", com isso, quantas vezes por um coração insensível não vemos o que Deus faz por nós, e muitas vezes, por não reconhecer e por estar nessa situação ainda criticamos, até mesmo milagres, os condenamos em nossas vidas, tudo por não ter um coração sensível ao Amor de Deus.
O grande convite de Deus é aceitar ter o coração sensibilizado pelo seu Amor, para pode e conseguir ver, como o cego cuja escamas são retiradas dos olhos, exatamente assim, hoje eu, e todos são chamados a ser novos, e ter um novo coração, com a sensibilidade ungida pelo Espírito Santo.
A capacidade de ver a vida com os olhos do Amor. Imagino se os Apóstolos estivessem com o coração pronto naquele momento, o grito de louvor que ecoaria sobre as aguas seria ouvido pelos quatro cantos do mundo, por isso, não deixe passar a chance de louvar e estar pronto para as maravilhas de Deus! Maravilhas essas que a todo instante são derramadas sobre nós, todos nós.

Paz e bem a todos, e que vossos corações se tornem sensíveis ao Amor imensuravél de Deus.

Fernando Valota da Silva