Histórico da Página

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

Begin Sequence

User Function EECAE100()

Local cParamIXB

If ValType(ParamIXB) == "A"

cParamIXB

cParam:=

ParamIXB[1]

ParamIXB1 Else

cParamIXB

cParam:= ParamIXB

EndIf

Do Case

Case cParamIXB == "DETIP_ACTIVATE_DLG"
oMsmGet:oBox:Align := CONTROL_ALIGN_ALLCLIENT

EndCase
End Sequence
Return

User Function EECAE100()
Local cParam := If(Type("ParamIxb") = "A",ParamIxb1,If(Type("ParamIxb") = "C",ParamIxb,""))

If cParam == "

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

ElseIf

Case cParam == "BUTTON_REMESSA" lDtEmba := .T.

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

ElseIf

Case cParam == "PE_MARK_OK"

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

EndIf

Return Nil

User Function ReplPed()

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

Return Nil

User Function EECAE100()

If ValType(ParamIXB) == "A"

cParam:= ParamIXB1

Else

cParam:= ParamIXB

EndIf

Do

Case

Case

cParam == "FECHAMENTO_EMBARQUE" dDtEmb := EEC->EEC_DTEMBA dDtMemEmb := EEC->EEC_DTEMBA

MsgInfo("Ponto de Entrada chamado corretamente!")

Case cParam == "STATUS"

cStatus := Faturado Parcialmente

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.

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

Árvore de páginas

Versões comparadas

Versão antiga 8

Nova versão 9

Chave