Exibir origem

Descrição

EECAE100 - Customização de funções de Embarque

Observações

Ponto de Entrada para customização de funções no fonte EECAE100.

Exemplos

User Function EECAE100()

If ValType(ParamIXB) == "A"

cParam:= ParamIXB1

Else

cParam:= ParamIXB

EndIf

Do Case

Case cParamIXB == "DETIP_ACTIVATE_DLG"

oMsmGet:oBox:Align := CONTROL_ALIGN_ALLCLIENT

Case cParam == "GRV_CPOS_CUSTOM"

MsgInfo("Entrou no ponto de entrada 'GRV_CPOS_CUSTOM'.")

Case cParam == "BUTTON_REMESSA"

lDtEmba := .T.
MsgInfo("Entrou no ponto de entrada 'BUTTON_REMESSA'.")

Case cParam == "PE_MARK_OK"

aAdd(aButtons,{"REPLICAR",{|| U_ReplPed()},"Novo Botao"})

Case cParam == "FECHAMENTO_EMBARQUE"

dDtEmb := EEC->EEC_DTEMBA

dDtMemEmb := EEC->EEC_DTEMBA

Case cParam == "STATUS"

cStatus := Faturado Parcialmente

Case cParam == "MSG_ADIANT_NAO_UTILIZADO"

lShowMsg := .F.

Case cParam == "PE_GRAVA"

/* Gravações customizadas das funcionalidades disponíveis em outras ações. Exemplo:

EEB->(DBSetOrder(1))

EEB->(DBSeek(xFilial() + M->EEC_PREEMB)

//looping

//tratamentos customizados na tabela de agentes e comissões

*/

MsgInfo("Ponto de entrada EECAE100, parâmetro PE_GRAVA", "PE_GRAVA")

EndCase

Return NIL

Idioma

Português(Brasil)

Versões

Microsiga_Protheus11, Microsiga_Protheus12

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Parâmetros

Nome	Tipo	Descrição
EAE100MNU	Caracter	Variável que permite incluir opções customizadas na tela do browse no botão "Ações relacionadas".
DETIP_ACTIVATE_DLG	Caracter	Permite manipular os objetos da tela de itens do embarque de exportação.
GRV_CPOS_CUSTOM	Caracter	Permite o tratamento de campos customizado no momento da gravação do embarque.
BUTTON_REMESSA	Caracter	Permite manipular a exibição do botão "Vincular NF’s de Entrada" na alteração do embarque.
PE_MARK_OK	Caracter	Permite adicionar uma nova opção na tela de seleção de pedidos na rotina de embarque.
FECHAMENTO_EMBARQUE	Caracter	Ponto de Entrada para manipulação da data de fechamento de embarque.
STATUS	Caracter	Ponto de Entrada que permite alterar o Status do Pedido de Exportação.
MSG_ADIANT_NAO_UTILIZADO	Caracter	Ponto de entrada para definir se a mensagem "Este embarque possui adiantamento(s) não utilizado(s)." "Faça a vinculação do(s) mesmo(s) na manutenção de adiantamento(s)." será exibida ou não. Por padrão, a mensagem é exibida. Para não exibir, atribuir a variável 'lShowMsg := .F.'.
PE_GRAVA	Caracter	Executado após a gravação da tabela EEC e das rotinas disponíveis em Outras Ações, tais como: Despesas nacionais (EET) Agentes (EEB) Instituições Bancárias (EEJ), Notifys (EEN) e Notas Fiscais (EEM) e antes da gravação dos itens do embarque (EE9). Ainda dentro da transação de gravação do embarque, possibilita a customização da complementação das gravações das tabelas atualizadas até o momento.

Variáveis

Parâmetro	Nome	Tipo	Pode Alterar	Descrição
DETIP_ACTIVATE_DLG	oFolder	Objeto	Sim	Objeto Folder que possibilita manipular ou criar pastas a serem exibidas na tela de itens. Estará disponível em ambientes offfshore.
DETIP_ACTIVATE_DLG	oMsmGet	Objeto	Sim	Objeto Get, com os campos da tabela EE9 exibidos na tela de edição de itens.
BUTTON_REMESSA	lDtEmba	Lógico	Sim	Quando o parâmetro referente a nota fiscal de remessa estiver habilitado e data de embarque preenchida, permite alterar a variável lDtEmba para manipular a exibição da rotina "Vincular NFs de Entrada".
FECHAMENTO_EMBARQUE	dDtEmb	Data	Sim	Variável com o conteúdo do campo "Dt. Embarque" antes de ser alterado o Embarque.
FECHAMENTO_EMBARQUE	dDtMemEmb	Data	Sim	Variável com o conteúdo do campo "Dt. Embarque" que está na memória, ou seja, durante a alteração do Embarque.
STATUS	cStatus	Caracter	Sim	Variável que permite alterar o Status do pedido de exportação.

Observação

Para edição de campos no embarque, mesmo com a data de embarque preenchida é recomendável que altere pelo Configurador (SIGACFG) o campo "Modo edição(X3_WHEN)", retirando qualquer condição de validação para que o campo possa ser editável.

Programa Fonte

EECAE100.PRW