HelpFacil :: Forum :: Alias does not exist TRB

Siga-nos no Instagram

Siga-nos no LinkedIn

Siga-nos no Facebook

+55 (11) 96330-2717

PERGUNTAS E RESPOSTAS

Bem Vindo, Visitante

Todos os Fórums

ADVPL

Imprimir

Enviar Para um Amigo
Precisa estar Logado

Assunto:	Alias does not exist TRB
Versão:	11
Plataforma:	Microsoft	Complemento:
DB:	SQL Server	Complemento:

Mensagem do

JAMATRAIN em 24/02/2017, 16:20 h
Local: MO Registro: 24/02/2017 Postagens: 2

Boa tarde
Eu tenho o seguinte problema com código ADVPL na TOTVS, é a impressão de uma lista de distribuição, diz-me que o Alias não existe, tentei com

Cálias: = GetNextAlias()

Mas o problema continua.

Muito obrigado.

Mensagem do

DON.JUNIOR em 25/02/2017, 13:13 h
Local: RJ Registro: 24/01/2016 Postagens: 152

Em algum ponto do seu fornte existe TRB->, isso significa que está trabalhando com tabela temporária, para tal é necessário definir a área antes de utilizar!

Local cAlias := "TRB"

Att.
Don Junior

Mensagem do

JAMATRAIN em 09/03/2017, 13:53 h
Local: MO Registro: 24/02/2017 Postagens: 2

Boa tarde
Partilho o código :

PRIVATE cAlias := "TRB"
Private     nPosV :=8.2
Private     nPosH :=0.2

IF nrecrem == 0
     cRemDe        := MV_PAR01
     cRemAte       := MV_PAR02
     dfecini       := DTOS(MV_PAR03)
     dfecfin       := DTOS(MV_PAR04)
     nQtd          := IIF(EMPTY(MV_PAR05),1,MV_PAR05)
Endif

For nCop:=1 to nQtd
     //ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¼
     //³Armo el Detalle del Layout³
     //ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¼
     IF nrecrem == 0
          cWhere := "%"
          cWhere += " SD3.D3_ESTORNO <> ‘S‘ AND "
          cWhere += " SD3.D3_DOC BETWEEN ‘" + %Exp:cRemDe% + "‘ AND ‘" + %Exp:cRemAte% + "‘ AND"
          cWhere += " SD3.D3_EMISSAO BETWEEN ‘" + %Exp:dfecini% + "‘ AND ‘" + %Exp:dfecfin% + "‘ "
          cWhere += "%"
     Else
          //Con el Recno de uno traigo el D3_DOC por las dudas que genere mas de uno.
          SD3->(dbGoto(nrecrem))
          cWhere := "%"
          cWhere += " SD3.D3_DOC= ‘" + %Exp:SD3->D3_DOC% + "‘ "
          cWhere += "%"
     End

     BeginSql Alias cAlias

     select
               D3_COD as CODIGO,
               B1_DESC AS DESCRI,
               D3_DOC,
               B1_UM AS UM,
               D3_QUANT as CANTIDAD,
               D3_EMISSAO as FECHA,
               D3_LOCALIZ AS UBICACION,
               Z10_COD AS PROYECTO,
               Z10_DIR AS DIRENTREGA
          from %Table:SD3% SD3, %Table:Z10% Z10, %Table:SBE% SBE, %Table:SB1% SB1
          WHERE
               D3_FILIAL = %Exp:xFilial("SD3")% AND SD3.%NotDel% AND %Exp:cWhere%
             //AND Z10_FILIAL = %Exp:xFilial("Z10")% AND Z10.%NotDel%
               AND BE_FILIAL = %Exp:xFilial("SBE")% AND SBE.%NotDel%
               AND D3_LOCALIZ = BE_LOCALIZ
               AND Z10_COD = BE_XPROY
               AND B1_COD= D3_COD


          EndSql

     DbSelectArea (cAlias)

Desde já muito obrigado

Mensagem do

TI-02 em 29/07/2024, 17:05 h
Local: SP Registro: 29/07/2024 Postagens: 17

Tenta mudar as variáveis de Private para Local.

Mensagem do

ROBERTOMEN em 30/07/2024, 06:17 h
Local: PR Registro: 04/07/2017 Postagens: 544

BOM DIA.

poste o código completo, pode ser que em algum lugar você esteja fechando o alias e tentando chamar algum conteúdo dele.

Dicas: Nunca use acentos em varíaveis.

Quanto a Private / Local, se vc não vai chamar a variavel fora da função ou vai passá-la como parâmtrom não precisa declará-la como Private.

Quanto a usar TRB ou getnextalias() tanto faz, desde que você use sempre a variável para invocar o campos.

Exemplo

(cAlias)->CANTIDAD

(cAlias)->FECHA

dbselecarea(cAlias)

dbclosearea(cAlias)

etc...

Para postar no Fórum você precisa efetuar o seu login ou se registrar

Mudar para Fórum