Histórico da Página
...
Não se aplica.
08. EXEMPLO
...
| language | cpp |
|---|---|
| title | Exemplo |
| linenumbers | true |
| collapse | true |
...
------
#INCLUDE "PROTHEUS.CH"
...
#INCLUDE
...
"TOTVS.CH"
...
User
...
Function
...
WMS074CF()
...
Local
...
cServico
...
:=
...
paramixb[1]
...
Local
...
cDocto
...
:=
...
paramixb[2]
...
Local
...
cSerie
...
:=
...
paramixb[3]
...
Local
...
cAliasQry
...
:=
...
""
...
Local
...
aRecnoD12
...
:=
...
{}
...
cAliasQry :=
...
GetNextAlias()
...
BeginSql
...
Alias
...
cAliasQry
SELECT D12.R_E_C_N_O_
...
RECNOD12
FROM %Table:D12%
...
D12
WHERE D12.D12_FILIAL
...
=
...
%xFilial:D12%
...
AND D12.D12_SERVIC
...
=
...
%Exp:cServico%
...
AND D12.D12_DOC
...
=
...
%Exp:cDocto%
...
AND D12.D12_SERIE
...
=
...
%Exp:cSerie%
...
AND ((D12.D12_QTDMOV
...
-
...
D12.D12_QTDLID)
...
>
...
0)
...
AND D12.%NotDel%
...
EndSql
...
Do
...
While
...
(cAliasQry)
...
→ (!Eof())
...
Aadd(aRecnoD12,(cAliasQry)
...
→ RECNOD12)
(cAliasQry)->(DbSkip())
...
ENDDO
(cAliasQry)
...
→(dbCloseArea())
...
Return
------
| 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>
|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas