Histórico da Página
01. DADOS GERAIS
Linha de Produto: | Microsiga Protheus® |
---|---|
Segmento: | Jurídico |
Módulo: | Pré-faturamento de Serviços - SIGAPFS |
Função: | Emissão de Faturas - JURA203 |
02. PONTO DE ENTRADA
Descrição: | Este ponto de entrada permite validar se uma fatura pode ou não gerar um documento fiscal, durante a emissão dos documentos fiscais.utiliza o adiantamento na tela de emissão de fatura | ||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Localização: | Atualizações >> Docs Fiscais Movimentações >> Emissão de Documentos FiscaisFaturas | ||||||||||||||||||||||||||||||||||
Programa Fonte: | JURA203JURA205 | ||||||||||||||||||||||||||||||||||
Função: | J205GERANFJ203ACTBT3 | ||||||||||||||||||||||||||||||||||
Ponto de Entrada: | J205VDocJ203ADIB | ||||||||||||||||||||||||||||||||||
Parâmetros: | Não há. Obs.: Na execução do PE está posicionado no registro da fatura e do adiantamento selecionado. | ||||||||||||||||||||||||||||||||||
Nome | Tipo | Descrição | Obrigatório | |||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|
PARAMIXB | Array | Array com 2 posições
| Sim |
Nome | Tipo | Descrição | Obrigatório |
---|---|---|---|
aRetornolValid | Array | lógico | Retornar verdadeiro para permitir o uso do adiantamento e falso para bloquear Array com 2 posições |
Nome | Tipo | Descrição | |
aRetorno[1] | Lógico | Quando verdadeiro, irá seguir o fluxo normal de validação. Quando falso, irá impedir a emissão de documento fiscal para a fatura que foi recebida pelo parâmetro 'PARAMIXB'. | aRetorno[2] | Caracter | Mensagem para ser exibida ao usuário para informá-lo o motivo que a fatura não pôde gerar documento fiscal.Sim |
03. EXEMPLO
#INCLUDE "RWMAKE.ch"#INCLUDE "PROTHEUS.chCH"
//-------------------------------------------------------------------
/*{Protheus.doc} J205VDoc()J203AdiB
Ponto de entrada executado ao clicar no botão de "Adicionar" o
adiantamento na emissão de faturas
@return lValid, logico, Se verdadeiro permite o uso do adiantamento
Ponto de entrada para validar se a fatura pode gerar documento fiscal
@param PARAMIXB[1] Código do escritório da fatura emitida
@param PARAMIXB[2] Código do fatura fatura emitida
@author TOTVS
@since 27@since 01/0305/2020
@version 1.0
/*/
//-------------------------------------------------------------------
User Function J205VDocJ203AdiB()
Local aArea := GetArea()
Local aAreaNXA cEscrFat := NXA->(GetArea())>NXA_CESCR
Local cEscrit := PARAMIXB[1] // Código do escritório da fatura emitida cCliAdi := NWF->NWF_CCLIAD
Local cFatura := PARAMIXB[2] // Código do fatura fatura emitida cLojaAdi := NWF->NWF_CLOJAD
Local lPodeEmit lValid := .T.
Local cMsgErro :If cCliAdi == ""
If NXA->(DbSeek(xFilial("NXA")+cEscrit+cFatura))
// Verifica se o código da fatura é par
If Mod(Val(NXA->NXA_COD), 2) == 0
lPodeEmit JCM000" .And. cLojaAdi == "01" .And. cEscrFat == "SP100"
lValid := .F.
cMsgErro := "A fatura não pode ser emitida devido o código ser par."
EndIf
Endif
RestArea(aAreaNXA)
RestArea(aArea)Return {lPodeEmit, cMsgErro} ApMsgInfo("Uso de adiantamento não permitido para o cliente: '" + cCliAdi + " - " + cLojaAdi + "!")
EndIf
Return (lValid)
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> |