Versão atual:

Abertura SX1 Com OpenSxs ou FWSX1Util

Boa tarde Pessoal,

Estou com problemas para fazer a leitura da SX1. Preciso chamar a função Pergunte para coletar os parâmetros do usuário e preciso pegar alguns campos na SX1 para verificar como tratarei os parâmetros coletados. Tentei efetuar a leitura usando primeiramente a classe FWSX1Util, porém esta sempre me retorna a posição vazia para o array que recebe o resultado da consulta. Posteriormente tentei usando a função OpenSXs, mas quando verifico a abertura da área com o comando Select sempre retorna FALSO. Abaixo, seguem os dois trechos de código que usei pra cada método: FWSX1Util:

Local oObj := FWSX1Util():New()
Local aPergunte

oObj:AddGroup(cPerg) // cPerg := "DATA  "(ja conferi o conteúdo da variavel)
oObj:SearchGroup()
aPergunte := oObj:GetGroup(cPerg)

OpenSXs:

OpenSXs(NIL, NIL, NIL, NIL, cFilAnt, cAlias, "SX1", NIL, .F.)
lOpen := Select(cAlias) > 0

If (!lOpen)

    lOpenDic := .F.
    Return
EndIf

Algum de vocês teve problema na abertura da SX1? A SX3 eu consigo abrir normalmente com o OpenSXs Alguém teria um outro método de fazer acesso ao dicionário de dados??

Versão (1):

Ver a versão formatada

Abertura SX1 Com OpenSxs ou FWSX1Util

Comentário

new question