pauloaraujo

Dois amigos compraram um casal de papagaios, mas eles não sabiam qual era o macho e qual era a fêmea, então resolveram filmar os dois. Um dia eles descobriram, e resolveram que, para nunca mais esquecerem, deveriam raspar a cabeça da fêmea, e assim fizeram. Então um dia o dono-da-casa fez uma festa, e um dos papagaios chamou um careca que estava passando: - Ôôô careca! E o careca olha para os dois lados e fica na dele. - Ôôô careca, aqui em cima! - Papagaio, você ta me chamando? - Aham. Te pegaram dando o rabo também, né??

Dois amigos compraram um casal de papagaios, mas eles não sabiam qual era o macho e qual era a fêmea, então resolveram filmar os dois. Um dia eles descobriram, e resolveram que, para nunca mais esquecerem, deveriam raspar a cabeça da fêmea, e assim fizeram. Então um dia o dono-da-casa fez uma festa, e um dos papagaios chamou um careca que estava passando: - Ôôô careca! E o careca olha para os dois lados e fica na dele. - Ôôô careca, aqui em cima! - Papagaio, você ta me chamando? - Aham. Te pegaram dando o rabo também, né??

citação:Sabia q vc nao ia deixar passar batido. rsrsrs... id=quote>id=quote>Para os amigos que não leram e os que entraram depois no Fórum, vai o link: http://www.fivewin.com.br/forum/topic.asp?TOPIC_ID=11169 Vailtom, você está sendo muito modesto. Essa não foi uma pérola ou uma freirapérola (hehe), com certeza foi uma madrepérola. Essa só será superada pelo próprio autor, quando ele resolver mostrar os vastos conhecimentos que tem sobre a fauna, do tipo: . cobra voa; . baleia não é mamífero; . bode é femea; . cabra é sorvete, pois existe o chupa-cabra, etc, etc, etc.

E PERNAS

citação:É gente , falamos , falamos , discutimos quase deu tapa ( bricadeirinha ) e nada , vamos deixar pra la antes q alguem mora rsrsrsrsrs , vou deixar so o :npage , obrigado a todos , abraços id=quote>id=quote>Judson, Desculpe-nos as brincadeiras inevitáveis no seu tópico. Conclusão nua e crua: 1º) a classe não tem o que você quer, a não ser que alguém a modifique. 2º) o comando para mostrar o total de páginas está aquí mesmo. 3º) dá para você fazer, desde que se conte as páginas antes. O resto, é resto.....

Alessandro Muito bom isto: "Nós nos transformamos naquilo que praticamos com freqüência. A perfeição, portanto, não é um ato isolado e sim um hábito".

citação:o Site da pau e a culpa é minha ¬¬ Xharbour /fivewin sqlrdd"Gatinhando" workshop /VSX id=quote>id=quote>Beber, eu bebí, não nego. Mas com 58184 Mensagens, o cara bebeu muito mais do que eu (hehe).

citação:Boa noite Moçada , estou tendo um problema quanto a seguencia de tabulção de de GET´s em uma dialog e por mais que eu coloque na seguencia correta nos recursos ,quando vou no sistema , ele segueme seguencia , mas quando de chega em um bottonBMP não passa dele , simplismente volta para o primeiro GET , alguma dica ? id=quote>id=quote>Legal, você quebrou a segurança do site. Cadastre-se normalmente e crie o mesmo tópico.

