dreamsoft_PR

ola estou com problema aqui em forumulario continuo maior ele para certo mas agora coloquei aquele que tem duas vias que menor tamanho de um boleto digamos assim so que continua pulando estou usando fastreport como limitar a parada do final da folha

hummm.. blz obrigado!!!

hummm... obrigado

exemplo vou deixar umfiltro padrao trazendo sempre 1 mes independe do ano que eles escolher o primeiro dia do mes

ola estou precisando fazer uma rotina que pegue sempre dia 1 de janeiro independe do ano que eles escolher como faço isso

ola estou precisando usar o aggregates do FDQUERY usar so um sei como é mas quero fazer assim o campo valor é o mesmo so que tem outro campo que diz se foi cartao ou dinheiroquero somar o que é cartao e outro dinheiroexemplo do campoVALOR (DOUBLE)TIPO_PAG (STRING ''C'' = CARTAO E ''D'' = DINHEIRO )

ja testei com todos os inner etc... como falei na tab cliente tem varias vezes o mesmo cliente (sao remessa para mobile) mas ja achei uma solucao . obrigado SELECT ( select t.NOME_CLIENTE from TAB_CLIENTE t where t.ID_EMPRESA=21488 AND t.ID_APP_COBRA=2302 AND t.ID_CLIENTE=c.ID_CLIENTE limit 1 ) as NOME_CLIENTE, ( select t.NOME_PLANO from TAB_CLIENTE t where t.ID_EMPRESA=21488 AND t.ID_APP_COBRA=2302 AND t.ID_CLIENTE=c.ID_CLIENTE limit 1) as NOME_PLANO, c.* FROM TAB_LANC_REC c WHERE c.ID_EMPRESA=21488 AND c.ID_APP_COBRA=2302 AND c.REG_STATUS="D"

ola boa noite estou esse problema ja usei outros join etc mais nao deu certo o resultado era pra trazer somente 7 da tabela tab_lanc_rec e porque tem o mesmo cliente na tab_cliente repetido(precisa ser assim porque é tabela de remessa para cobrança mobile)e uma base mysql no resumo tenho 7 cobrancas na tab_lanc_rec quero trazer somente o nome cliente pelo codigo)

Ola pessoal estou precisando fazer seguinte exemplo 132,50 so que quero que saia 132.50 em vez de virgulas por pontos ja tentei FormatFloat('###.##0.000' :=formatfloat('###,###,##0.00' e todos trocando por pontos tambem mais nao esta saindo como quero

o meu da isso sera que mesma coisa?

Ola pessoal, hoje eu uso um componente do elivaldo key que gera chaves para liberar o exe para o cliente so que estou pensando em bolar algo diferente o sistema indo numa base nas nuvens vereficando se cliente esta em dia e liberando sozinho mas tem algum componente em acbr ou algo do tipo para eu gerar chaves criptografadas

ola obrigado, mas de soma e pouco diferente desse, mas ja consegui obrigado

Ola, pessoal estou com uma duvida , nao posso fazer um group by nesse sql quero trazer os clientes que devem mais de 3 mensalidade so que fiz um subselect mais esta trazendo quem deve um os outros sql que tem no where tambem é necessario: WHERE ( C.TIPO_REG ='R' AND C.STATUS='A' AND C.CODCONT IS NOT NULL AND COALESCE(EXTRACT(DAY FROM C.DATA_REMA ) , EXTRACT(DAY FROM C.DATVENC ) ) BETWEEN :DATAVENC_01 AND :DATAVENC02 AND (COALESCE( EXTRACT(month FROM C.DATA_REMA ) , EXTRACT(month FROM C.DATVENC ) ) <=:MES AND COALESCE( EXTRACT(year FROM C.DATA_REMA ) , EXTRACT(year FROM C.DATVENC ) ) <=:ANO)) and ( SELECT (COALESCE(COUNT(E1.ID_REC_PAG),0)) FROM TAB_CONTA_REC_PAG E1 WHERE e.status ='A' and e1.CODCONT IS NOT null and E1.CODCLIE = C.CODCLIE AND E1.STATUS='A' GROUP BY E1.CODCLIE )>=:QTD_PARC

o que poderia ser ?

hum... certo obrigado

humm.. certo digamos que ira cancelar ou mudar os itens depois que confirmou a venda.. vc usa a triger em modo update ? e como vc diferencia se esta sendo modificada para mais ou menos nos itens da venda(em caso de edição ou cancelamento)

minha Procedure: begin if ( :OPE = 'V_N') then begin for select T.codprod, T.qtdprod, p.kitstau from tab_item T left join tab_vend TS on (TS.codvend = t.codvend) left join tab_prod P on (P.codprod = t.codprod) where T.codvend =:codvend into :codprod, :qtdprod, :kit do begin if (KIT = 'N' ) then begin update tab_prod set ESTPRODE = (ESTPRODE - :qtdprod) where codprod =:codprod; end else begin for select i.intkite, i.qtdikit from tab_ikit i where i.codprod =:codprod into :codprod1, :qtdprod1 do update tab_prod set ESTPRODE = (ESTPRODE - (:qtdprod1 * :qtdprod )) where codprod =:codprod1; update tab_prod set ESTPRODE = (ESTPRODE - :qtdprod) where codprod =:codprod; end end end disparo quando ele salva a venda.. mas se abrir ele reabre o estoque e como vc usar essa triger em caso dele editar a venda e mudar os produtos ou deletar

Ola pessoal, eu estou usando procedure para dar baixar no estoque so que sempre tem furado o estoque, como vcs fazem para baixar estoque ou controlar

certo, obrigado e que li no titulo erro ao instalar componente , achei que poderia ter colocado aqui

ola baixei e instalei os componentes so que nao achei mais exemplos do acbrsms ele foi removido ? ja achei me desculpem... ACBR\Exemplos\ACBrSerial

foi atualizar todo , baixei novamente etc... marquei que vou usar o fastreport mas para nesse C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrGNRE\GNRE\Fast\ACBrGNREGuiaFRDM.pas(362) Error: E2003 Undeclared identifier: 'Transparency' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrGNRE\GNRE\Fast\ACBrGNREGuiaFRDM.pas(371) Error: E2003 Undeclared identifier: 'PdfA' C:\Componentes Delphi10\ACBR\Fontes\ACBrDFe\ACBrGNRE\GNRE\Fast\ACBrGNREGuiaFR.pas(2107) Fatal: F2063 Could not compile used unit 'ACBrGNREGuiaFRDM.pas' Compilation failure Erro ao compilar o pacote "ACBr_GNREGuiaFR.dpk". Abortando... Ocorreram erros na compilação dos pacotes.

certo obrigado, me desculpe

coloquei assim, e no usuario e senha coloquei meus dados que uso no site da PF depois que coloquei como estava acima na hora de enviar ou gerar agora da isso

ola pessoal, estou usando seguinte comando {$IFNDEF ACBrNFeOpenSSL} cxDBButtonEdit3.Text := ACBrNFe1.SSL.SelecionarCertificado; {$ENDIF} eu coloquei ja o ACBrNFe1 e ACBrMDFe1 nessa tela é aonde eu so configuro o certificado primeiro so que da esse erro

obrigado , era isso , so que agora deu outro erro