Histórico da Página

CONTEÚDO

Dados Gerais
Descrição
Sintaxe
Parâmetros
Retorno
Exemplo

01. DADOS GERAIS

Produto:	TOTVS Backoffice
Linha de Produto:	Linha Protheus
Segmento:	Backoffice
Módulo:	SIGAFAT - Faturamento
Função:	MATI410B -

Mensagem Única

Compatível com
Pedido de Venda EAI (DOCUMENTTRACEABILITYORDER)
Abrangencia:	Microsiga Protheus 12
Versões:	Microsiga Protheus 12
Compativeis Paises:	Todos
Sistema Operacionais:	Todos

as Bases

as Bases de Dados:	Todos
Nivel de Acesso:	Nível 1 (Acesso Clientes)
Idiomas	Todos

02. DESCRIÇÃO

O ponto de entrada A410BSITUACA permite que seja alterada o descritivo da situação do pedido de venda, ao retornar a situação de um pedido de venda no protheus o sistema retorna com as seguintes situações:

...

Aviso

title	Importante

Esse ponto de entrada permite somente ser modificado o descritivo, não tendo ação na liberação ou bloqueio do pedido caso o pedido esteja bloqueado por qualquer motivo e a mensagem seja alterada para pedido liberado no protheus ação de liberação não vai ocorrer. Caso o pedido esteja liberado e a mensagem seja modificada para bloqueado essa ação não vai ocorrer.

Caso seja necessário o bloqueio ou desbloqueio de pedido será necessário a utilização de um outro ponto de entrada, pois esse ponto somente vai tratar a modificação da descrição da situação do pedido.

03. SINTAXE

A410BSITUACA() ---> cRet

04. PARÂMETROS

Nome	Tipo	Descrição
PARAMIXB	Vetor	Vetor de dados que deve retornar 3 posições com as seguintes informações para auxiliar no desenvolvimento do ponto de entrada: ParamIxb[1] Paramixb[2] Paramixb[3]
ParamIxb[1]	Caractere	Retorna a Filial corrente que esta sendo utlizado no momento
ParamIxb[2]	Caractere	Retorna o numero do pedido que deverá ser enviado para integração EAI.
ParamIxb[3]	Caractere	Retorna a situação atual do pedido

...

Retorno	Tipo	Descrição	Obrigatório
cRet	Caracter	Retorno do Ponto de entrada deverá ser do tipo caractere e não poderá ser vazio, caso isso não seja atendido o retorno do ponto de entrada será descartado e vai prevalecer as informações que foram definidas pelo sistema padrão.	Sim

05. EXEMPLO

Bloco de código

language	cpp
title	Exemplo

#INCLUDE 'TOTVS.CH'    

User Function A410BSIT()
Local cFilUse  := ParamIxb[1]  //filial que esta em uso
Local cNumDoc  := PadR(ParamIxb[2],TamSx3("C5_NUM")[1])   // Numero do pedido
Local cSitDoc  := ParamIxb[3]  // Situação do documento
Local cRet     := ""           // Retorno do ponto de entrada 
Local aArea    := GetArea()
Local aArSC6   := SC6->(GetArea())
Local cChave   := ""
Local nValDoc  := 0

If cFilUse == "D MG 01 "
    If !"Transmitida" $ cSitDoc
        cChave := xFilial("SC6") + cNumDoc
        DbSelectArea("SC6")
        DbSetorder(1) //C6_FILIAL+C6_NUM+C6_ITEM+C6_PRODUTO
        DbSeek(cChave )
       
        While !Eof() .And. cChave == SC6->C6_FILIAL + SC6->C6_NUM 
            
            nValDoc += SC6->C6_VALOR

            SC6->(DbSkip())
        End

        If nValDoc > 1000
            cRet := "Autorização da Gerencia Financeira"
        Else 
            cRet := cSitDoc
        EndIf

    EndIf 

EndIf 

Restarea(aArSC6)
RestArea(aArea)

Return cRet

...

Árvore de páginas

Versões comparadas

Versão antiga 5

Nova versão 6

Chave