Ir para conteúdo

Lançamento De Notas


Posts Recomendados


  • Tópicos Que Criei:  2
  • Tópicos/Dia:  0.00
  • Meu Conteúdo:  5
  • Conteúdo/Dia:  0.00
  • Reputação:   0
  • Pontos/Conquistas:  45
  • Conteúdo Resolvido:  0
  • Dias Ganho:  0
  • Status:  Offline

Pessoal,

Ao lançar o diário de classe referente a uma turma, ocorre um erro de GRAVATAB. não consigo identificar o que esta acontecendo, poderiam me ajudar por favor? Obrigada!

Lançamento de notas -Classis versao 11.40.rar

Link para comentar
Compartilhar em outros sites


  • Tópicos Que Criei:  6
  • Tópicos/Dia:  0.00
  • Meu Conteúdo:  290
  • Conteúdo/Dia:  0.06
  • Reputação:   17
  • Pontos/Conquistas:  1.523
  • Conteúdo Resolvido:  0
  • Dias Ganho:  12
  • Status:  Offline

Bom dia ... poderia postar a formula?

Link para comentar
Compartilhar em outros sites


  • Tópicos Que Criei:  11
  • Tópicos/Dia:  0.00
  • Meu Conteúdo:  1.140
  • Conteúdo/Dia:  0.22
  • Reputação:   60
  • Pontos/Conquistas:  6.161
  • Conteúdo Resolvido:  0
  • Dias Ganho:  33
  • Status:  Offline
  • Idade:  42
  • Dispositivo:  Windows

Daniela,

Quais os testes que você já realizou ?

[]'s

Link para comentar
Compartilhar em outros sites


  • Tópicos Que Criei:  2
  • Tópicos/Dia:  0.00
  • Meu Conteúdo:  5
  • Conteúdo/Dia:  0.00
  • Reputação:   0
  • Pontos/Conquistas:  45
  • Conteúdo Resolvido:  0
  • Dias Ganho:  0
  • Status:  Offline

boa tarde,

segue a formula:

ATRIBUI('MATALUNO',CAMPOTAB(6,'MATALUNO','S'));

ATRIBUI('CODCUR',CAMPOTAB(6,'CODCUR','V'));

ATRIBUI('CODPER',CAMPOTAB(6,'CODPER','V'));

ATRIBUI('CODMAT',CAMPOTAB(6,'CODMAT','S'));

EXECSQL ('FOR0301');

FOR ('01.06.01');

FOR ('01.06.02');

FOR ('01.06.03');

FOR ('01.06.04');

ATRIBUI('VNNOTA',RESULTSQL('FOR0301','MEDIA'));

ATRIBUI('VNAULA',SOMAAULASDISCFILHAS(0));

ATRIBUI('VNFALTA',RESULTSQL('FOR0301','FALTA'));

ATRIBUI('VSTATUS',CAMPOTAB(4,'STATUS','S'));

ATRIBUI('VNNULO',RESULTSQL('FOR0301','NULO'));

SE (MEMORIA('VSTATUS') = '2' OU MEMORIA('VSTATUS') = '3' OU MEMORIA('VSTATUS') = '9' OU MEMORIA('VSTATUS') = '10' OU MEMORIA('VSTATUS') = '14' OU MEMORIA('VSTATUS') = '15')

ENTAO GRAVATAB(6,'STATUS','S',MEMORIA('VSTATUS') );

GRAVATAB(6,'A0','V',MEMORIA('VNNOTA') );

GRAVATAB(6,'A1','V',MEMORIA('VNNOTA') );

GRAVATAB(6,'AD0','V',MEMORIA('VNAULA') );

GRAVATAB(6,'AD1','V',MEMORIA('VNAULA') );

GRAVATAB(6,'F0','V',MEMORIA('VNFALTA') );

GRAVATAB(6,'F1','V',MEMORIA('VNFALTA') )

SENAO

SE (MEMORIA('VNNOTA') >= 70) ENTAO

GRAVATAB(6,'STATUS','S','7');

GRAVATAB(6,'A0','V',MEMORIA('VNNOTA') );

GRAVATAB(6,'A1','V',MEMORIA('VNNOTA') );

GRAVATAB(6,'AD0','V',MEMORIA('VNAULA') );

GRAVATAB(6,'AD1','V',MEMORIA('VNAULA') );

GRAVATAB(6,'F0','V',MEMORIA('VNFALTA') );

GRAVATAB(6,'F1','V',MEMORIA('VNFALTA') )

