Histórico da Página
...
Não se aplica.
06. VERSÕES
Protheus 12.1.17 ou superiores.
07. OBSERVAÇÃO
Todos os parâmetros são recebidos na User Function via PARAMIXB, conforme consta em Execblock / Customização.
08. EXEMPLO
...
title | Exemplo |
---|---|
linenumbers | true |
collapse | true |
...
------
#INCLUDE "PROTHEUS.CH"
...
#INCLUDE
...
"TOTVS.CH"
...
User
...
Function
...
WMSBMSUM()
...
Local
...
aRecD12
...
:=
...
paramixb[1]
...
Local
...
cAliasQry
...
:=
...
Nil
cAliasQry :=
...
GetNextAlias()
...
BeginSql
...
Alias
...
cAliasQry
...
SELECT
...
DISTINCT
...
1
...
FROM
...
%Table:D12%
...
D12
...
INNER
...
JOIN
...
%Table:DCF%
...
DCF
...
ON
...
DCF.DCF_FILIAL
...
=
...
%xFilial:DCF%
...
AND
...
DCF.DCF_ID
...
=
...
D12.D12_IDDCF
...
AND
...
DCF.%NotDel%
...
INNER
...
JOIN
...
%Table:DC5%
...
DC5
...
ON
...
DC5.DC5_FILIAL
...
=
...
%xFilial:DC5%
...
AND
...
DC5.DC5_SERVIC
...
=
...
DCF.DCF_SERVIC
...
AND
...
DC5.DC5_OPERAC
...
=
...
'8'
...
AND
...
DC5.%NotDel%
...
WHERE
...
D12_FILIAL
...
=
...
%xFilial:D12%
...
AND
...
D12.R_E_C_N_O_
...
=
...
%Exp:aRecD12%
...
AND
...
D12.%NotDel%
...
EndSql
If (cAliasQry)->(!Eof())
...
WmsMessage("Fim
...
Rotina
...
Transferência","AVISO")
...
EndIf
(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> |