Acesso indevido dicionário

Fiz a correção referente aos erros de acesso aos SX's, porém o erro continua aparecendo no codeaAnalysis. Por favor, verificarem o que está errado na correção do acesso ao dicionário?

Segue trecho do código corrigido.

//Abrir a tabela SX3 OpenSxs(,,.F.,.F.,cEmpAnt,"SX3TMP","SX3") SX3TMP->( dbSelectArea("SX3TMP") ) SX3TMP->( dbSetOrder(2) )SX3TMP->(MsSeek("C7_OK")) AAdd(aCab,SX3TMP->X3_TITULO) Aadd(aCampos,{SX3TMP->X3_CAMPO,SX3TMP->X3_TIPO,SX3TMP->X3_CONTEXT,SX3TMP->X3_PICTURE}) aadd(aTamCab,CalcFieldSize(SX3TMP->X3_TIPO,SX3TMP->X3_TAMANHO,SX3TMP->X3_DECIMAL,SX3TMP->X3_PICTURE,SX3TMP->X3_TITULO))

criado 25 de Jul de 2019
Gesi Leite
4 pontos
editado 25 de Jul de 2019

0

Boa tarde Gesi, você está utilizando desse código para montar o aHeader de alguma rotina?
— Daniel Mendes 25 de Jul de 2019

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!

2 respostas

up 0 down
Gesi, Verifique se algumas dessas classes te ajuda no que você precisa.

http://tdn.totvs.com/display/PROT/Classes
- editar
- x
  
  grosseiro ou ofensivo pouco construtivo obsoleto outro...
  Motivo
- criado 25 de Jul de 2019
  FELIPE CAIADO ALMEIDA
  3716 pontos
- 0
  
  o Link esta fora agora
  — Fabio William OIiveira 10 de Oct 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
Boa tarde, Gesi!

Acredito que o sistema esteja gerando um falso positivo, devido ao fato dele ter encontrado os caracteres ->X3_TITULO.

Tive um problema similar usando uma query com a SX5, e corrigi trocando o nome da coluna na query.

Quanto ao seu problema na SX3, eu passei por uma situação similar e corrigi usando a classe FwSx3Util e a função GetSx3Cache. Segue exemplo abaixo:
```
_cAlias := 'ZD3'

_aCpoSX3 := FwSX3Util():GetAllFields(_cAlias)

_cAcols    := "ZD3_COD/ZD3_DESCRI/ZD3_UM"

For i := 1 To Len(_aCpoSX3)

    If(X3Uso(GetSx3Cache(_aCpoSX3[i], 'X3_USADO')) .And. AllTrim(GetSx3Cache(_aCpoSX3[i], 'X3_CAMPO')) $ _cAcols)

        nUsado++

        aAdd(_aHeader, {AllTrim(GetSx3Cache(_aCpoSX3[i], 'X3_TITULO')),;
                        AllTrim(GetSx3Cache(_aCpoSX3[i], 'X3_CAMPO')),;
                        GetSx3Cache(_aCpoSX3[i], 'X3_PICTURE'),;
                        GetSx3Cache(_aCpoSX3[i], 'X3_TAMANHO'),;
                        GetSx3Cache(_aCpoSX3[i], 'X3_DECIMAL'),;
                        "AllWaysTrue()",;
                        GetSx3Cache(_aCpoSX3[i], 'X3_USADO'),;
                        GetSx3Cache(_aCpoSX3[i], 'X3_TIPO'),;
                        GetSx3Cache(_aCpoSX3[i], 'X3_F3'),;
                        GetSx3Cache(_aCpoSX3[i], 'X3_CONTEXT'),;
                        GetSx3Cache(_aCpoSX3[i], 'X3_CBOX'),;
                        GetSx3Cache(_aCpoSX3[i], 'X3_RELACAO'),;
                        GetSx3Cache(_aCpoSX3[i], 'X3_WHEN'),;
                        GetSx3Cache(_aCpoSX3[i], 'X3_VISUAL'),;
                        GetSx3Cache(_aCpoSX3[i], 'X3_VLDUSER'),;
                        GetSx3Cache(_aCpoSX3[i], 'X3_PICTVAR'),;
                        If(GetSx3Cache(_aCpoSX3[i], 'X3_OBRIGAT') == "€", .T., .F.)} )

    Endif

Next i
```
- editar
- x
  
  grosseiro ou ofensivo pouco construtivo obsoleto outro...
  Motivo
- criado 25 de Jul de 2019
  Giordano Trabach Xavier
  4208 pontos
- 0
  
  Giordano, apenas fique atento quanto a performance, cada chamada da GetSx3Cache é um seek no banco de dados, ou seja, cada loop desse faz 18 querys no SX3.
  — Daniel Mendes 25 de Jul de 2019
- 0
  
  Opa, vale mencionar que o valor "€" não existe mais no SX3 quando o mesmo está migrado ao banco de dados.
  — Daniel Mendes 25 de Jul de 2019
- 1
  
  Daniel, na documentação do getsx3cache fala que vai no banco só na primeira chamada da thread para aquele banco e depois só busca no cache de memória, por isso tenho usado toda a vez que vou montar aheader :-)
  
  "No exemplo dado, a primeira vez que realiza a consulta do conteúdo X3_TAMANHO do campo A1_COD, irá buscar a informação no arquivo SX3 pois esta informação ainda não foi armazenada no cache. A partir da segunda vez , ao consultar o X3_TAMANHO do campo A1_COD, retornará o conteúdo que está armazenado no cache, sem a necessidade de acessar o arquivo SX3."
  — Josué Danich Prestes 25 de Jul de 2019
- 0
  
  link do tdn: http://tdn.totvs.com/pages/releaseview.action?pageId=6815033
  — Josué Danich Prestes 25 de Jul de 2019
- 0
  
  Boa tarde, Daniel! Essa função não usa o cache conforme o Josué informou e que está na documentação? Se não, qual função deve ser utilizada então, para obter maior performance? E como posso estar usando para checar o X3_OBRIGAT?
  — Giordano Trabach Xavier 25 de Jul de 2019
- 0
  
  Ela faz cache sim, porém por dado consultado, a primeira vez que o loop for executado, não terá cache, portanto a primeira execução irá executar as 18 querys que mencionei vezes a quantidade de campos do alias.
  — Daniel Mendes 26 de Jul de 2019
- 0
  
  Entendi. E qual seria uma função similar a essa para obter um melhor desempenho?
  — Giordano Trabach Xavier 30 de Jul de 2019
Mostrar todos os 7 comentários>
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

Acesso indevido dicionário

Comentário

2 respostas

Comentário

Comentário

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