SENAO

SE (MEMORIA('VNNULO') = -1) ENTAO

GRAVATAB(6,'STATUS','S','1');

GRAVATAB(6,'A0','V',MEMORIA('VNNOTA') );

GRAVATAB(6,'A1','V',MEMORIA('VNNOTA') );

GRAVATAB(6,'AD0','V',MEMORIA('VNAULA') );

GRAVATAB(6,'AD1','V',MEMORIA('VNAULA') );

GRAVATAB(6,'F0','V',MEMORIA('VNFALTA') );

GRAVATAB(6,'F1','V',MEMORIA('VNFALTA') )

SENAO

GRAVATAB(6,'STATUS','S','4');

GRAVATAB(6,'A0','V',MEMORIA('VNNOTA') );

GRAVATAB(6,'A1','V',MEMORIA('VNNOTA') );

GRAVATAB(6,'AD0','V',MEMORIA('VNAULA') );

GRAVATAB(6,'AD1','V',MEMORIA('VNAULA') );

GRAVATAB(6,'F0','V',MEMORIA('VNFALTA') );

GRAVATAB(6,'F1','V',MEMORIA('VNFALTA') )

FIMSE

FIMSE

FIMSE;

MEMORIA('VSTATUS')

Link para comentar
Compartilhar em outros sites


  • Tópicos Que Criei:  11
  • Tópicos/Dia:  0.00
  • Meu Conteúdo:  1.140
  • Conteúdo/Dia:  0.22
  • Reputação:   60
  • Pontos/Conquistas:  6.161
  • Conteúdo Resolvido:  0
  • Dias Ganho:  33
  • Status:  Offline
  • Idade:  42
  • Dispositivo:  Windows

Daniela,

Vi que na sua fórmula ela executa uma SQL poderia postar a SQL para conseguir testar a fórmula.

[]'s

Link para comentar
Compartilhar em outros sites

  • 2 semanas depois...

  • Tópicos Que Criei:  2
  • Tópicos/Dia:  0.00
  • Meu Conteúdo:  5
  • Conteúdo/Dia:  0.00
  • Reputação:   0
  • Pontos/Conquistas:  45
  • Conteúdo Resolvido:  0
  • Dias Ganho:  0
  • Status:  Offline

Olá Frederico!segue a sentença sql solicitada:

SELECT DISTINCT CASE WHEN ISNULL(CAST(AVG(A.A0) AS NUMERIC(9,0)),-1) = -1 THEN 0 ELSE CAST(AVG(A.A0) AS NUMERIC(9,0)) END AS MEDIA,

SUM(A.F0) AS FALTA,

ISNULL(CAST(AVG(A.A0) AS NUMERIC(9,0)),-1) AS NULO

FROM UMATTURMA AS T (NOLOCK)

INNER JOIN UMATALUN AS A (NOLOCK)

ON A.CODCUR = T.CODCUR

AND A.CODPER = T.CODPER

AND A.CODMAT = T.CODMAT

WHERE T.CODCUR = :FRM_01.06.02

AND T.CODPER = :FRM_01.06.03

AND T.MATERIAPAI = :FRM_01.06.04

AND A.MATALUNO = :FRM_01.06.01

AND A.STATUS <> 12

AND T.MATERIAPAI NOT IN (

SELECT DISTINCT T.MATERIAPAI

FROM UMATTURMA AS T (NOLOCK)

INNER JOIN UMATALUN AS A (NOLOCK)

ON A.CODCUR = T.CODCUR

AND A.CODPER = T.CODPER

AND A.CODMAT = T.CODMAT

WHERE T.CODCUR = :FRM_01.06.02

AND T.CODPER = :FRM_01.06.03

AND T.MATERIAPAI = :FRM_01.06.04

AND A.MATALUNO = :FRM_01.06.01

AND A.STATUS <> 12

AND A.A0 IS NULL

)

Muito Obrigada!

Editado por Daniela Mares Macedo
Link para comentar
Compartilhar em outros sites

Participe da conversa

Você pode postar agora, e se registrar mais tarde. Se você tiver uma conta, faça o login agora para postar com sua conta.

Visitante
Responder esse tópico

×   Você colou conteúdo com formatação.   Remover formatação

  Only 75 emoji are allowed.

×   Seu link foi automaticamente inserido no corpo do post.   Exibir como um link

×   Seu conteúdo anterior foi restaurado.   Limpar conteúdo do editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Criar Novo...

Informação Importante

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