PERGUNTAS E RESPOSTAS
 
Bem Vindo, Visitante  Todos os Fórums
  ADVPL
Enviar para a impressoraImprimir  Enviar e-mail para um amigoEnviar Para um Amigo
Precisa estar Logado

Subject Assunto:
Instanciar objeto de dados na service, no TLPP?
Versão:
12.1.2210
Plataforma:
.
Complemento:
DB:
.
Complemento:
LinkedIn
Mensagem do Enviar e-mail Abrir o Perfil do usuário HORSELESS HORSELESS em 26/03/2024, 15:25 h
Local: PR  Registro: 11/01/2024  Postagens: 5
Olá, estou criando uma API onde na minha Service eu quero instanciar um objeto de dados pra acessar os métodos dele.

Mas não está funcionando, quando eu chamo o método construtor `new` da classe de dados, ele não cria o objeto...

Eu fiz assim:

1. Na Service eu defini e criei o objeto de dados

```TLPP
class SolicitacaoArmazemService
    Public Data jResponse as Json
    Data oData as Object

    Public method new() as Object
    Public method listarSolicitacoesArmazem() as Json
EndClass

Method listarSolicitacoesArmazem() as Json Class SolicitacaoArmazemService
    ConOut("SolicitacaoArmazemService:listarSolicitacoesArmazem - Listando Solicitações de Armazém...")
    ::jResponse:fromJson(‘[{"Mensagem":"Hello World!"}]‘)

    oData := SolicitacaoArmazemData():new()

Return ::jResponse
```

2. E para a linha `oData := SolicitacaoArmazemData():new()` funcionar, eu criei o método construtor deste objeto, assim:

```
Class SolicitacaoArmazemData From FWAdapterBaseV2
    Public method new() as Object
    Public method listarSolicitacoesArmazem()
EndClass

Method new(cVerboHttp as Character) as Object Class SolicitacaoArmazemData
    _Super:new(cVerboHttp, .T.)
    ConOut("SolicitacaoArmazemData:new - Classe de dados construída...")
Return Self
```

Porém ele para no `Return Self`. Chega a mostrar o comando do ConOut antes do último return da classe de dados, mas ele não cria o objeto, permanece como Nil o meu oData da Service...

Alguém pode me dar uma força?

Atenciosamente,
Raul Chiarella

Foto
Mensagem do Enviar e-mail Abrir o Perfil do usuário EMERSON.EN EMERSON.EN em 26/03/2024, 18:33 h
Local: SP  Registro: 20/08/2010  Postagens: 670
tente

Return ::Self


Foto
Mensagem do Enviar e-mail Abrir o Perfil do usuário PIXELPULSE PIXELPULSE em 27/03/2024, 13:44 h
Local: SP  Registro: 27/03/2024  Postagens: 2
* excluido *

Foto
Mensagem do Enviar e-mail Abrir o Perfil do usuário PIXELPULSE PIXELPULSE em 28/03/2024, 04:12 h
Local: SP  Registro: 27/03/2024  Postagens: 2
* excluido *

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

 Mudar para Fórum

 

 

 
 
   
Pagina Principal Shopping PROTHEUS Tire suas duvidas Vagas Microsiga em todo Brasil Aprofunde seus conhecimentos Noticias Online Fale Conosco Pagina Principal