Jump to content
Fivewin Brasil

edutraini

Membros
  • Posts

    1,401
  • Joined

  • Last visited

  • Days Won

    30

Everything posted by edutraini

  1. Bom dia, Pessoal Gostaria de uma opiniao de vcs que usam sql em Nuvens Em um determinado programa assim que o usuario entra devo carregar todos as tabelas que serão usados dentro daquela rotina ou devo carregar a tabela conforme for sendo solicitado Não sei se isso muda alguma coisa em relação ao sql Obrigado
  2. Kapi boa tarde Primeiramente vai curinthians eu achei isso aqui nas minhas rotinas ele muda a resolucao do programa e quando sai volta ao normal do windows // http://forums.fivetechsupport.com/viewtopic.php?f=6&t=9865&start=15 // By Marcelo Gomes e Yuri Marcelino #include 'fivewin.ch' #Include "dll.ch" #Include "Struct.ch" FUNCTION MAIN_reso() LOCAL nResoAncho := GetSysMetrics(0) IF nResoAncho > 800 CamReso ( 1024, 768 ) * MSGINFO('HECHO. AQUI PUEDES INICIAR TU PROGRAMA ELABORADO PARA 1024 X 768') ELSEIF nResoAncho <= 800 .AND. ISWINXP() CamReso ( 800, 600 ) ENDIF RETURN NIL FUNCTION CamReso(nAncho, nAlto) Local DM_PELSWIDTH := nHex("80000") Local DM_PELSHEIGHT := nHex("100000") Local oDevMode Local lPosible Local cBuffer Local lCamReso := .f. DEFAULT nAncho := GetSysMetrics(0), ; nAlto := GetSysMetrics(1) STRUCT oDevMode MEMBER cDevName AS STRING LEN 32 MEMBER nSpecVer AS WORD MEMBER nDrvVer AS WORD MEMBER nSize AS WORD MEMBER nDrvExtra AS WORD MEMBER nFields AS DWORD MEMBER nOrientat AS WORD MEMBER nPaperSiz AS WORD MEMBER nPaperLen AS WORD MEMBER nPaperWid AS WORD MEMBER nScale AS WORD MEMBER nCopies AS WORD MEMBER nDefSrc AS WORD MEMBER nPrnQlty AS WORD MEMBER nColor AS WORD MEMBER nDuplex AS WORD MEMBER nYResolut AS WORD MEMBER nTTOpt AS WORD MEMBER nCollate AS WORD MEMBER cFormName AS STRING LEN 32 MEMBER nUnusePad AS WORD MEMBER nBitsPPel AS DWORD MEMBER nPelWidth AS DWORD MEMBER nPelHeigh AS DWORD MEMBER nDisFlags AS DWORD MEMBER nDisFreq AS DWORD ENDSTRUCT cBuffer := oDevMode:cBuffer lPosible := EnumDisplaySettings(0, 0, @cBuffer) IF lPosible oDevMode:nFields := nOr(DM_PELSWIDTH, DM_PELSHEIGHT ) oDevMode:nPelWidth := nAncho oDevMode:nPelHeigh := nAlto cBuffer:=oDevMode:cBuffer TRY ChangeDisplaySettings(@cBuffer, 4) lCamReso := .T. CATCH MsgAlert("Modo no soportado", "Error" ) END else MsgAlert("Modo no soportado", "Error" ) endif return lCamReso DLL32 FUNCTION EnumDisplaySettings(lpszDeviceName AS DWORD,; iModeNum AS DWORD, ; @lpDevMode AS LPSTR) AS BOOL PASCAL; FROM "EnumDisplaySettingsA" LIB "User32.dll" DLL32 STATIC FUNCTION ChangeDisplaySettings(@lpDevMode AS LPSTR,; dwFlags AS DWORD) AS DWORD PASCAL; FROM "ChangeDisplaySettingsA" LIB "User32.dll" DLL32 FUNCTION ExitWindowsEx(uFlags AS DWORD,; dwReserved AS DWORD) AS DWORD PASCAL; LIB "user32.dll" DLL32 STATIC FUNCTION BlockInput( lTrava AS BOOL ) AS BOOL LIB "User32.DLL"
  3. Bom dia Kapi Mando essa mensagem no rmail so queria saber se tem como diferenciar as fontes do texto 'Você está recebendo um boleto emitido por Aços Ltda.' uma fonte 'Vencimento: : '+DTOC(vDtVencim) outra fonte Tipo negrito ou fonte maior nMensagem1 = 'Olá, '+upper(vNomecli)+CRLF+CRLF+; 'Você está recebendo um boleto emitido por Aços Ltda.'+CRLF+; 'Seguem abaixo as informações do boleto:'+CRLF+; 'Nome: '+vNomecli+CRLF+; 'Nota Fiscal : '+STR(vNrodupl,7)+CRLF+; 'Vencimento: : '+DTOC(vDtVencim)+CRLF+; 'Valor: R$ : '+TRANS(vVlrDupl,"9,999,999.99")+CRLF+; 'Você pode realizar o pagamento em qualquer banco, na lotérica, nos canais digitais do seu banco (internet banking) ou app de pagamento.'+CRLF+; 'Em caso de dúvidas, é só entrar em contato, estamos a inteira disposição!'+CRLF+CRLF+; 'Atenciosamente,'+CRLF+; 'André Oliveira'+CRLF+; 'Aços Especiais Iguatemi Ltda '+CRLF+; 'Tel (11) 2954-3000 - DDR 2207-6778 '+CRLF+; 'A disposição para qualquer esclarecimento,'+CRLF+; 'Cordiais saudações,'+CRLF+CRLF
  4. Boa tarde Pessoal Sera que tem como mudar a fonte do texto que vai no email usando o rmail Tipo sublinhado, fonte maior Obrigado
  5. Bom dia Pessoal Hoje e uso o sumatra para ler documentos em Pdf Uma duvida Existe alguma forma de mandar um comando usando o sumatra para transformar um relatorio em txt para pdf via linha de comando ou alguma outra ferramenta Obrigado
  6. Boa tarde, Pessoal Meu cloud na localweb esta caindo toda hora, nao sei oque esta acontecendo nos serviços da localweb mas esta caindo todo dia ALguem tem alguma susgestao de outro cloud Obrigado
  7. Boa tarde Eu coloquei essa mensagem acima referente de emissao de nota serviço pelo App mas se tiver outra solucao para a prefeitura da cidade Taboão da Serra-SP eu agradeço
  8. Boa pessoal Alguem ja fez integração de Nota de Serviço com esse site https://desenvolvedores.migrate.info/2014/03/como-integrar-invoicy-nfse/ Obrigado
  9. O problema esta em algumas internet Os clientes plugaram na internet do celular e conseguiram transmitir ou seja algum protocolo da internet fixa esta com problema
  10. Bom dia Pessoal Alguns clientes estao relatando esse erro na transmissao da nota eletronica Sera que o problema é no sefaz ou na internet 5011 - Erro: Falha na conexão: Mensagem Erro do Windows=[Server was unable to process request. ---> The type initializer for 'Sefaz.NFe.Lib.Conf.Configuration' threw an exception. ---> A network-related or instance-specific error occurred while establishing a connection to SQL Server. The server was not found or was not accessible. Verify that the instance name is correct and that SQL Server is configured to allow remote connections. (provider: Named Pipes Provider, error: 40 - Could not open a connection to SQL Server) ---> The network path was not found] (Causa provável: Causa provável da falha na conexão: Rede indisponível)
  11. Entao esta ai o problema Sqlexpress o resultado e diferente do mysql
  12. boa tarde Junior nao e campo memo e caracter e tambem se fosse campo memo GROUP BY nao aceita esse tipo campo
  13. Bom dia Junior EU entendi oque vc me passou mas ai minha duvida é que se eu nao colocar o campo observacao no group by ele da essa mensagem no manager studio Mensagem 8120, Nível 16, Estado 1, Linha 1 A coluna 'dpropro0.OBSERVACAO ' é inválida na lista de seleção porque não está contida em uma função de agregação nem na cláusula GROUP BY.
  14. Boa tarde Pessoal Obrigado pela ajuda para usar o group vc precisa colocar todos os campos que estao na select senao ele nao funciona Eu descobri se algum campo que esta na select tiver diferente dentro do grupo ele quebra exemplo campo observacao esta diferente ai ele nao consegue juntar SELECT lote,, tipo, secao, SUM(estoqatual) as total, observacao FROM dpropro0 WHERE tipo = "51200" GROUP BY lote, tipo, secao, observacao ORDER BY LOTE, SEQ, TIPO, SECAO Lote | seq | tipo de aco | secao | estqatual | observacao 001-001-01-01 | 001 | 52100 | redondo | 100.00 | AMARELO 001-001-01-01 | 002 | 52100 | redondo | 200.00 | VERDE 001-001-01-01 | 003 | 52100 | redondo | 150,00 | AZUL se eu tirar o campo observacao da select ai funciona nao sei se tem algum parametro dentro group que consiga colocar as chaves exemplo somente lote,tipo,secao
  15. Bom dia, Pessoal Estou com uma dificuldade em um select usando o group tenho uma tabela de produtos conforme exemplo abaixo select lote,tipo,secao,bitola,acab,sum(estqatual) as estqatual,codipi,tributo,tratamento,local,compriment,comprimenf,local,bitola1,bitola2,cod_item_k FROM dpropro0 where tipo = '52100' and COALESCE(dpropro0.SR_DELETED,' ') <> 'T' GROUP BY lote,tipo,secao,bitola,acab,estqatual,codipi,tributo,tratamento,local,compriment,comprimenf,local,bitola1,bitola2,cod_item_k ORDER BY tipo,secao,bitola Lote | seq | tipo de aco | secao | estqatual | e outros campos 001-001-01-01 | 001 | 52100 | redondo | 100.00 | 001-001-01-01 | 002 | 52100 | redondo | 200.00 | 001-001-01-01 | 003 | 52100 | redondo | 150,00 | Gostaria de jogar no browse somente a soma do estoque de cada lote lote | tipo de aco | secao |estqatual 001-001-01-01 | 52100 | redondo | 450,00 mas o resultado ainda vem como 001-001-01-01 | 001 | 52100 | redondo | 100.00 | 001-001-01-01 | 002 | 52100 | redondo | 200.00 | 001-001-01-01 | 003 | 52100 | redondo | 150,00 | talvez por causa de varios campos no group Ai vem a pergunta estou usando o comando errado ou exite alguma outra forma Agradeço muito Edu
  16. Bom dia Kapi Estou tentando colocar a rotina de backup que vc passou aqui no forum e ta dando erro EXTERNAL HB_ZIPFILECR32, UNZIPOPEN ETC Poderia dar uma dica de como arrumar isso Obrigado e vai curinthians
  17. Obrigado Marcelo Resolvido
  18. Boa tarde Pessoal Tenho um tela feita com xbrowse e array aonde mostra as cotacoes que sao feitas diariamente Um cliente me pediu para deixar on line ou seja cada vez que alguem fizer uma cotacao essa tela tem que atualizar ou seja tenho que gerar um array novamente Hoje eu fecho a tela de cotacao e abro de novo Existe alguma forma de fazer isso automaticamente
  19. Bom dia pessoal Eu uso o rmail para envio de emails funcionando perfeitamente Um cliente louco tem 5 contas no outlook para envio de emails A pergunta tem como mandar algum parametro dentro do rmail para ele selecionar automaticamente o remetente
×
×
  • Create New...