Ir para conteúdo
Seja Membro VIP - Remova Banners de Propagandas, Tenha Liberado Qualquer Download, Além de Acessos em Áreas Exclusivas!! ×
Quer acesso a todas as Áreas do Fórum, até aquelas só para membros VIPs? Também quer poder baixar qualquer ARQUIVO? ×

Batalha

Membros
  • Total de itens

    22
  • Registro em

  • Última visita

Sobre Batalha

  • Data de Nascimento 17-12-1970

Últimos Visitantes

706 visualizações

Conquistas de Batalha

Contribuinte

Contribuinte (4/10)

  • Primeiro Post
  • Colaborador
  • Iniciador de Conversa
  • Primeira Semana Concluída
  • Primeiro Mês Completo

Distintivos Recentes

0

Reputação

  1. Olá João, realmente a fórmula ficou enorme. Eu consegui fazer uma mais enxuta e vou fazer os testes amanhã e te dou retorno, obrigado pela atenção. Abçs.
  2. Bom dia João Desculpe pelos erros básicos, acabei encontrando mais um no 1° bimestre que coloquei o nome de uma variável errado. Mais ainda sim continua dando erro quando mando salvar a fórmula "Número errado de parâmentros"
  3. Olá Pessoal, tenho tentado criar uma formula para o colégio, porém, não tenho muito conhecimento, na verdade praticamente nenhum e peguei como base uma fórmula que já existe e tentei fazer as modificações. No entanto, quando mando salvar diz que existe erro de operando ou operador. Já verifiquei de um lado pra outro e não achei o possível erro, será que alguém poderia me dar uma ajuda, já que ainda não estou adaptado a esta sintaxe. Coloquei também o anexo da fórmula. DECL BIM1, RBIM1, MBIM1, BIM2, RBIM2, MBIM2, BIM3, RBIM3, MBIM3, BIM4, RBIM4, MBIM4, MA, RF, MRF, F1, F4, F7, F10, AD1, AD4, AD7, AD10, RECUP, RESULT, REPROV; ATRIBUI('PERLET', CAMPOTAB(4,'PERLETIVO', 'S')); ATRIBUI('MATALUNO', CAMPOTAB(4, 'MATALUNO', 'S')); SETVAR(BIM1, CAMPOTAB(6,'A1', "V")); SETVAR(RBIM1, CAMPOTAB(6,'A2', "V")); SETVAR(BIM2, CAMPOTAB(6,'A4', "V")); SETVAR(RBIM2, CAMPOTAB(6,'A5', "V")); SETVAR(BIM3, CAMPOTAB(6,'A7', "V")); SETVAR(RBIM3, CAMPOTAB(6,'A8', "V")); SETVAR(BIM4, CAMPOTAB(6,'A10', "V")); SETVAR(RBIM4, CAMPOTAB(6,'A11', "V")); SETVAR(RF, CAMPOTAB(6,'A14', "V")); SETVAR(F1, CAMPOTAB(6,'F1', "V")); SETVAR(F4, CAMPOTAB(6,'F4', "V")); SETVAR(F7, CAMPOTAB(6,'F7', "V")); SETVAR(F10, CAMPOTAB(6,'F10', "V")); SETVAR(AD1, CAMPOTAB(6,'AD1', "V")); SETVAR(AD4, CAMPOTAB(6,'AD4', "V")); SETVAR(AD7, CAMPOTAB(6,'AD7', "V")); SETVAR(AD10, CAMPOTAB(6,'AD10', "V")); GRAVATAB(6,"F0","V",(F1+F4+F7+F10)); GRAVATAB(6, "AD0","V",(AD1+AD4+AD7+AD10)); /*INICIO DO 1° BIMESTRE*/ SE BIM1>0 ENTAO GRAVATAB(6,"A3","V",BIM1) FIMSE; SE(BIM1<7 E RBIM1>0) ENTAO SETVAR(MBIM1, ARREDONDA(BIM1+RMIM1)/2)); /*A3*/ SE FRAC(MBIM1)>0 E <5 ENTÃO SETVAR(MBIM1, (MBIM1 - FRAC(MBIM1))+ 0,5) SENAO SETVAR(MBIM1,(MBIM1-FRAC(MBIM1))+ 1) FINSE; GRAVATB(6,"A3","V",MBIM1) FINSE; /*INICIO DO 2° BIMESTRE*/ SE BIM2>0 ENTAO GRAVATAB(6,"A6","V",BIM1) FIMSE; SE(BIM2<7 E RBIM2>0) ENTAO SETVAR(MBIM2, ARREDONDA(BIM2+RMIM2)/2)); /*A6*/ SE FRAC(MBIM2)>0 E <5 ENTÃO SETVAR(MBIM2, (MBIM2 - FRAC(MBIM2))+ 0,5) SENAO SETVAR(MBIM2,(MBIM2-FRAC(MBIM2))+ 1) FINSE; GRAVATB(6,"A6","V",MBIM2) FINSE; /*INICIO DO 3° BIMESTRE*/ SE BIM3>0 ENTAO GRAVATAB(6,"A9","V",BIM3) FIMSE; SE(BIM3<7 E RBIM3>0) ENTAO SETVAR(MBIM3, ARREDONDA(BIM3+RMIM3)/2)); /*A9*/ SE FRAC(MBIM3)>0 E <5 ENTÃO SETVAR(MBIM3, (MBIM3 - FRAC(MBIM3))+ 0,5) SENAO SETVAR(MBIM3,(MBIM3-FRAC(MBIM3))+ 1) FINSE; GRAVATB(6,"A9","V",MBIM3) FINSE; /*INICIO DO 4° BIMESTRE*/ SE BIM4>0 ENTAO GRAVATAB(6,"A12","V",BIM1) FIMSE; SE(BIM4<7 E RBIM4>0) ENTAO SETVAR(MBIM4, ARREDONDA(BIM4+RMIM4)/2)); /*A12*/ SE FRAC(MBIM4)>0 E <5 ENTÃO SETVAR(MBIM4, (MBIM4 - FRAC(MBIM4))+ 0,5) SENAO SETVAR(MBIM4,(MBIM4-FRAC(MBIM4))+ 1) FINSE; GRAVATB(6,"A12","V",MBIM4) FINSE; /*CALCULANDO MEDIA DE FIM DE ANO E RECUPERAÇÃO*/ SE BIM4>0 ENTAO SETVAR(MBIM1,CAMPOTAB(6,"A3","V")); SETVAR(MBIM2,CAMPOTAB(6,"A6","V")); SETVAR(MBIM3,CAMPOTAB(6,"A9","V")); SETVAR(MBIM4,CAMPOTAB(6,"A12","V")); SETVAR(MA,ARREDONDA((MBIM1+MBIM2+MBIM3+MBIM4)/4); /*A13*/ SE FRAC(MA)>0E<5 ENTAO SETVAR(MA,(MA-FRAC(MA))+ 0,5) SENAO SETVAR(MA,(MA-FRAC(MA))+ 1) FINSE; GRAVATAB(6,"A13","V",MA); SE MA>= 7 ENTAO /*MEDIA ANUAL*/ GRAVATAB(6,"A0","V",MA); GRAVATAB(6,"CONCEITO","S","APROVADO") FINSE; SE MA< 7 ENTAO GRAVATAB(6,"A0","V",MA); GRAVATAB(6,"CONCEITO","S","RECUPERACAO") FINSE; SE (MA<7 E RF>0) ENTAO SETVAR(RF, CAMPOTAB(6,"A14","V")); SETVAR(MRF, ARREDONDA((MA*2)+RF)/3); /*A0 APÓS RECUPERAÇÃO*/ SE FRAC(MRF)>0 E <0,5 ENTAO SETVAR(MRF, (MRF - FRAC(MRF))+ 0,5) SENAO SETVAR(MRF, (MRF - FRAC(MRF))+ 1) FINSE; GRAVATAB(MRF,"A0","V",MRF) FINSE; SE MRF>6 ENTAO GRAVATAB(6,"CONCEITO","S","APROVADO") SENAO GRAVATAB(6,"CONCEITO","S","PROGRESSAO") FINSE FINSE; FORMULA CFSMA.txt
  4. Bom dia Frederico , Estou utilizando a versão 11.51.35.
  5. Boa tarde pessoal Tenho tentado configurar os relatórios para visualizar notas e faltas no portal educacional mas não tenho conseguido material explicativo para tal. Alguém tem algum material, Link ou outro material qualquer onde possa me orientar?
  6. Olá pessoal, realmente o Edson esta com o arquivo correto com algumas diferenças do que eu tenho: /******esta seria a primeira parte que deve ser rodada no banco do RM*********/ /*********manuntecao.sql*******/ set nocount on declare @comando varchar(255) declare @comando1 varchar(255) declare @comando2 varchar(255) declare @comando3 varchar(255) declare @comando4 varchar(255) declare @tabela varchar (100) declare @database varchar (225) declare base cursor for SELECT distinct TABLE_CATALOG FROM INFORMATION_SCHEMA.TABLES open base fetch next from base into @database declare tabelas cursor for select name from sysobjects where type='U' order by name open tabelas fetch next from tabelas into @tabela while @@fetch_status=0 begin print 'Reindexando os indices da Tabela '+ @tabela set @comando = 'dbcc dbreindex ('+@tabela+')' exec (@comando) print '---------------------------------------------' print ' ' print 'Verificando estrututura da tabela '+ @tabela set @comando1 ='dbcc checktable ('+@tabela+')' exec (@comando1) print '---------------------------------------------' print ' ' print 'Verificando espaco alocado na tabela'+@tabela set @comando2= 'dbcc updateusage ('+@database+','+@tabela+')' exec (@comando2) print '---------------------------------------------' print ' ' fetch next from tabelas into @tabela end Print 'Final da Manuntencao' print '*******************************************************************************************' print '**********************************************************************************' print '***************************************************************' close base close tabelas deallocate tabelas deallocate base /*******Aqui começa a segunda a parte a ser rodada*********/ /*********man_database.sql*******/ set nocount on declare @comando varchar(255) declare @comando1 varchar(255) declare @comando2 varchar(255) declare @comando3 varchar(255) declare @comando4 varchar(255) declare @database varchar(100) Print 'Espaco Alocado no database' exec sp_spaceused declare teste cursor for SELECT distinct TABLE_CATALOG FROM INFORMATION_SCHEMA.TABLES open teste fetch next from teste into @database while (@@fetch_status=0) begin EXEC sp_dboption @database, 'trunc. log on chkpt.', 'TRUE' EXEC sp_dboption @database, 'auto create statistics', 'FALSE' EXEC sp_dboption @database, 'auto update statistics', 'FALSE' EXEC sp_dboption @database, 'ANSI null default', 'TRUE' print 'Verificando estrututura no Banco '+ @database set @comando1 ='dbcc checkdb ('+@database+')' exec (@comando1) print '---------------------------------------------' print ' ' print 'Verificando espaco alocado no Banco'+@database set @comando2= 'dbcc checkalloc ('+@database+')' exec (@comando2) print '---------------------------------------------' print ' ' print 'Alocacao '+ @database set @comando3= 'dbcc newalloc ('+@database+')' exec (@comando3) print ' ' print 'Reducao do log '+ @database set @comando4= 'dbcc shrinkdatabase ('+@database+')' exec (@comando4) print ' ' fetch next from teste into @database end close teste deallocate teste Print 'Final da Manuntencao' print '*******************************************************************************************' print '**********************************************************************************' print '***************************************************************' Vlw mesmo pela ajuda.
  7. Ola pessoal Andei procurando por aqui mas não achei o tópico que fala de script que melhora performance do Sql Server. Alguém tem alguma dica?
  8. Batalha

    Seja vip no fórum RM

    Bom dia Jair, é o Banco Badesco, ag: 227 CC 126157-6
  9. Olá pessoal Estou com um problema em uma formula. Quando tento setar o campo média com valor 60 o sistema não aceita e consequentemente quando vai fazer o comparativo de reultado final, acaba aprovando todos os alunos, pois os valores de notas vão de 0 a 100. Já tentei criar uma variável fixa com o valor de 60 mas nem assim consigo adicionar a fórmula. Alguém tem alguma sugestão?
  10. Batalha

    Seja vip no fórum RM

    Jair bom dia. Já fiz transferência para o Bradesco, em quanto tempo eu aceso VIP será liberado? N° doc: 0545483.
  11. Batalha

    Rmcont Dos

    Vlw Jair, vou verificar se tenho acesso as pastas e depois vou postar o resultado. Obrigado.
  12. Batalha

    Rmcont Dos

    Olá Jair,e o XP.
  13. Batalha

    Rmcont Dos

    Bom dia Omar. Vlw pela ajuda, vou verificar se consigo entrar em contato com o pessoal da Totvs e verificar quanto eles cobrariam para solucionar tal problema, já que não consigo ter acesso. Obrigado.
  14. Batalha

    Rmcont Dos

    Bom dia a todos. Estou com um problema, tenho um sistema antigo no escritorio de um amigo, RMCONT DOS, que ao tentar acessar o cliente aparece a menssagem de memória insuficiente, acredito que se trate de BD, porém não tenho certeza e nem sei onde fica este banco, acredito que seja na própria RM (me corrijam se estiver errado). Alguém poderia me dar uma ajuda de como solucionar tal problema, tendo em vista que a RM, possivelmente, não dará mais suporte a esta versão 21.7.
×
×
  • Criar Novo...

Informação Importante

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