Erro no CodeAnalyse

Boa tarde a todos

Estou colocando alguns fontes para validar no codeanalyse, pq tenho que passar o dicionario pro branco, mas me deparei com alguns problemas, dentre eles esta o fonte abaixo. For x := 1 to Len(aCampos)

DbSelectArea("SX3") DbSetOrder(2) DbGotop()

If MsSeek(aCampos[x])

If X3USO(X3_USADO)

Aadd(aCabecalho, {; TRIM(X3_TITULO) ,; //X3Titulo() X3_CAMPO ,; //X3_CAMPO X3_PICTURE ,; //X3_PICTURE X3_TAMANHO ,; //X3_TAMANHO X3_DECIMAL ,; //X3_DECIMAL X3_VALID ,; //X3_VALID X3_USADO ,; //X3_USADO X3_TIPO ,; //X3_TIPO })/ X3_ARQUIVO ,; //X3_F3 X3_CONTEXT ; //X3_CONTEXT/

Endif Endif Next

Return

Como podem ver usava o SX3 para criar uma matriz. Pergunta alguém teria uma solução pra isso?? Pq o o codeanalyse não tem

criado 20 de Jan de 2023
Jose de Aguiar Ferreira Real Neto
358 pontos
editado 20 de Jan de 2023

Você vai ver essas setas em qualquer página de pergunta. Com elas, você pode dizer se uma pergunta ou uma resposta foram relevantes ou não.
Edite sua pergunta ou resposta caso queira alterar ou adicionar detalhes.
Caso haja alguma dúvida sobre a pergunta, adicione um comentário. O espaço de respostas deve ser utilizado apenas para responder a pergunta.
Se o autor da pergunta marcar uma resposta como solucionada, esta marca aparecerá.
Clique aqui para mais detalhes sobre o funcionamento do TOTVS DevForum!

3 respostas

up 0 down
Bom dia a todos

Em outro forum me passaram essa função GetSx3Cache() a qual funcionou muito bem. Grato pela resposta de todos.
- editar
- x
  
  grosseiro ou ofensivo pouco construtivo obsoleto outro...
  Motivo
- criado 25 de Jan de 2023
  Jose de Aguiar Ferreira Real Neto
  358 pontos
Adicionar comentário

Caracteres restantes: 600
Quero acompanhar este tópico via email.

Comentário
Utilize formatação mini-Markdown: [link](http://exemplo.com) _italico_ **negrito** `codigo`.
Comentarios devem ter, no maximo, 600 caracteres. Se achar necessario, utilize links em vez de copiar código ou ainda edite sua pergunta/resposta para colocar mais informações
up 1 down
Olá,

Se seu código tinha o intuito de criar o aHeader de componentes como a MsGetDados, que trabalha junto com a aCols, existe uma função específica para isso chamada FillGetDados, ela tem exatamente essa responsabilidade, de criar as variáveis aHeader e aCols respeitando todas as regras de dicionários, como a de campos em uso e recebe uma quantidade vasta de parâmetros para que seja possível restringir campos e todas as peculiaridades que cada rotina possui.

Recomendo você a refatorar o fonte e verificar a possiblidade de convertê-lo para MVC, pois existem inúmeros ganhos, como pontos de entrada, eventos, APIs etc.

Documentação: https://tdn.totvs.com.br/display/public/framework/FillGetDados
- editar
- x
  
  grosseiro ou ofensivo pouco construtivo obsoleto outro...
  Motivo
- criado 23 de Jan de 2023
  Daniel Mendes
  15419 pontos
- 0
  
  Agradeço Daniel pela sua ajuda, mas nesse momento não tenho como rever esses fontes com esses problemas. Por isso usei a solução abaixo.
  — Jose de Aguiar Ferreira Real Neto 25 de Jan de 2023
Adicionar comentário

Caracteres restantes: 600
Quero acompanhar este tópico via email.

Comentário
Utilize formatação mini-Markdown: [link](http://exemplo.com) _italico_ **negrito** `codigo`.
Comentarios devem ter, no maximo, 600 caracteres. Se achar necessario, utilize links em vez de copiar código ou ainda edite sua pergunta/resposta para colocar mais informações
up 0 down
José, nesse seu caso pelo que entendi é algum objeto MsGetDados, montando um aHeader. Esse objeto está descontinuado. O ideal é mesmo converter a sua tela para usar objetos MVC ou o FwFormBrowser (tem exemplos aqui no fórum). Sei que é um processo mais trabalhoso, mas o programa vai ter mais longevidade usando componentes mais novos.

Como alternativa até daria para carregar os dados usando uma query, porém não conheço tratamento para o X3Uso() quando for uma query.
- editar
- x
  
  grosseiro ou ofensivo pouco construtivo obsoleto outro...
  Motivo
- criado 23 de Jan de 2023
  Cirilo Rocha
  1668 pontos
- 0
  
  Agradeço dr, mas o problema era ter que usar o SX3, pois o codeanalyse da erro se vc usar qualquer tabela do dicionario.
  — Jose de Aguiar Ferreira Real Neto 25 de Jan de 2023
Adicionar comentário

Caracteres restantes: 600
Quero acompanhar este tópico via email.

Comentário
Utilize formatação mini-Markdown: [link](http://exemplo.com) _italico_ **negrito** `codigo`.
Comentarios devem ter, no maximo, 600 caracteres. Se achar necessario, utilize links em vez de copiar código ou ainda edite sua pergunta/resposta para colocar mais informações

Não é a resposta que estava procurando? Procure outras perguntas com as tags codeanalysys codeanalysis codeanalysisexecutado ou faça a sua própria pergunta.