GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEV
,
WEBDEV
e
WINDEV Mobile
Inicio
|
Mensagens recentes
|
Conecte-se...
|
Disconnect
|
Português
Inicio
→
WINDEV 25
→
WX (Windev, Webdev e Windev Mobile) - Comunicação com Equipamento SIEMENS SIMATIC S7-1200
WX (Windev, Webdev e Windev Mobile) - Comunicação com Equipamento SIEMENS SIMATIC S7-1200
Iniciado por Boller, abr., 14 2021 12:26 PM - Sem resposta
Conecte-se…
Boller
#1
Membro registado
3.651 mensagems
Popularité : +175 (223 votes)
Publicado em abril, 14 2021 - 12:26 PM
Hi,
SIEMENS SIMATIC S7-1200 can be flexibly adapted to your needs with Windev
The extended communication functions of the SIEMENS SIMATIC S7-1200 allow for a comprehensive and improved data transfer!
gaut
Server
is object automation
C
LIENT_OPC_AUTOMATION
gpaut
Group
is object automation
dynamic
gpaut
Item
is object automation
dynamic
OPCServerConnection
(
)
//..............
Procedure
OPCServerConnection
(
)
WHEN EXCEPTION IN
gaut
Server
>
>
C
onnect
(
(
s
OPCServer
)
,
(
s
MachineName
)
)
DO
RegLog
(
ID_Servidor_Opc
,
"SRV01"
,
"Erro de Ligação ao servidor"
,
“
Unable to connect
,
check the connection parameters
”
)
END
// create the group of accesses
gpaut
Group
=
gaut
Server
>
>
OPCGroups
>
>
Add
(
NAME_GROUP
)
IF
gpaut
Group
=
Null THEN
RegLog
(
ID_Servidor_Opc
,
"GRP01"
,
"Erro de Grupo"
,
“
Não foi possível criar o grupo
”
+
NAME_GROUP
)
RETURN
END
Valor
is real
dtDate
is
DateTime
gpaut
Item
=
gpaut
Group
>
>
OPCItems
>
>
AddItem
(
(
ValTag
)
,
1
)
n
ErrorCode
is int
=
gpaut
Item
>
>
Read
(
1
)
IF
n
ErrorCode
<
>
0
THEN
RegLog
(
ID_Servidor_Opc
,
"ITM01"
,
"Erro de criação de Tag"
,
"Não foi possível criar a Tag "
+
ValTag
)
END
//Valor da Tag
Valor
=
gpaut
Item
>
>
Value
// Qualidade do Registo
Var_Quality
=
s
GetQuality
(
gpaut
Item
>
>
Quality
)
// DateTime do Registo
dtDate
=
gpaut
Item
>
>
TimeStamp
--
Adriano José Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 99949 1800
adrianoboller@gmail.com
skype: adrianoboller
http://wxinformatica.com.br/
Denunciar
0
0
→ Voltar para WINDEV 25
WINDEV 25
Français
English
Español
Portuguesa
Fermer cette fenêtre
Tipo de Pesquisa
Apenas tópicos
Todas as mensagens
Período de pesquisa
Qualquer momento
Última hora
Últimas 24 horas
Semana passada
Mês passado
Ano passado
Cancelar
Pré-visualização da sua mensagem
Adicionar imagem
Importar uma imagem de uma URL
Enviar uma imagem a partir do seu disco
Deixe um ficheiro ou clique em "Procurar ..."
ou
Cancelar
0%
WLanguage
SQL
XML, HTML
JAVA, Javascript
Texto