01. VISÃO GERAL

O ponto de entrada OG430BSE() esta disponível na rotina do gestor de entidade, na opção financeiro, no ajuste de pendencia da fixação onde requer a geração de complemento de preço.

Permite definir o numero da serie para o documento de complemento de preço de venda ou compra que será gerado.

Por padrão a rotina define a serie do documento de saida pelo parametro MV_OGASERS, e a serie do documento de entrada pelo parametro MV_OGASERE. Caso o parametro esteja em branco, não configurado, o sistema abre a tela para o usuario informar a serie desejada. O ponto de entrada OG430BSE() permitira customizar a serie conforme retorno do ponto de entrada, e caso não seja definido pelo ponto de entrada seguirá o padrão do sistema, abrindo a tela para ser informado.


Localização:

OGA430B - geração de complemento de preço para a pendencia de fixação do romaneio.

Programa Fonte:

OGA450 - Serviço de Armazenagem

Função:

OG430BSE()

Chamada
cSerCompl := ExecBlock("OG430BSE",.F.,.F.,{NN8->NN8_CODCTR, NN8->NN8_ITEMFX, __lCtrVnd, __cSeriSF1,__cSeriSF2})

Parametros:

Nome

Tipo

Descrição

Obrigatório

NN8_CODCTR

Caracter

Código do contrato

Sim

NN8_ITEMFXCaracterItem da fixaçãoSim
__lCtrVndLogicoInforma se é contrato de Venda(.T.) ou Compra(.F.)Sim
__cSeriSF1CaracterSerie para a nota fiscal de entrada(SF1)Não
__cSeriSF2CaracterSerie para a nota fiscal de Saida(SF2)Não
Retorno:

Nome

Tipo

Descrição

Obrigatório

cSerCompl

Caracter

Serie para o documento

Não


02. EXEMPLO DE UTILIZAÇÃO

Abaixo segue um exemplo do ponto de entrada.

User Function OG430BSE()

	Local cCodRom  		:= PARAMIXB[1]
	Local cCodCtr       := PARAMIXB[1]
	Local cNN8_ITEMFX   := PARAMIXB[2]
	Local lCtrVnda      := PARAMIXB[3]
	Local cSeriSF1 		:= PARAMIXB[4]
	Local cSeriSF2 		:= PARAMIXB[5]  
	Local cSerieAux 	:= ''

	If  lCtrVnda      
   		cSerieAux := '004'
	Else
   		cSerieAux := '003'
	EndIf
	
Return ( cSerieAux )