PROFESSIONAL NEWSGROUPS
WINDEV
,
WEBDEV
and
WINDEV Mobile
Home
|
Recent messages
|
Connect
|
Sign out
|
English
Home
→
WINDEV 25
→
WX - Trabalhando com Tabela Struct em Memória (QUEUE)
WX - Trabalhando com Tabela Struct em Memória (QUEUE)
Started by adrianoboller, Feb., 27 2016 3:05 AM - No answer
Connect yourself…
adrianoboller
#1
Registered member
3,659 messages
Popularité : +175 (223 votes)
Posted on February, 27 2016 - 3:05 AM
Prezados,
Segue exemplo de como trabalhar com Tabela Struct em Memória:
EXEMPLO DE TABELA DE MEMORIA
-
STRUCT
-
QUEUE
STDadosDaFrete is
structure
b
Dadosatualizados is
boolean
b
DadosValidos is
boolean
s
StatusFrete is
string
s
DataHoraAceite is
string
s
DataHoraCancelamento is
string
n
Matricula is
int
s
NomeCarroceiro is
string
n
NumCarroca is
int
n
NumCarroca is
int
s
Placa is
string
s
Marca is
string
s
Modelo is
string
pPosicaoCarroca is
geoPosition
s
MsgCarroca is
string
END
FreteAtualtemp is STDadosDaFrete
IF
XML_Retorno
<
>
""
FreteAtualtemp.sStatusFrete
=
Busca_Tag_Xml
(
XML_Retorno
,
"Situacao"
)
FreteAtualtemp.nNumRt
=
Busca_Tag_Xml
(
XML_Retorno
,
"NumCarroca"
)
FreteAtualtemp.nNumAt
=
Busca_Tag_Xml
(
XML_Retorno
,
"NumCarroceiro"
)
FreteAtualtemp.sPlaca
=
Busca_Tag_Xml
(
XML_Retorno
,
"PlacaCarroca"
)
FreteAtualtemp.nMatricula
=
Busca_Tag_Xml
(
XML_Retorno
,
"Matricula"
)
FreteAtualtemp.sNomeCarroceiro
=
Busca_Tag_Xml
(
XML_Retorno
,
"Nome"
)
FreteAtualtemp.sDataHoraAceite
=
Busca_Tag_Xml
(
XML_Retorno
,
"DataAceite"
)
FreteAtualtemp.sDataHoraCancelamento
=
Busca_Tag_Xml
(
XML_Retorno
,
"DataCancelamento"
)
FreteAtualtemp.sMsgTaxi
=
Busca_Tag_Xml
(
XML_Retorno
,
"Mensagem"
)
FreteAtualtemp.pPosicaoRT.Latitude
=
Busca_Tag_Xml
(
XML_Retorno
,
"Latitude"
)
FreteAtualtemp.pPosicaoRT.Longitude
=
Busca_Tag_Xml
(
XML_Retorno
,
"Longitude"
)
FreteAtualtemp.pPosicaoRT.Speed
=
Busca_Tag_Xml
(
XML_Retorno
,
"VelocidadeCarroca"
)
FreteAtualtemp.bDadosValidos
=
True
END
RESULT
(
FreteAtualtemp
)
Outro exemplo:
ST_CarrocasLogados is
structure
ST_ID is
string
// id do Carroca
ST_Latitude is
real
// latitude onde esta o Carroca
ST_Longitude is
real
// longitude onde esta o Carroca
ST_Situacao is
string
// status se esta disponivel ou nao
END
arr
_CarrocasLogados is associative
array
(
ccIgnoreCase
+
ccIgnorePonctuationAndSpace
)
of ST_CarrocasLogados
FOR EACH LocSt_CarrocasLogados OF
arr
_CarrocasLogados
IF
LocSt_CarrocasLogados.ST_Situacao
>
0
THEN
n
Contador
+
=
1
MarcadorCarrocas
(
LocSt_CarrocasLogados.ST_ID
,
LocSt_CarrocasLogados.ST_Latitude
,
LocSt_CarrocasLogados.ST_Longitude
,
LocSt_CarrocasLogados.ST_Situacao
)
END
--
Adriano José Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 9949 1800
adrianoboller@gmail.com
skype: adrianoboller
http://wxinformatica.blogspot.com.br/
Report
0
0
→ Go back to WINDEV 25
WINDEV 25
Français
English
Español
Portuguesa
Close this window
Search type
Only topics
All the messages
Search period
Any time
Past hour
Past 24 hours
Past week
Past month
Past year
Cancel
Preview of your message
Adding an image
Import an image from a URL
Send an image from a file of your disk
Drop a file or click "Browse..."
or
Cancel
0%
WLanguage
SQL
XML, HTML
JAVA, Javascript
Text