Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Rafael Jose Martins Charrua

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Rafael Jose Martins Charrua

Gravado em

Chave

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

...

Inclusão de ponto de entrada no programa LOCM001 para alterar o valor Cobrado do Cliente que irá gerar o Custo Extra, se o retorno for zero será usado o preço de venda da SB1LOCA059 no momento da estorno de AS.

Ponto de Entrada -

...

LC59EST

Descrição:Altera

o valor cobrado do clienteChamada após estorno da AS. Com os dados da FQ5 disponíveis.


Localização:

No momento de finalizar a OS antes de gerar o custo extra referente ao insumo informado na OS. do estorno da AS.


Programa Fonte:

LOCM001 LOCA059 - Integração Gestão de Frota X Rental Apontador de AS


Parâmetros:

Nome

Tipo

Descrição

Obrigatório

N/AN/AN/AN/APARAMIXB[1]NuméricoValor Total do ItemSim

Retorno:

Nome

Tipo

Descrição

Obrigatório

nValTot

Numérico

N/A

N/A

N/A

N/A

Valor total do item 

Sim

Observações:

O ponto de entrada é executado durante a gravação da FPG, neste momento os campos :

FPG_PROJET, FPG_OBRA, FPG_NRAS, FPG_PRODUTO e FPG_QUANT

Já estarão preenchidosChamada após estorno da AS. Com os dados da FQ5 disponíveis.


03. DEMAIS INFORMAÇÕES


Bloco de código
languagetext
themeFadeToGrey
firstline1
titleEXEMPLO LOCM001A
linenumberstrue
#INCLUDE "TOTVS.CH"
#INCLUDE "RWMAKE.CH"
#INCLUDE "PROTHEUS.CH"

USER FUNCTION LOCM001A()

Local nValor := ParamIxb[1]

Return//-------------------------------------------------------------------
/*/{Protheus.doc}   LC59EST
@description        Ponto de Entrada após o estorno da AS
@author             exemplo
@since              18/07/2024
/*/
//------------------------------------------------------------------
User Function LC59EST()

    MsgInfo("Posicionado na AS "+FQ5->FQ5_AS,"LC59EST")

RETURN 

  Return nValor * 1000

04. ASSUNTOS RELACIONADOS

...