Histórico da Página

CONTEÚDO

1. Visão Geral
2. Exemplo de utilização
3. Tela XXX
   1. Outras Ações / Ações relacionadas
      
4. Tela XXXPrincipais Campos e ParâmetrosMenus
5. 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 AddedOutras Ações / Ações relacionadas

03. MENUS

 Adicionar o menu abaixo:

04. TABELAS UTILIZADAS

...

Ajustes na tabela BCI (Protocolo de Entrega de Guias )

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

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.

Ordem	Chave	Descrição	Showpesq
I	BCI_FILIAL+BCI_LOTENF	Lote NF         Lote Fec. NF	S

Card documentos
Informacao Deverá ser criado o indice na BCI na sequencia "I" Titulo IMPORTANTE!

S

Criação tabela BOJ (Lote Fechamento NF)

Ordem	Nome	Filial	Unidade	Empresa	Chave Única
I	Lote Fechamento NF	C	E	E	B0J_FILIAL+B0J_LOTENF

        Criação de campo:

...

PERVACPercentual Via Cobrança  BMECODTAB3GETNEWPAR("MV_PLSLRF","0") =="1"cTabBMG 

Campo	Tipo	Tamanho	Decimal	Nome	Inicializador Padrão	Validação	Consulta	Lista de Opções	Visual	Contexto	Modo Edição	Usado	Browse
BA0B0J_LISREFFILIAL	Caracter	12	0	Lista Referenciada	Filial		PERTENCE("12" )		1=Sim;2=Não	Alterar	Real		Sim	Sim
B0J_LOTENF	Caracter	8	0	Lote Fechamento NF					Alterar	RealGETNEWPAR("MV_PLSLRF","0") =="1"		Sim	Sim
BGRB0J_POSREFCODRDA	Caracter	16	0	Orderm Lista Referenciada	Pertence("123456789")Código RDA					Alterar	Real	GETNEWPAR("MV_PLSLRF","0") =="1"		Sim	Sim
BR8B0J_LISREFANO	Caracter	14	0	Ano					Alterar	Real		Sim	Sim
B0J_MES	Caracter	2	0	Mes	Lista Referenciada	PERTENCE("12" )	1=Sim;2=Não					Alterar	Real		Sim	Sim
B0J_DATPRO	Date	8	0	Data Processamento					Alterar	RealGETNEWPAR("MV_PLSLRF","0") =="1"		Sim	Sim
BMFB0J_CODTABVLRAPR	CaracterNumérico	316	02	Código Tabela	Valor Apresentado	IIF(EMPTY(M->BMF_CODTAB),.T.,PlsSeek("BF8",1,PLSINTPAD()+M->BMF_CODTAB))	B72PLS				Alterar	Real		Sim	Sim
B0J_VLRPAG	Numérico	16	2	Valor Pagamento					Alterar	RealGETNEWPAR("MV_PLSLRF","0") =="1"		Sim	SimBX6
B0J_
VLRGLO	Numérico	16	2
Valor Glosado					Alterar	Real
GETNEWPAR("MV_PLSLRF","0") =="1"
	Sim	Sim
B0J_
STATUS	Caracter
1	0
Código Tabela	CTabBME	Visualizar	Real
Status		PERTENCE("AF" )		A=Aberto;F=Fechado	Alterar	Real
		Sim	Sim
BMG_CODTAB	Caracter	3	0	Código Tabela

Criação de Índice

Ordem	Chave	Descrição	Showpesq
1	B0J_FILIAL+B0J_LOTENF	Lote NF

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

...

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