Histórico da Página

Descrição

EICGI400 - Manutenção de L.I.

Observações

Utilizado durante a rotina de manutenção de L.I.

Exemplos

User Function EICGI400()

Local cParam:= ""

Local xRet

IF Type("ParamIXB") == "C"

cParam:= PARAMIXB

Else

cParam:= PARAMIXB[1]

Endif

If cParam == "ADD_WORK_TMP"

aAdd(aStru_TMP,{"EIT_TESTE","C",AvSx3("EIT_TESTE",3),0})
aAdd(aHeader,{AvSx3("EIT_TESTE",5),"EIT_TESTE" ,AvSx3("EIT_TESTE",6),AvSx3("EIT_TESTE",3),0,"",Posicione("SX3",2,"EIT_ORGAO","X3_USADO") ,"C","EIT"})
aAdd(aCamposEIT,"EIT_TESTE")

Elseif cParam == "ADD_WORK_EIT"

aAdd(aStru_EIT,{"EIT_TESTE","C",AvSx3("EIT_TESTE",3),0})

Elseif cParam == "CARREGA_WORK_EIT1"

Work_EIT->EIT_TESTE := EIT->EIT_TESTE

Elseif cParam == "CARREGA_WORK_TMP"

Work_TMP->EIT_TESTE := Work_EIT->EIT_TESTE

Elseif cParam == "CARREGA_WORK_EIT2"

Work_EIT->EIT_TESTE := Work_TMP->EIT_TESTE

ElseIf cParam == "FILTRO_MBROWSE"

xRet := "WP_FABR='000002' And WP_FABLOJ='02'"

ElseIf cParam == "MSG_AC"

lMsgAC := .F.

ElseIf cParam == "VARIAVEIS"

//permite definir variáveis para quebra da sequência da LI

//cVar_Quebra:= conteúdo de controle

//cCpo_Quebra:= conteúdo de comparação

ElseIf cParam == "QUEBRA"

//permite alterar variáveis para quebra da sequência da LI

//cVar_Quebra:= conteúdo de controle

//cCpo_Quebra:= conteúdo de comparação

ElseIf cParam == "QUEBRAESPECIAL"

//permite criar uma regra própria para quebra da sequencia da LI

//lQuebrou:= .T.

Endif

Return xRet

Preview

Veja também

Idioma

Português(Brasil)

Versões

Microsiga_Protheus11

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

Parâmetros

Nome	Tipo	Descrição	Default	Obrigatório	Referência
ADD_WORK_TMP	Carácter	Usado para criar o campo na tabela Work_TMP
ADD_WORK_EIT	Carácter	Responsável para adicionar o campo na estrutura da tela
CARREGA_WORK_EIT	Carácter	Responsável para carregar informação na tabela Work_EIT
CARREGA_WORK_TMP	Carácter	Responsável para carregar informação na tabela Work_TMP
CARREGA_WORK_EIT2	Carácter	Responsável para carregar informação na tabela Work_EIT2
FILTRO_MBROWSE	Carácter	Utilizado para filtrar os registros apresentados na mBrowse
MSG_AC	Caracter	Utilizado para bloquear mensagens de apropriação de Ato Concessório.
VARIAVEIS	Caracter	Utilizado para definir as variáveis de controle de quebra da LI/ PLI ou redefinir o seu fluxo
QUEBRA	Caracter	Utilizado para manipular as variáveis de controle de quebra da LI/ PLI ou redefinir o seu fluxo
QUEBRAESPECIAL	Caracter	Utilizado para criar uma regra específica de quebra da LI/ PLI em substituição a quebra realizada pelo produto padrão

Retorno

.T. - Retornar sempre true

Eventos de chamada do Ponto de Entrada

Variáveis

Nome	Tipo	Escopo	Pode Alterar	Descrição
aStru_TMP	Array	Private	Sim	Array responsável para adicionar campos a estrutura da Work_TMP
aStru_EIT	Array	Private	Sim	Array responsável para adicionar campos a estrutura da Work_EIT
cFilMbrow	Caracter	Local	Sim	Variável responsável por adicionar um filtro na mBrowse
lMsgAC	BoleanaBoleano	Private	Sim	Variável que se negada não exibe mensagem de apropriação do Ato Concessório ao item.
cVar_Quebra	Caracter	Private	Sim	Variável para definição de conteúdo de controle para regra de quebra da sequência da LI/ PLI. Disponível no ponto de entrada com os parâmetros VARIAVEIS e QUEBRA.
cCpo_Quebra	Caracter	Private	Sim	Variável para definição de conteúdo de controle e comparação para regra de quebra da sequência da LI/ PLI. Disponível no ponto de entrada com os parâmetros VARIAVEIS e QUEBRA.
lQuebra_Espe	Boleano	Private	Sim	Variável que definirá o desvio para o uso do ponto de entrada com o parâmetro QUEBRAESPECIAL para implementação de quebra customizada. Disponível no ponto de entrada com o parâmetro VARIAVEIS.
lQuebrou	Boleano	Private	Sim	Variável que define se houve a quebra da sequência da LI/ PLI. Disponível no ponto de entrada com o parâmetro QUEBRAESPECIAL.

Programa Fonte

EICGI400.PRW

Árvore de páginas

Versões comparadas

Versão antiga 5

Nova versão 6

Chave