O Juvenal estava desempregado há meses. Com a resistência que só os brasileiros têm, o Juvenal foi tentar mais um emprego em mais uma entrevista. Após uma exaustiva entrevista o quinto entrevistado lhe perguntou: - Qual foi seu último salário? - Mil reais! - Respondeu Juvenal, e já ia dizer que aceitava menos. Mas foi interrompido. - Pois se o Sr. for contratado ganhará 10 mil dólares por mês!- Jura? - Que carro o Sr. tem? - Na verdade, agora eu só tenho um fusquinha e um carrinho pra vender pipoca na rua! - Pois se o senhor trabalhar conosco ganhará um Audi para você e uma BMW para sua esposa! - Jura? - O senhor viaja muito para o exterior? - Exterior do estado, sim. Belo Horizonte, São Paulo...... - Pois se o senhor trabalhar aqui viajará pelo menos 10 vezes por ano, para Londres, Paris, Roma, Mônaco, Nova Iorque, Tókio... - Jura? - E lhe digo mais... o emprego é quase seu. Só não lhe confirmo agora porque tenho que falar com meu gerente. Mas é praticamente garantido. Se até amanhã, sexta-feira, à meia-noite o senhor NÃO receber um telegrama nosso cancelando, pode vir trabalhar na segunda-feira!! Juvenal saiu do escritório radiante. Agora era só esperar até a meia-noite da sexta-feira e rezar para que não aparecesse nenhum maldito telegrama. Sexta-feira mais feliz não poderia haver. E Juvenal reuniu a família e contou as boas novas. Não se cabendo de felicidade convocou o bairro todo para um churrasco comemorativo a base de muita música. Sexta de tarde já tinha um barril de chope aberto. Às 9 horas da noite a festa fervia. A banda tocava, o povo dançava, a bebida rolava solta. Dez horas, e a mulher de Juvenal aflita, achava tudo um exagero. A vizinha gostosa, interesseira, já se jogava pra perto do Juvenal. E a banda tocava! E o Chopin gelado rolava! O povo dançava! Onze horas, Juvenal já era o rei do bairro. Gastaria horrores para o bairro encher a pança. Tudo por conta do primeiro salário. E a mulher resignada, meio aflita, meio alegre, meio boba, meio assustada. Onze horas e cinqüenta e cinco minutos........ Vira na esquina buzinando feito louco uma motoca amarela... Era do Correio! A festa parou! A banda calou! Um bêbado arrotou! Um cachorro uivou! Meu Deus, e agora? Quem pagaria a conta da festa? - Coitado do Juvenal! Era a frase mais ouvida. Jogaram água na churrasqueira! O chope esquentou! A mulher do Juvenal desmaiou! A motoca parou! - Senhor Juvenal Batista Romano Barbieri? - Si, si, sim, so, so, sou eu... A multidão não resistiu... - OOOOOHHHHHHHHHHH! - Telegrama para o senhor... Juvenal não acreditava... Pegou o telegrama, com os olhos cheios de água, ergueu a cabeça e olhou para todos. Silêncio total. Respirou fundo e abriu o telegrama. Uma lágrima rolou, molhando o telegrama. Olhou de novo para o povo e a consternação era geral. Tirou o telegrama do envelope, abriu e começou a ler. O povo em silêncio aguardava o desfecho, que poderia virar desenlace. Todos se perguntavam... - E agora? Quem vai pagar essa festa toda? Juvenal recomeçou a ler, levantou os olhos e olhou mais uma vez para o povo que o encarava... Então, Juvenal abriu um largo sorriso, deu um berro triunfal e começou a gritar eufórico. - Mamãe morreeeeuuu! - Mamãe Morreeeeuuu!

O Juvenal estava desempregado há meses. Com a resistência que só os brasileiros têm, o Juvenal foi tentar mais um emprego em mais uma entrevista. Após uma exaustiva entrevista o quinto entrevistado lhe perguntou: - Qual foi seu último salário? - Mil reais! - Respondeu Juvenal, e já ia dizer que aceitava menos. Mas foi interrompido. - Pois se o Sr. for contratado ganhará 10 mil dólares por mês!- Jura? - Que carro o Sr. tem? - Na verdade, agora eu só tenho um fusquinha e um carrinho pra vender pipoca na rua! - Pois se o senhor trabalhar conosco ganhará um Audi para você e uma BMW para sua esposa! - Jura? - O senhor viaja muito para o exterior? - Exterior do estado, sim. Belo Horizonte, São Paulo...... - Pois se o senhor trabalhar aqui viajará pelo menos 10 vezes por ano, para Londres, Paris, Roma, Mônaco, Nova Iorque, Tókio... - Jura? - E lhe digo mais... o emprego é quase seu. Só não lhe confirmo agora porque tenho que falar com meu gerente. Mas é praticamente garantido. Se até amanhã, sexta-feira, à meia-noite o senhor NÃO receber um telegrama nosso cancelando, pode vir trabalhar na segunda-feira!! Juvenal saiu do escritório radiante. Agora era só esperar até a meia-noite da sexta-feira e rezar para que não aparecesse nenhum maldito telegrama. Sexta-feira mais feliz não poderia haver. E Juvenal reuniu a família e contou as boas novas. Não se cabendo de felicidade convocou o bairro todo para um churrasco comemorativo a base de muita música. Sexta de tarde já tinha um barril de chope aberto. Às 9 horas da noite a festa fervia. A banda tocava, o povo dançava, a bebida rolava solta. Dez horas, e a mulher de Juvenal aflita, achava tudo um exagero. A vizinha gostosa, interesseira, já se jogava pra perto do Juvenal. E a banda tocava! E o Chopin gelado rolava! O povo dançava! Onze horas, Juvenal já era o rei do bairro. Gastaria horrores para o bairro encher a pança. Tudo por conta do primeiro salário. E a mulher resignada, meio aflita, meio alegre, meio boba, meio assustada. Onze horas e cinqüenta e cinco minutos........ Vira na esquina buzinando feito louco uma motoca amarela... Era do Correio! A festa parou! A banda calou! Um bêbado arrotou! Um cachorro uivou! Meu Deus, e agora? Quem pagaria a conta da festa? - Coitado do Juvenal! Era a frase mais ouvida. Jogaram água na churrasqueira! O chope esquentou! A mulher do Juvenal desmaiou! A motoca parou! - Senhor Juvenal Batista Romano Barbieri? - Si, si, sim, so, so, sou eu... A multidão não resistiu... - OOOOOHHHHHHHHHHH! - Telegrama para o senhor... Juvenal não acreditava... Pegou o telegrama, com os olhos cheios de água, ergueu a cabeça e olhou para todos. Silêncio total. Respirou fundo e abriu o telegrama. Uma lágrima rolou, molhando o telegrama. Olhou de novo para o povo e a consternação era geral. Tirou o telegrama do envelope, abriu e começou a ler. O povo em silêncio aguardava o desfecho, que poderia virar desenlace. Todos se perguntavam... - E agora? Quem vai pagar essa festa toda? Juvenal recomeçou a ler, levantou os olhos e olhou mais uma vez para o povo que o encarava... Então, Juvenal abriu um largo sorriso, deu um berro triunfal e começou a gritar eufórico. - Mamãe morreeeeuuu! - Mamãe Morreeeeuuu!

