O ponto de entrada CT012BWF permite a manipulação da string html de bloqueio ao alterar o calendário contábil/Bloqueio Automático Processos.
Parâmetro | Tipo | Descrição | Obrigatório |
|---|---|---|---|
| PARAMIXB[1] | Caracter | String HTML para mensagem de bloqueio | Sim |
| PARAMIXB[2] | Numérico | Contador | Sim |
| PARAMIXB[2] | Objeto | Modelo Tabela CTG (MVC) | Sim |
| PARAMIXB[2] | Objeto | Modelo Tabela CQD (MVC) | Sim |
Retorno | Tipo | Descrição | Obrigatório |
|---|---|---|---|
| cHtmlPe | Caracter | Variável caracter retornando string HTML para mensagem de bloqueio. | Sim |
#include "protheus.ch"
User Function CT012BWF()
Local cPEHTML := ParamIXB[1]
Local nCont := ParamIXB[2]
Local oModelCTG := ParamIXB[3]
Local oModelCQD := ParamIXB[4]
//Resgata as informacoes do modelo CQD
cPEHTML += ' ' + Ctb012Sx3("CQD_DTINI") + ': '+DTOC(oModelCQD:GetValue("CQD_DTINI"))
cPEHTML += ' ' + Ctb012Sx3("CQD_DTFIM") + ': '+DTOC(oModelCQD:GetValue("CQD_DTFIM"))
Return(cPEHTML)
|
If lPeHtml
cHtmlPe := ExecBlock("CT012BWF",.F.,.F.,{ cHtml, nCont, oModelCTG, oModelCQD })
If ValType(cHtmlPe) != "C" .OR. Empty(Alltrim(cHtmlPE))
Help(" ",1,"CT012BWF_ERR",,"Error PE CT012BWF WF - HTML!",3,1)
Else
cHtml := cHtmlPe
EndIf
EndIf
|
<!-- esconder o menu -->
<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;
}
</style>
|