Histórico da Página

O ponto de entrada CTBPCO permite uma validação prévia da execução da rotina de escrituração do movimento orçamentário na integração com o módulo Planejamento e Controle Orçamentário (SIGAPCO) (PcoDetLan). O retorno deste ponto de entrada decide ou não a entrada na função de escrituração, que se tiver o retorno verdadeiro executa, e se for falso não executa.

CTBA101.PRW

CTBPCO - Validação previa ( < cProcesso> , < cItem> , < Rotina> ) --> CTBPCO

CTBPCO(logico)
• Retorna .t. se executa .f. não executa

#Include "Protheus.ch"User Function CTBPCO()                                                                 Local cProcesso := ParamIXB[1]Local cItem := ParamIXB[2]Local cRotina := ParamIXB[3]Local lRet := .T.If cProcesso == "000082" .And. cItem=="01"	lRet := .F. //somente para teste	Alert(cRotina + " -Nao executara a rotina PcoDetlan de escrituração do movimneto orçamentário." )EndIfReturn lRet