Ir para conteúdo

Jamensson

Membros
  • Total de itens

    140
  • Registro em

  • Última visita

  • Dias Ganho

    3

Tudo que Jamensson postou

  1. Antonio, Se vc estiver querendo autenticar algum aplicativo de terceiro, tente estudar/usar a DLL CPConnect dentro da pasta: C:\CorporeRM\API Usando essa dll vc consegue autenticar um aplicativo feito por você. Coloquei um exemplo. ele tá meio bagunçado mais dá pra entender. 1. Adicione a referencia para CPconnect.dll using System; using System.Windows.Forms; using CPConnect; namespace AuthCorporeRM { public partial class Form1 : Form { public Form1() { InitializeComponent(); } private void Form1_Load(object sender, EventArgs e) { LoginClass login = new LoginClass(); object a,b,c; b = login.ErrorCode; c = login.ErrorMessage; a = null; login.GetAccessParams(false, "CorporeRM", "jmoura", "34de4", "F",ref a, ref b, ref c); //O código '0' indica que a conexão foi efetuada com sucesso. MessageBox.Show(b.ToString()); if (b != (object)0 ) MessageBox.Show(c.ToString()); } } } Abraço, Jamensson
  2. Caro Raul, Eu usei esse sql como parte de um relatório específico da empresa. com esse sql vc pode identificar as notas com rendimentos maiores que 6000 (Pessoa Física ou Jurídica). Espero que te ajude! SELECT DISTINCT F.CODCFO CODCFO$ , F.NOME , F.CGCCFO , DECODE(F.PESSOAFISOUJUR,'F','Fisica','Juridica') FISJUR , T.NUMEROMOV , T.VALORBRUTO , T.IDMOV FROM TMOV T INNER JOIN FCFO F ON (F.CODCOLIGADA = T.CODCOLIGADA AND F.CODCFO = T.CODCFO) INNER JOIN FLAN L ON (L.CODCOLIGADA = T.CODCOLIGADA AND L.IDMOV = T.IDMOV) WHERE T.CODCOLIGADA = :ESPELHO#3 AND T.CODTMV IN ('1.2.19','1.2.04','1.2.05','1.2.10','1.2.12') --Tipos de Movimentos AND F.PESSOAFISOUJUR = 'F' --Pessoa Física ou Jurídica (F ou J) AND L.NFOUDUP <> 2 AND L.PAGREC = 2 AND L.DATABAIXA BETWEEN :DATA_INICIAL_D AND :DATA_FINAL_D --Data de Pagamento para Pessoa Física e Data de Emissão para Pessoa Jurídica AND F.CODCFO IN ( SELECT F.CODCFO FROM TMOV T INNER JOIN FCFO F ON (F.CODCOLIGADA = T.CODCOLIGADA AND F.CODCFO = T.CODCFO) INNER JOIN FLAN L ON (L.CODCOLIGADA = T.CODCOLIGADA AND L.IDMOV = T.IDMOV) WHERE T.CODCOLIGADA = :ESPELHO#3 AND T.CODTMV IN ('1.2.19','1.2.04','1.2.05','1.2.10','1.2.12') --Tipos de Movimentos AND F.PESSOAFISOUJUR = 'F' AND L.NFOUDUP <> 2 AND L.PAGREC = 2 AND L.DATABAIXA BETWEEN :DATA_INICIAL_D AND :DATA_FINAL_D --Data de Pagamento para Pessoa Física e Data de Emissão para Pessoa Jurídica GROUP BY F.CODCFO HAVING SUM(T.VALORBRUTO) > 6000 ) Abraço, Jamensson
  3. Pessoal, Consegui a relação dos códigos do campo TIPOREL da tabela FRELLAN. 1 - IRRF 2 - Adiantamento 1 Lançamento a N Adiantamentos 22 - Adiantamento N Lançamentos a 1Adiantamento 4 - Devolução 5 - INSS 6 - INSS Empregador 9 - Tributo 10 - Geração Tributo 11 - Baixa Parcial 26 - SEST/SENAT 25 - Acredito que seja o vinculo com o Lançamento de DARF(Tipo de Classificação = Gera IRRF e INSS) Espero ter ajudado. Jamensson L. Moura
  4. Jamensson

    Baixa de Título

    Não sei se vc já resolveu o problema... mas a solução é simples: Procure todos os componentes(Cadastro - Condições de Venda - Componente) que utilizam no campo: Tipo Componente = 2 - Princiapal. Esses Componentes não podem ter o Campo Opcional Diferente. Ex.: Componente: CM Antes Entrega Tipo Componente: 4 - Correção Monetária Componente com Valor Opcional do RM FLUXUS 1-Correção Monetária (ValorOp1) Componente: CM Apos Entrega Tipo Componente: 4 - Correção Monetária Componente com Valor Opcional do RM FLUXUS 2-Correção Monetária (ValorOp2) Isso está ERRADO! Dessa forma aparece a sua msg de erro. O Correto seria: Componente: CM Antes Entrega Tipo Componente: 4 - Correção Monetária Componente com Valor Opcional do RM FLUXUS ==> 1-Correção Monetária (ValorOp1) Componente: CM Apos Entrega Tipo Componente: 4 - Correção Monetária Componente com Valor Opcional do RM FLUXUS == > 1-Correção Monetária (Valorop1) Espero que essas informações te ajudem. Jamensson
  5. Qual o seu banco de dados? Sql Server 2000 Sql Server 2005 Oracle Abraço.
  6. É Verdade Athaufo. Toda vez que ligo pro suporte não sabem dizer nada... ai acabo ligando pra um amigo meu que implanta esse módulo.. Tá complicado.
  7. Veja se isso resolve: http://www.ibprovider.com/forum/site/viewtopic.php?t=19
  8. Caro Mauricio, veja se esse passo-a-passo lhe atende: http://www.ibprovider.com/eng/documentation/con_to_ms.html Espero que te ajude.
  9. Vc abriu o arquivo que te mandei? não é relatório. é a configuração dessa tela. se estiver na versão 10.20 primeiro descompacte o arquivo, abra o cadastro de "Bancos e Agências" escolha o processo importar layout. Abranço.
  10. Caro Alan Lopes, vc está querendo o layout da cobrança? não entendi a solicitação. em todo caso segue o arquivo .LBA para cobrança HSBC (CNAB 400). é só importar. Abraço. cob_hsbc.rar
  11. Jamensson

    Cubo de Horas Extras

    Caro Marcelo, Tente Retirar da Sentença DATEPART(DAY,AAFHTFUN.DATA) DIA, Abraço.
  12. Caro Netto, Verifique a tabela XPARCELACOMPONENTE do SGI. identifique a parcela que nessa tabela e compare com que está lançado na FLAN do Fluxus. O problema está entre essas duas tabelas, os valores tem que estar idênticos. Verifique e dê um retorno pra gente. Abraço.
  13. Tente isso: Convert(datetime , :DATA_D) ou convert(varchar(10), :DATA_D ,103)
  14. Esqueci de avisar, estou usando Oracle. Se vc usa Sql Server favor substituir na sentença o que tiver NVL por ISNULL Caso contrário reveja o uso do NVL deve estar faltando algum parâmetro da função Veja se acontece mais algum erro. Abraço.
  15. Renata, Espero que esse relatório lhe atenda. Ajuste segundo a sua necessidade. Abraço, Jamensson GR.002.001_1_Cópia_de_EXTRATO_DE_MOVIMENTACAO_FINANCEIRA_CAIXA_DIARIO.RRM
  16. Caro Rodrigo, Faça o seguinte: 1. Crie uma Tabela Temporária Chamada ZFLAN CREATE TABLE ZFLAN ( CODCOLIGADA SMALLINT NULL, IDLAN SMALLINT NULL, VALOROP4 DECIMAL(9, 3) NULL ) 2. Importe seu arquivo Excel para Tabela ZFLAN 3. Faça o Update considerando a coligada e o idlan UPDATE L SET L.VALOROP4=L1.VALOROP4 FROM FLAN L INNER JOIN ZFLAN L1 ON (L.CODCOLIGADA = L1.CODCOLIGADA AND L.IDLAN = L1.IDLAN) Lembrando que a RM não recomenda que faça update na tabela FLAN. Teste o sql antes de coloca-lo em produção. Abraço, Jamensson
  17. Já faz algum tempo que não utilizo Sql Server. Encontrei um artigo que pode te ajudar nesse problema e em outros. http://worldofbit.com/wob/index.php?option...5:sql&Itemid=58 Espero que te ajude.
  18. Pessoal, Estive quebrando a cabeça para encontrar uma solução para rastrear os lançamentos pagos parcialmente e gostaria de compartilhar a solução que encontrei. Acredito que possa ser usado não só para o Fluxus mas também para outros sistemas como o Nucleus. SELECT L.IDLAN AS REF , L.DATAVENCIMENTO AS VENCIMENTO , L.DATABAIXA AS DATA_BAIXA FROM FLAN L LEFT OUTER JOIN FTDO D ON (D.CODCOLIGADA = L.CODCOLIGADA AND D.CODTDO = L.CODTDO) WHERE L.IDLAN IN (SELECT TO_NUMBER(SUBSTR(SCBP,1,INSTR(SCBP,'.')-1)) B FROM (SELECT R1.IDLAN,LTRIM(SYS_CONNECT_BY_PATH(R1.IDLANREL,'.'),'.') ||'.' SCBP FROM FRELLAN R1 WHERE R1.CODCOLIGADA = :ESPELHO#3 AND R1.TIPOREL = 11 CONNECT BY PRIOR R1.IDLAN = R1.IDLANREL ) WHERE IDLAN = :ESPELHO#2) AND L.CODCOLIGADA = :ESPELHO#3 AND L.STATUSLAN <> 2 AND D.EDEVOLUCAO NOT IN (1,2,3,4) --Adiantamentos ORDER BY L.IDLAN, L.NUMERODOCUMENTO --Melhorei um pouco a query A principal mudança está no campo R1.TIPOREL da tabela FRELLAN, cada código é um tipo de relacionamento. Segue tabela com os códigos. =================================== 1 - IRRF 2 - Adiantamento (1 Lançamento a N Adiantamentos) 22 - Adiantamento (N Lançamentos a 1 Adiantamento) 4 - Devolução 5 - INSS 6 - INSS Empregador 9 - Tributo 10 - Geração Tributo 11 - Baixa Parcial 26 - SEST/SENAT =================================== Essa tabela também pode ser encontrada no link: Variáveis Internas do Corpore Essa solução é para quem usa Oracle. Qualquer dúvida é só postar! Abraço.
  19. Tem problema em incluir um "Depósito Manual" no extrato e no histórico colocar que foi Implantação de Saldo? Acho que dessa forma resolve o problema. Jamensson L. Moura
  20. Cara, tem uma ferramenta muito boa chamada "Toad for SQL" ele tem alguns utilitários para comparar tanto Banco de Dados inteiro como Tabelas. Vale a pena baixar e analisar. Caso o seu banco seja Oracle também existe uma versão "Toad for Oracle". Abraço, Jamensson
  21. Já tentou usar Aditivo? Pelo que entendi isso ai é um aditivo, o contrato será alterado: novas parcelas com novos valores. MENU: Vendas/Cobrança - Aditivo Selecione as parcelas que deseja fazer o aditivo, cadastre os novos componentes de acordo com o desejado "Fizemos um acordo onde ele irá pagar R$ 200,00 e a diferença será rateada nas demais parcelas, ou seja, a partir da 17 parcela, o valor será de R$ 500 + (300/19)." e depois confirme o aditivo. O sistema vai cancelar as parcelas antigas e gerar as novas com essa configuração. Acredito que isso resolva seu problema. Atenciosamente, Jamensson
  22. Caro Galdino, Tente: Where SUM(TITMLOTEPRD.QUANTIDADE2) > 0 ou então suba um nível: SELECT X.* FROM ( SELECT TMOV.DATASAIDA AS DATA, TLOTEPRD.CODCFO AS COD_PRODUTOR, TMOV.CODFILIAL AS FILIAL, UPPER(FCFO.NOME) AS NOME_PRODUTOR, SUM( TITMLOTEPRD.QUANTIDADE2) AS QUANTIDADE, SUM ( TITMMOV.VALOROPFRM1 ) AS VOLUMES, TPRD.CODIGOPRD AS COD_PRO, TMOV.NUMEROMOV AS DOCUMENTO, (SUBSTRING (TTMV.NOME,17,40)+' _ '+ TTMV.CODTMV ) AS OPERAÇÃO, TPRD.NOMEFANTASIA AS DESCRICAO_PRODUTO, CASE WHEN TLOTEPRDCOMPL.SAFRA IS NULL THEN '--' WHEN TLOTEPRDCOMPL.SAFRA IS NOT NULL THEN TLOTEPRDCOMPL.SAFRA END AS SAFRA, TLOTEPRD.NUMLOTE AS LOTE, TLOTEPRD.NUMLOTE AS LOTE_TOTAL, CASE WHEN TMOV.CAMPOLIVRE1 IS NULL THEN '--' WHEN TMOV.CAMPOLIVRE1 IS NOT NULL THEN TMOV.CAMPOLIVRE1 END AS PROCEDENCIA, CASE WHEN TLOTEPRD.CAMPOLIVRE1 IS NULL THEN '--' WHEN TLOTEPRD.CAMPOLIVRE1 IS NOT NULL THEN TLOTEPRD.CAMPOLIVRE1 END AS LOCALIZACAO, TLINHA.DESCRICAO AS BEBIDA, TCOLUNA.DESCRICAO AS UMIDADE_PENEIRA, TCOLUNA.DESCRICAO AS UMID_PEN_TOTAL, TTMV.CODTMV AS TIPO_MOV FROM FCFO, TITMLOTEPRD, TITMMOV, TLOTEPRD, TMOV,TTMV,TPRD,TLOTEPRDCOMPL, TGRADE, TCOLUNA, TLINHA WHERE TMOV.CODCOLIGADA='2' AND TMOV.CODCOLIGADA=TITMMOV.CODCOLIGADA AND TMOV.CODCOLIGADA=TITMLOTEPRD.CODCOLIGADA AND TMOV.IDMOV=TITMMOV.IDMOV AND TITMMOV.IDMOV=TITMLOTEPRD.IDMOV AND TITMLOTEPRD.NSEQITMMOV= TITMMOV.NSEQITMMOV AND TLOTEPRD.CODCFO=FCFO.CODCFO AND TLOTEPRD.IDLOTE=TITMLOTEPRD.IDLOTE AND TLOTEPRD.CODCOLIGADA=TITMLOTEPRD.CODCOLIGADA AND TTMV.CODTMV=TMOV.CODTMV AND TTMV.CODCOLIGADA=TMOV.CODCOLIGADA AND TPRD.IDPRD=TITMMOV.IDPRD AND TITMMOV.CODCOLIGADA=TPRD.CODCOLIGADA AND TLOTEPRD.CODCOLIGADA*=TLOTEPRDCOMPL.CODCOLIGADA AND TLOTEPRD.IDLOTE*=TLOTEPRDCOMPL.IDLOTE AND TPRD.CODLINHA IS NOT NULL AND TPRD.CODCOLUNA IS NOT NULL AND TGRADE.CODCOLIGADA=TMOV.CODCOLIGADA AND TGRADE.CODCOLIGADA=TCOLUNA.CODCOLIGADA AND TGRADE.CODCOLIGADA=TLINHA.CODCOLIGADA AND TGRADE.IDGRD=TCOLUNA.IDGRD AND TGRADE.IDGRD=TLINHA.IDGRD AND TPRD.CODLINHA=TLINHA.CODIGO AND TPRD.CODCOLUNA=TCOLUNA.CODIGO AND TGRADE.IDGRD=TPRD.IDGRD AND TLOTEPRD.IDLOTE =TITMLOTEPRD.IDLOTE GROUP BY TMOV.DATASAIDA, TLOTEPRD.CODCFO, FCFO.NOME, TMOV.NUMEROMOV, TTMV.NOME, TPRD.NOMEFANTASIA, TPRD.CODLINHA, TPRD.CODIGOPRD, TLOTEPRDCOMPL.SAFRA, TLOTEPRD.NUMLOTE, TLOTEPRD.CAMPOLIVRE1, TMOV.CAMPOLIVRE1, TPRD.CODCOLUNA, TLINHA.DESCRICAO, TCOLUNA.DESCRICAO, TMOV.CODFILIAL, TTMV.CODTMV ) X WHERE X.QUANTIDADE > 0 Atenciosamente, Jamensson
  23. Valeu Cristie! estava quebrando a cabeça para achar o erro e vc acertou na mosca. Abraço.
×
×
  • Criar Novo...

Informação Importante

Usando este site, você concorda com nossos Termos de Uso e nossa Política de Privacidade.