Histórico da Página
CONTEÚDO
- Visão Geral
- Parâmetros
- Retorno
- Exemplo de Utilização
- Exemplo de Manipulação
- Documentos Relacionados
01. VISÃO GERAL
O ponto de entrada CT010BLI visa permitir CT010BWF permite a manipulação do bloqueio ou impedimento ao da string html de bloqueio ao alterar o calendário contábil quando utilizado em outro processo, conforme lógica implementada no Ponto de Entrada.
| Informações | ||
|---|---|---|
| ||
Para utilização desse ponto de entrada é recomendado à utilização junto do ponto de entrada de manipulação do desbloqueio de calendário - CT010BLF. Informado link na seção de DOCUMENTOS RELACIONADOS. |
/Bloqueio Automático Processos.
02. PARÂMETROS
Parâmetro | Tipo | Descrição | Obrigatório |
|---|---|---|---|
| PARAMIXB[1] | Caracter | String HTML para mensagem de bloqueio | Sim |
| PARAMIXB[2] | Numérico | Contador | Sim |
03. RETORNO
Retorno | Tipo | Descrição | Obrigatório |
|---|---|---|---|
| cHtmlPe | Caracter | Variável caracter retornando string HTML para mensagem de bloqueio. | Sim |
04. EXEMPLO DE UTILIZAÇÃO
| Bloco de código | ||||||||
|---|---|---|---|---|---|---|---|---|
| ||||||||
#Include#include 'Protheus"protheus.ch' #Include 'FWMVCDef.ch' " User Function CT010BLICT010BWF() Local nOpc cPEHTML := PARAMIXBParamIXB[1] Local lRetnCont := .T. Local lBloqRot := .F.ParamIXB[2] Local lBloqCal := .T. //-------------------------------------------------------- // Valida se a consolidação contábil não esta em execução //-------------------------------------------------------- If lBloqCal .And. nOpc <> 2 CTG->(MSUNLOCK()) If LockByName("CTBA010",.T.,.T.) lBloqRot := .T. Else lRet := .F. Help(" ",1,"Ctb010Cal",,"Não é possível prosseguir com a operação, há um processo em execução para esta filial. Aguarde a finalização.",1,0) // EndIf EndIf Return lRet |
04. EXEMPLO DE MANIPULAÇÃO
//tabela CQD esta posicionada
cPEHTML += ' ' + Ctb012Sx3("CQD_DTINI") + ': '+DTOC(CQD->CQD_DTINI)
cPEHTML += ' ' + Ctb012Sx3("CQD_DTFIM") + ': '+DTOC(CQD->CQD_DTFIM)
Return(cPEHTML)
|
05. EXEMPLO DE MANIPULAÇÃO
| Informações | ||||||||
|---|---|---|---|---|---|---|---|---|
| ||||||||
| Bloco de código | ||||||||
| ||||||||
If ExistBlock("CT010BLI")lPeHtml lRet cHtmlPe := ExecBlock("CT010BLICT010BWF",.F.,.F.,{nOpc cHtml, nCont }) If ValType(lRet) <> "L" lRet := .T. Endif Endif |
5. DOCUMENTOS RELACIONADOS
...
cHtmlPe) != "C" .OR. Empty(Alltrim(cHtmlPE))
Help(" ",1,"CT010BWF_ERR",,"Error PE WF - HTML!",3,1)
Else
cHtml := cHtmlPe
EndIf
EndIf
|
| HTML |
|---|
<!-- 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>
|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas

