IP do equipamento SAT

[Intelliware]

Boa tarde pessoal,

No retorno da função ConsultarStatusOperacional a ACBrSAT efetua as leituras dos parâmetros:

NSERIE
LAN_MAC
STATUS_LAN
NIVEL_BATERIA
MT_TOTAL
MT_USADA
DH_ATUAL
VER_SB
VER_LAYOUT
ULTIMO_CFe
LISTA_INICIAL
LISTA_FINAL
DH_CFe
DH_ULTIMA
CERT_EMISSAO
CERT_VENCIMENTO
ESTADO_OPERACAO

    Pela Especificação de Requisitos, existe ainda estas outras possibilidades:

TIPO_LAN
LAN_IP
LAN_MASK
LAN_GW
LAN_DNS_1
LAN_DNS_2

    Eu não encontrei as propriedades acima na unit ACBrSATClass.pas, elas realmente não foram implementadas? Existe um modo de obtê-las?

    É que o pessoal de implantação está tendo um certo trabalho para obter o referido IP que o SAT utiliza, sendo que acreditamos que seria uma informação interessante, inclusive para validar se o mesmo não está sendo bloqueado no firewall.

    Desde já agradeço.

[rick]

Boa tarde Intelli...

Eu fiz da seguinte forma:

Depois da ACBrSAT1.ConsultarStatusOperacional;

('TIPO DE LAN..: ' + TipoLanToStr(ACBrSAT1.Rede.tipoLan));
('IP...........: ' + Trim(ACBrSAT1.Rede.lanIP));
('GATEWAY DE REDE: ' + Trim(ACBrSAT1.Rede.lanGW));
('DDNS1 DE REDE..: ' + Trim(ACBrSAT1.Rede.lanDNS1));
('DDNS2 DE REDE..: ' + Trim(ACBrSAT1.Rede.lanDNS2));

//no emulador da SEFAZ, o retorno esta trocado
if Length(Trim(ACBrSAT1.Rede.lanMask)) = 17 then
    ('MÁSCARA DE REDE: ' + Trim(ACBrSAT1.Status.LAN_MAC))
else
    ('MÁSCARA DE REDE: ' + Trim(ACBrSAT1.Rede.lanMask));
 

[Intelliware]

Opa, valeu pelo retorno rick. Vou tentar aqui. Agradeço.

[Intelliware]

Só retornando a resposta, funcionou normalmente. Agradeço a todos.