Para alterar as configurações do Manager SaaS/eDoc para o documento CF-e SAT, basta utilizar o método ConfigurarManager informando o conteúdo do arquivo TX2 contendo as configurações que serão alteradas. Segue abaixo os detalhes do método e de seu retorno.
Detalhes ConfigurarManager
Função: Realiza a alterações nas configurações do Manager SaaS/eDoc do documento CF-e SAT.
Classe: TspdCFeSatClientX
Método: ConfigurarManager
Tipo Retorno: spdRetConfigurarManagerX
Parâmetros aceitos:
Nome | Tipo | Obrigatório | Valor |
aConteudoConfiguracao | Texto | Sim |
Conteúdo do arquivo TX2 contendo as configurações as quais se deseja alterar. Seguindo o seguinte formato:
Campo=Valor. Exemplo: AutoEmail=1 |
Delphi
procedure TfrmrConfiguracoesCFeSat.btnConfigurarClick(Sender: TObject);
var
_Retorno: spdRetConfigurarManagerX;
begin
//Qualquer campo presente no .ini do edoc pode ser modificado atraves desse método
// pode ser passado mais de um campo por requisição,
//separando pelo caracter de quebra de linha, no delphi #13# 10
_Retorno := CFeSat.ConfigurarManager('Ambiente=1'+#13# 10+'FieldDelimiter=,');
if _Retorno.Status = Sucesso then
Result := 'Mensagem: ' + _Retorno.Mensagem
else
Result := 'Erro: ' + _Retorno.NomeExcecao + ', ' + _Retorno.Mensagem;
end;
Atenção!
- A mensagem traz o resultado da comunicação, em caso de sucesso, a mensagem será "OK Operação realizada com sucesso", e no caso de falha, ele terá a mensagem do motivo da falha.
C#
private void btnConfigurarCFeSat_Click(object sender, EventArgs e)
{
spdRetConfigurarManagerX Retorno = null;
string NovaConfig = InputBox("Insira a nova configuração. Ex: Campo=Valor", "Nova Configuração", "");
if (NovaConfig != "")
{
//Esse método envia as novas configurações para o Manager eDoc através do Componente Manager Client
Retorno = CFeSat.ConfigurarManager(NovaConfig);
//Exibe o retorno do método no memo
if (Retorno.Status == spdManagerClientX.TStatus.Sucesso)
memoRetorno.Text = "Mensagem: " + Retorno.Mensagem;
else
memoRetorno.Text = "Erro: " + Retorno.NomeExcecao + ", " + Retorno.Mensagem;
}
}
Visual Basic 6
Private Sub btnConfigurarCFeSat_Click()
Dim Retorno As spdRetConfigurarManagerX
Dim NovaConfig As String
NovaConfig = InputBox("Insira a nova configuração. Ex: Campo=Valor", "Nova Configuração", "")
'Esse método envia as novas configurações para o Manager eDoc através do Componente Manager Client
Set Retorno = CFeSat.ConfigurarManager(NovaConfig)
'Exibe o retorno no memo
If Retorno.Status = Sucesso Then
memoRetorno.Text = "Mensagem: " + Retorno.Mensagem + vbCrLf
Else
memoRetorno.Text = "Erro: " + Retorno.NomeExcecao + ", " + Retorno.Mensagem
End If
End Sub
Retorno
O tipo spdRetConfigurarManagerX possui os seguintes campos:
Campo | Tipo | Descrição |
Status | Constante | Retorna o status da operação: Sucesso ou Erro. |
NomeExcecao | Texto | Em caso de erro retorna a classe da Exception. |
Mensagem | Texto | Retorna a descrição da resposta do servidor. |
Comentários
0 comentário
Por favor, entre para comentar.