Esta rotina tem como objetivo agrupar todos os protocolos faturados e/ou liberados para pagamento e exibir uma visão geral da competência para o prestador, permitindo também o envio da nota fiscal.
A visualização e o envio da nota fiscal será efetuada através do HAT.
Outras Ações / Ações relacionadas
Adicionar o menu abaixo:
Menu | Nome da Rotina | Função |
---|---|---|
Atualizações / Pagamento Rda | Lote Fechamento NF | PLSLOTENF |
Principais Campos e Parâmetros
Ajustes na tabela BCI ()
Ajuste no dicionário de Dados SX3
Campo | Tipo | Tamanho | Decimal | Nome | Inicializador Padrão | Validação | Consulta | Lista de Opções | Visual | Contexto | Modo Edição | Usado | Browse |
---|---|---|---|---|---|---|---|---|---|---|---|---|---|
BCI_LOTENF | Caracter | 8 | 0 | Lote Fechamento NF | Visualizar | Real | GETNEWPAR("MV_PLSLRF","0") =="1" | Sim | Não |
Criação de Índice na tabela BCI.
Chave | Descrição | Showpesq |
---|---|---|
BCI_FILIAL+BCI_LOTENF | Lote Fec. NF | S |
Criação do Tabela B0J (BA0_LISREF).
Campo | Tipo | Tamanho | Decimal | Nome | Inicializador Padrão | Validação | Consulta | Lista de Opções | Visual | Contexto | Modo Edição | Usado | Browse |
---|---|---|---|---|---|---|---|---|---|---|---|---|---|
BA0_LISREF | Caracter | 1 | 0 | Lista Referenciada | PERTENCE("12" ) | 1=Sim;2=Não | Alterar | Real | GETNEWPAR("MV_PLSLRF","0") =="1" | Sim | Sim | ||
BGR_POSREF | Caracter | 1 | 0 | Orderm Lista Referenciada | Pertence("123456789") | Alterar | Real | GETNEWPAR("MV_PLSLRF","0") =="1" | Sim | Sim | |||
BR8_LISREF | Caracter | 1 | 0 | Lista Referenciada | PERTENCE("12" ) | 1=Sim;2=Não | Alterar | Real | GETNEWPAR("MV_PLSLRF","0") =="1" | Sim | Sim | ||
BMF_CODTAB | Caracter | 3 | 0 | Código Tabela | IIF(EMPTY(M->BMF_CODTAB),.T.,PlsSeek("BF8",1,PLSINTPAD()+M->BMF_CODTAB)) | B72PLS | Alterar | Real | GETNEWPAR("MV_PLSLRF","0") =="1" | Sim | Sim | ||
BX6_PERVAC | Numérico | 16 | 2 | Percentual Via Cobrança | Alterar | Real | GETNEWPAR("MV_PLSLRF","0") =="1" | Sim | Sim | ||||
BME_CODTAB | Caracter | 3 | 0 | Código Tabela | CTabBME | Visualizar | Real | GETNEWPAR("MV_PLSLRF","0") =="1" | Sim | Sim | |||
BMG_CODTAB | Caracter | 3 | 0 | Código Tabela | cTabBMG | Visualizar | Real | GETNEWPAR("MV_PLSLRF","0") =="1" | Sim | Sim | |||
BMD_CODTAB | Caracter | 3 | 0 | Código Tabela | IIF(EMPTY(M->BMD_CODTAB),.T.,PlsSeek("BF8",1,PLSINTPAD()+M->BMD_CODTAB)) | B72PLS | Alterar | Real | GETNEWPAR("MV_PLSLRF","0") =="1" | Sim | Sim |
Coloque o link das tabelas relacionadas