Árvore de páginas

Versões comparadas

Chave

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

 Tempo aproximado para leitura: 05 min

01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Jurídico
Módulo:Pré Faturamento -faturamento de Serviços - SIGAPFS
Função:Envia Pré-Fatura para fila de geração de fatura  - JURA203B


02. PONTO DE ENTRADA

Descrição:

Este ponto de entrada permite validar a alteração da situação na validar o envio da Pré-Fatura para fila de emissão.

Localização:

Atualizações - Movimentações - Operações de Pré-Fatura

Programa Fonte:

JURA203B

Função:

JA203BASS

Ponto de Entrada:J203BPRE
Parâmetros:



Nome

Tipo

Descrição

Obrigatório

PARAMIXBarray

Array com 1 posição com o código da Pré-Fatura

NomeTipoDescrição
PARAMIXB[1]CaractereCódigo da Pré-Fatura
Sim



Retorno:



Nome

Tipo

Descrição

Obrigatório

aRetorno

Array

Array obrigatório com retorno de 2 posições

NomeTipoDescrição
aRetorno[1]LógicoIndica se envia ou não a Pré-Fatura para fila
aRetorno[2]CaractereMensagem de detalhamento
Sim




03. EXEMPLO

#INCLUDE "PROTHEUS.CH"
#INCLUDE "PARMTYPE.CH"

//-------------------------------------------------------------------
/*/{Protheus.doc} J203BPre
Valida o envio da Pré-Fatura para fila de emissão de fatura.

@param  PARAMIXB, array   , Parâmetros do ponto de entrada
            PARAMIXB[1], caracter, Código da Pré-Fatura

@return aRetorno   , array   , Retorna dados do ponto de entrada
             aRetorno[1], logico  , Verdadeiro para enviar a Pré-Fatura para fila de emissão
             aRetorno[2], caracter, Retornar vazio ou mensagem de justificativa

@author  TOTVS
@since   16/03/2020
@obs     O ponto de entrada será executado para cada registro de Pré-Fatura
         selecionado na tela.
/*/
//-------------------------------------------------------------------
User Function J203BPre()
    Local cCodPreFat := ""
    Local aRetorno   := {.T.""}

    If ValType( PARAMIXB ) == "A"
        cCodPreFat := PARAMIXB[1]

        // Permitir apenas o envio da Pré-Fatua "000001" para fila
        If cCodPreFat <>  cCodPreFat != "000001"
            aRetorno := {.F. , DecodeUTF8("Pré-Fatura: " + cCodPreFat + " não passível de faturamento!")}
        EndIf
    EndIf

Return (aRetorno)

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;
}
</style>