Luiz, Nessa condição não tem jeito mesmo. Agora, se for possível, porque você não passa o sistema em clipper para 32b?? Já tem um monte de tópicos sobre esse assunto. Só não dará se você estiver usando alguma LIB em 16 bits sem o equivalente em 32. Um abraço

Luiz, tudo bem?? Quando você diz modo "console", você está querendo dizer xHarbour ??? Ou seria clipper52e + blinker (16 bits) ??? Se for a 1ª opção, o RDD do CDX é do xHarbour, portanto não deveria dar problema algum. Verifique se num deles você está indexando os deletados e no outro não. Se for a 2ª, não é compatível mesmo, pois os RDDs são diferentes. Um abraço Editado por - pauloaraujo on 27/03/2008 11:56:48

O bêbado desce do ônibus, entra logo num boteco e já pede: - Coloca aí dez pinga pra mim! O dono obedeceu e colocou dez pingas para o bêbado, que bebeu todas. - Coloca agora cinco pinga! O dono colocou e o cara bebeu todas. - Agora coloca só três, viu? Bebeu as três num gole só, fez aquela careta típica de pingaiada e pediu: - ZZZZZZsó uma agora! ZZZZZZsó mais uma! O bêbado bebeu aquela, deu uma cambaleada e concluiu: - Eu num to enZenZendo... Quanto menossss eu bebo, mais eu fico tonto!

Vagnão, Dependendo da complexidade do relatório, você teria que passar virtualmente pelos dados só para contar o número de linhas. E depois, processar tudo de novo, mas desta vez imprimindo. Ou seja, cada relatório é uma história. Não sei o porque do Judson querer isso, mas acho que o custo é muito alto pela informação que se obtem. Um abraço

Gente, Eu bebo pouco, mas o pouco que bebo me transforma noutra pessoa. É essa pessoa sim, que bebe prá KCT.

Gente, Eu bebo pouco, mas o pouco que bebo me transforma noutra pessoa. É essa pessoa sim, que bebe prá KCT.

citação:Engolir não, até porque vc não alterou a classe... hehe Abraços, Kleyber Derick xHarbour 1.1.0 + FWH 8.02 (BMW Zerada!!!) + xDevStudio + SQLLIB Visite São Luís - MA A Ilha dos Amores id=quote>id=quote>Kleyber, Sei lá, mas não gosto da tReport por não ter o programa na mão, e esse tópico só confirma isso. Essa variável nTotp será quase impossível de se obter, dependendo das "quebras" no relatório feito na tReport.

Bom, essa eu vou ter que engolir, né?? #include "FiveWin.ch" #include "report.ch" STATIC oReport Function Rep05() LOCAL nPage, nPagina, nTotp MEMVAR nRegistros USE TEST INDEX ON FIRST TO TEST CLOSE ALL USE TEST INDEX TEST NEW GO TOP nRegistros := RecCount() nTotp := int(nRegistros / Recno())-1 REPORT oReport TITLE "*** My First Report ***",; "Date: "+dtoc(date()) ; HEADER "This is the first line of the header", ; "This is the second line of the header", ; "" RIGHT ; FOOTER "Page Number: "+str(oReport:nPage,3) + "/" + ; alltrim(str(nTotp,5,0)) CENTER ; id=red> PREVIEW COLUMN TITLE "St" DATA Test->State COLUMN TITLE "First Name" DATA Test->First COLUMN TITLE "Last Name" DATA Test->Last COLUMN TITLE " Salary" DATA Test->Salary TOTAL END REPORT ACTIVATE REPORT oReport && ON INIT( CONTA( nPagina ) ) CLOSE TEST RETURN NIL id=code> id=code> Editado por - pauloaraujo on 26/03/2008 18:00:37

