Árvore de páginas

Versões comparadas

Chave

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


CONTEÚDO

  1. Visão Geral
  2. Exemplo de utilização
  3. Tela XXX
    1. Outras Ações / Ações relacionadas
  4. Tela XXX
    1. Principais Campos e Parâmetros
  5. Menus
  6. Tabelas utilizadas


01. VISÃO GERAL

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 dos dados pelo prestador e o envio da nota fiscal será efetuada através do HAT.

02. EXEMPLO DE UTILIZAÇÃO

Tela principal

Image Added


Processar

Ao processar será apurado as PEGs faturadas e/ou liberadas para pagamento que ainda não tenham sido inseridas em nenhum lote.

Será incluído registro na tabela B0J e marcado a PEG com o numero do lote gerado.

Caso o já existe um lote já fechado para um RDA, será gerado um novo em aberto para a mesma competência.

Image Added


Visualizar

Image Added


Reprocessar

Permite reprocessar somente o lote posicionado.

Não é permitido reprocessar lote já fechado.

Image Added


Excluir

Caso o lote já tenha sido fechado, isto é recebido o anexo, será solicitado confirmação se é mesmo para excluir. Caso seja confirmado será excluído o lote e todos os anexos amarrados ao lote.

Image Added


Banco de Conhecimento

Image Added


03.

...

Outras Ações / Ações relacionadas

...

04. TELA XXXXX

Principais Campos e Parâmetros

MENUS

 Adicionar o menu abaixo:

Menu

Nome da Rotina

Função

Atualizações / Pagamento RdaLote Fechamento NF

PLSLOTENF


04. TABELAS UTILIZADAS

...

Ajustes na tabela BCI (Protocolo de Entrega de Guias )

Ajuste no dicionário de Dados SX3Criação de campo:

CampoTipoTamanhoDecimalNomeInicializador PadrãoValidaçãoConsultaLista de OpçõesVisualContextoModo EdiçãoUsadoBrowse
BCI_LOTENFCaracter80Lote Fechamento NF
                            
                                                                                                         VisualizarReal
GETNEWPAR("MV_PLSLRF","0") =="1"

SimNão
CampoValidação
BGR_CODVIA

Criação de Índice na tabela BGR.

OrdemChaveDescriçãoShowpesq
Virt.Usuário
I
BGR
BCI_FILIAL+
BGR_CODINT+BGR_CODVIA+BGR_POSREF Operadora + Via + Posição Referenciada3-Padrão do Sistema

...

BCI_LOTENF                                                                                                                                               Lote NF                                                                                                                  S



Criação tabela BOJ (Lote Fechamento NF)

OrdemNomeFilialUnidadeEmpresaChave Única
ILote Fechamento NFCEEB0J_FILIAL+B0J_LOTENF                                                                                                                                                                                                                                     

        Criação de campo:

CampoTipoTamanhoDecimalNomeInicializador PadrãoValidaçãoConsultaLista de OpçõesVisualContextoModo EdiçãoUsadoBrowse
BA0
B0J_
LISREF
FILIALCaracter
1PERTENCE("12" )   
20
Lista Referenciada
Filial
                                     
   
1=Sim;2=Não                                       

                                                                    AlterarReal
GETNEWPAR("MV_PLSLRF","0") =="1"

SimSim
B0J_LOTENFCaracter80Lote Fechamento NF



AlterarReal
SimSim
BGR
B0J_
POSREF
CODRDACaracter
1
60
Orderm Lista ReferenciadaPertence("123456789")
Código RDA



AlterarReal
GETNEWPAR("MV_PLSLRF","0") =="1"

SimSim
BR8
B0J_
LISREF
ANO   Caracter
1
40
Lista ReferenciadaPERTENCE("12" )
Ano



AlterarReal
SimSim
B0J_MES   Caracter20Mes
1=Sim;2=Não




AlterarReal
GETNEWPAR("MV_PLSLRF","0") =="1"

SimSim
B0J_DATPRODate80Data Processamento



AlterarReal
SimSim
BMF
B0J_
CODTAB
VLRAPR
Caracter
Numérico
3
16
0
2
Código TabelaIIF(EMPTY(M->BMF_CODTAB),.T.,PlsSeek("BF8",1,PLSINTPAD()+M->BMF_CODTAB))
Valor Apresentado                                                                           
B72PLS



AlterarReal

SimSim
B0J_VLRPAGNumérico162Valor Pagamento



AlterarReal
GETNEWPAR("MV_PLSLRF","0") =="1"

SimSim
BX6
B0J_
PERVAC
VLRGLONumérico162
Percentual Via Cobrança  
Valor Glosado



AlterarReal
GETNEWPAR("MV_PLSLRF","0") =="1"

SimSim
BME
B0J_
CODTAB
STATUSCaracter
3
10
Código TabelaCTabBMEVisualizarReal
Status
PERTENCE("AF" )        
A=Aberto;F=Fechado AlterarReal
GETNEWPAR("MV_PLSLRF","0") =="1"

SimSim

Criação de Índice

OrdemChaveDescriçãoShowpesq
1B0J_FILIAL+B0J_LOTENF                                                                                                                                           Lote NF            
BMG_CODTABCaracter30Código TabelacTabBMG 
                                                                                                     
Visualizar
S
RealGETNEWPAR("MV_PLSLRF","0") =="1"SimSimBMD_CODTABCaracter30Código TabelaIIF(EMPTY(M->BMD_CODTAB),.T.,PlsSeek("BF8",1,PLSINTPAD()+M->BMD_CODTAB))  B72PLSAlterarRealGETNEWPAR("MV_PLSLRF","0") =="1"SimSim

Ajustes na tabela BCI 

Ajuste no dicionário de Dados SX3

...

Criação de Índice na tabela BGR.

...

2B0J_FILIAL+B0J_CODRDA+B0J_ANO+B0J_MES                                                                                                                           Codigo RDA+Ano+Mes                                                    S
3B0J_FILIAL+B0J_ANO+B0J_MES+B0J_CODRDA+B0J_LOTENF                                                                                                                Ano+Mes+Codigo RDA+Lote NF                                            S

Card documentos
InformacaoUse esse box para destacar informações relevantes e/ou de destaque.
TituloIMPORTANTE!

...