FORUMS PROFESSIONNELS
WINDEV
,
WEBDEV
et
WINDEV Mobile
Accueil
|
Messages récents
|
Connexion
|
Déconnexion
|
Français
Accueil
→
WINDEV 25
→
WX - Trabalhando com Tabela Struct em Memória (QUEUE)
WX - Trabalhando com Tabela Struct em Memória (QUEUE)
Débuté par adrianoboller, 27 fév. 2016 03:05 - Aucune réponse
Connectez-vous…
adrianoboller
#1
Membre enregistré
3 657 messages
Popularité : +175 (223 votes)
Posté le 27 février 2016 - 03:05
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/
Signaler
0
0
→ Revenir à WINDEV 25
WINDEV 25
Français
English
Español
Portuguesa
Fermer cette fenêtre
Type de recherche
Uniquement les sujets
Tous les messages
Période de recherche
Date indifférente
Moins d'une heure
Moins de 24 heures
Moins d'une semaine
Moins d'un mois
Moins d'un an
Annuler
Aperçu de votre message
Ajouter une image
Importer une image depuis une URL
Envoyer une image depuis un fichier de votre disque
Déposez ici un fichier ou cliquez sur "Parcourir..."
ou
Annuler
0%
WLangage
SQL
XML, HTML
JAVA, Javascript
Texte