citação:Senhores, Deixa eu dar um pitaco aqui: o grande problema é que não tem uma forma definida pra se saber o total de páginas em tempo de execução, quando se deve imprimir esse total já na primeira página; outra coisa é que quem determina realmente a quantidade de páginas é a RPreview. Talvez tenha alguma coisa a se fazer por ai... Abraços, Kleyber Derick xHarbour 1.1.0 + FWH 8.02 (BMW Zerada!!!) + xDevStudio + SQLLIB Visite São Luís - MA A Ilha dos Amores id=quote>id=quote>Boa, Kleyber Quanto o João postou que dava para fazer, achei que realmente tinha falado a maior besteira do mundo (hehe). Com a tDos e a tPrinter, daria para fazer, contando os registros que seriam impressos, dividido pelo número de registros que cabem numa folha, +1, se o resto for maior do que zero. Na tReport, acho que só mudando a classe. Um abraço

citação:Ola amigos , como faço para mostrar no meu relatorio o total de paginas , tipo : 1/50 , 2/50 , ... 50/50 , desde ja agradeço ... id=quote>id=quote>Olá Judson Posso estar falando a maior besteira do mundo, mas como não tenho medo, vai lá... Não uso a tReport, mas seja qual for a classe, para chegar a esse "50" que você mostrou no exemplo, você terá que calcular quantas páginas que dará ANTES de imprimir o relatório. Na tDos e tPrinter é só uma questão de programação. Na tReport, sei lá, entende...

Putz, que gelada. Se o carro é financiado, tem seguro, não tem??

Foi nada disso. Consegui abrir, mas bem lento. Só um detalhe que poderia estar provocando isto. A 1ª postagem é maior do que a virada de página do site. Fui

Oi, Luiz Se entendí direito, você está sugerindo que eu cole Fontes no banheiro para entreter o João??? É isso mesmo ??? Pelo jeito, trabalhar que é bom, nada, né???

citação:hahahaha Sabe q. a foto ficou parecida Renato hahahahaha brincadeirinha citação:Ou uma outra alternativa sem envolver MACROSUBSTITUICAO seria: nGets := fCount() for i := 17 to nGets nvlrcampo+=fieldget(i) next id=code>id=code> id=quote>id=quote>Marcelo Ferro Petrópolis - Rj Fwh7.04/xHarbour 99.71/SqlLib /xMate/WS id=quote>id=quote>HAHAHAHAHA Diria até que ficou mais fotogênico.

Amigo, Gerar um arquivo TXT via impressão de relatório é um POG dos bravos. Você não tem domínio nenhum sobre o que está sendo feito. Têm bancos que exigem que se tenha uma marca de final de arquivo e outros que recusam se tiver, além de outros problemas. Gostaria muito de saber daqueles que usam esse método, como eles processam (E SE PROCESSAM) o retorno no banco. O resto, depende do Layout e da Carteira de cada banco. IMP:=0 NOMEARQ="CBTESTE.REM" DO WHIL .NOT. EOF() IMP=IMP+1 IF IMP=1 ARQ=FCREATE(NOMEARQ,0) FCLOSE(ARQ) ARQ=FOPEN(NOMEARQ,2) WHEADER="01REMESSA01COBRANCA ......... WHEADER=WHEADER+CHR(13)+CHR(10) FSEEK(ARQ,0,2) FWRITE(ARQ,WHEADER,402) IMP=IMP+1 ENDIF WDETALHE="1"+SPAC(19)+NUMCART2+CCORRENTE2....... WDETALHE=WDETALHE+CHR(13)+CHR(10) FSEEK(ARQ,0,2) FWRITE(ARQ,WDETALHE,402) IMP=IMP+1 SKIP ENDDO ........ ........ WTRAILER="9"+SPAC(393)+STRZERO(IMP,6,0) WTRAILER=WTRAILER+CHR(13)+CHR(10) FSEEK(ARQ,0,2) FWRITE(ARQ,WTRAILER,402) FCLOSE(ARQ) id=code>id=code> Editado por - pauloaraujo on 20/03/2008 22:03:29