Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Usuário desconhecido (pauloc)

Gravado em

comparado com

Nova versão 2

changes.mady.by.user Usuário desconhecido (pauloc)

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

  1. Visão Geral
  2. Parâmetros
  3. Retorno
  4. Exemplo de Utilização
  5. Exemplo de Manipulação
  6. 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
titleImportante!

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.

/Bloqueios 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 ContadorSim

...

Bloco de código
languagegroovy
themeDJango
titleExemplo do Ponto de Entrada
collapsetrue
#Include#include 'Protheus"protheus.ch'
#Include 'FWMVCDef.ch'"

User Function CT010BLICT010BWF()

    Local nOpc     cPEHTML := PARAMIXBParamIXB[1]
    Local lRet   nCont   := .T.ParamIXB[2]
    Local lBloqRot	:= .F.
    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



Exemplo básico de manipulação.

Travando registro atual:

Image Removed

Processo barrado pela manipulação do bloqueio:

Image Removed

Informações
titleObservação
Bloco de código
languagegroovy
themeDJango
titleEvento de chamada do Ponto de Entrada
collapsetrue

	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>