Histórico da Página

Tempo aproximado para leitura: 05 min

01. DADOS GERAIS

Linha de Produto:	Microsiga Protheus®
Segmento:	Jurídico
Módulo:	Pré-faturamento de Serviços - SIGAPFS Financeiro - SIGAFIN
Função:	Cópia de títulos a pagar - JURA273

02. PONTO DE ENTRADA

Descrição:

Este ponto de entrada permite indicar os campos da tabela de títulos a pagar (SE2) que não serão copiados durante o processo de cópia do título.

A lista com os campos que não serão copiados por padrão serão enviados para o ponto de entrada. Com isso será possível inserir novos campos na substituir a lista, remover campos, ou até mesmo montar uma lista específica.ou adicionar/remover campo(s).

Quando A lista de campos que o ponto de entrada enviar para a rotina substituirá a lista padrão, ou seja, caso o ponto retorne retorna algum campo ou lista, somente esses campos não serão copiados (a lista padrão será ignorada).

Localização:

Módulo SIGAFIN

Atualizações >> Contas a Pagar >> Contas a Pagar - Menu outras Ações >> Copiar Título; ou

Atualizações >> Contas a Pagar >> Funções Contas a Pagar - Menu outras Ações >> Copiar Título

Programa Fonte:

JURA273

Função:

J273LoadVar

Ponto de Entrada:

J273NCop

Parâmetros:

Nome

Tipo

Descrição

Obrigatório

PARAMIXB

array

Array com 1 posição

Nome	Tipo	Descrição
PARAMIXB[1]	Caractere	Campos que não serão copiados por padrão do sistema (separados por Pipe \| )

Sim

Retorno:

Nome

Tipo

Descrição

Obrigatório

cCpoNoCopy

Caractere

Campos que não devem ser copiados durante o processo de cópia do título.

Ex: "E2_LOTE |E2_MOVIMEN|E2_VALLIQ ".

Importante: Quando o nome do campo não possuir 10 caracteres, deve-se completar com espaços antes de adicionar o Pipe

Sim

03. EXEMPLO

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

//-------------------------------------------------------------------
/*/{Protheus.doc} J273Pre
Valida a cópia do título J273NCop
Indica os campos do título (SE2) que não serão copiados

@param PARAMIXB , array , Parâmetros do ponto de entrada
PARAMIXB[1], numérico caractere, Recno do título a ser copiado Lista padrão de campos que não serão copiados

@return lCopia@return cSE2NoCopy, lógico  , .T. Indica que o título poderá ser copiado
.F. Indica que o título NÃO poderá ser copiado
caractere, Lista dos campos que não serão copiados

@author  TOTVS
@since 14/04/2020
/*/
//-------------------------------------------------------------------
User Function J273PreUser Function J273NCop()
    Local lCopia     Local cPadNoCopy := "" // Lista padrão de campos que não serão copiados
    Local cPeNoCopy  := "E2_PREFIXO|E2_TIPO   |" // Lista do PE de campos que não serão copiados
    Local cSE2NoCopy := .T.""

    If ValType(PARAMIXB) == "A"
        SE2->(DbGoTo(PARAMIXB        cPadNoCopy := PARAMIXB[1]))

        cSE2NoCopy := cPadNoCopy // Posiciona no título a ser copiado
        // Não permitir cópia de títulos sem prefixo
        If Empty(SE2->E2_PREFIXO)
            lCopia := .F.
            ApMsgAlert("Não é permitido copiar título com prefixo vazio.","Prefixo inválido")
        EndIf
    EndIf
Return lCopia Lista padrão de campos que não serão copiados
        cSE2NoCopy += cPeNoCopy  // Lista do PE de campos que não serão copiados

    EndIf

Return cSE2NoCopy

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>

Árvore de páginas

Versões comparadas

Versão antiga 1

Nova versão Atual

Chave

02. PONTO DE ENTRADA

03. EXEMPLO