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: | Ponto de entrada executado após a criação dos títulos da fatura. Em caso de parcelamento, o ponto de entrada é executado uma vez para cada título criado. Nesse momento está posicionado na fatura e no título que foi criado. | |||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Localização: | Atualizações >> Docs Fiscais >> Emissão de Documentos Fiscais> Movimentações >Emissão de Faturas | |||||||||||||||||
Programa Fonte: | JURA203 | |||||||||||||||||
Função: | JA203TIT | |||||||||||||||||
Ponto de Entrada: | JA203SE1 | |||||||||||||||||
Parâmetros: | Nrnhum | |||||||||||||||||
Nome | Tipo | Descrição | Obrigatório | |||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|
PARAMIXB | Array | Array com 2 posições
| Sim |
Nenhum
03. EXEMPLO
#INCLUDE "RWMAKE.ch"#INCLUDE "PROTHEUS.chCH"
//-------------------------------------------------------------------
/*{Protheus.doc} J205VDoc()JA203SE1
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
Ponto de entrada após a criação de cada título da fatura
@author TOTVS
@since 27@since 15/0305/2020
@version 1.0
/*/
//-------------------------------------------------------------------
User Function J205VDocJA203SE1()
Local aArea := GetArea()
Local aAreaNXA cFatura := NXA->(GetArea())
Local cEscrit := PARAMIXB[1] // Código do escritório da fatura emitida
Local cFatura := PARAMIXB[2] // Código do fatura fatura emitida
Local lPodeEmit := .T.
Local cMsgErro := ""
If NXA->(DbSeek(xFilial("NXA")+cEscrit+cFatura))
// Verifica se o código da fatura é par
If Mod(Val(NXA->NXA_COD), 2) == 0
lPodeEmit := .F.
cMsgErro := "A fatura não pode ser emitida devido o código ser par."
EndIf
Endif
RestArea(aAreaNXA)
RestArea(aArea)Return {lPodeEmit, cMsgErro}>NXA_COD
RecLock("SE1", .F.)
SE1->E1_HIST := "Fatura: " + cFatura
SE1->(MsUnLocK())
Return Nil
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> |