Histórico da Página
...
07. OBSERVAÇÃO
Não se aplica.
08. EXEMPLO
...
language | cpp |
---|---|
title | Exemplo |
linenumbers | true |
collapse | true |
...
------
#INCLUDE "PROTHEUS.CH"
...
User
...
Function
...
OMSXCPL0
...
()
...
Local
...
cBodyXML
...
:=
...
PARAMIXB[1]
...
Local
...
cTabela
...
:=
...
PARAMIXB[2]
...
Local
...
nPosInicio
...
:=
...
0
...
Local
...
nPosFim
...
:=
...
0
...
Local
...
nQtdCaract
...
:=
...
0
...
Local
...
cTag
...
:=
...
""
...
Local
...
cNovaTag
...
:=
...
""
...
If
...
cTabela
...
==
...
"SB1"
...
nPosInicio :=
...
At(
...
"<shape>",
...
cBodyXML)
...
//Posição
...
início
...
da
...
tag
nPosFim :=
...
At(
...
"</shape>",
...
cBodyXML)
...
//Posição
...
fim
...
da
...
tag
nQtdCaract :=
...
(nPosFim
...
-
...
nPosInicio)
...
+
...
Len("</shape>")
...
//Calcula
...
quantidade
...
de
...
caracteres
...
que
...
a
...
tag
...
completa
...
ocupa
cTag :=
...
SubStr(cBodyXML,nPosInicio,nQtdCaract)
...
//Retorna
...
a
...
string
...
contendo
...
a
...
tag
...
que
...
será
...
substituída,
...
exemplo:
...
"<shape>0</shape>"
...
cNovaTag :=
...
"<shape>1</shape>"
...
//Nova
...
tag
...
para
...
a
...
substituição
cBodyXML :=
...
StrTran(cBodyXML,cTag,cNovaTag)
...
//Efetiva
...
a
...
substituição
...
da
...
tag
...
no
...
XML
...
EndIf
Return cBodyXML
------
Templatedocumentos |
---|
HTML |
---|
<style> div.theme-default .ia-splitter #main { margin-left: 0px; } .ia-fixed-sidebar, .ia-splitter-left { display: none; } #main { padding-left: 10px; padding-right: 10px; overflow-x: hidden; } .aui-header-primary .aui-nav, .aui-page-panel { margin-left: 0px !important; } .aui-header-primary .aui-nav { margin-left: 0px !important; } .aui-tabs.horizontal-tabs>.tabs-menu>.menu-item.active-tab a::after { background: #FF9900; !important } .menu-item.active-tab { border-bottom: none !important; } </style> |