Histórico da Página

...

HTML

<!-- esconder o menu --> 


<style>
div.theme-default .ia-splitter #main {
    margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
    display: none;
}
#main {
    padding-left: 10px;
    padding-right: 10px;
    overflow-x: hidden;
}

.aui-header-primary .aui-nav,  .aui-page-panel {
    margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
    margin-left: 0px !important;
}
</style>

Composition Setup
import.css=/download/attachments/327912/newLayout.css

...

PONTO DE ENTRADA: EECAP100 - Processo Exportação

DESCRIÇÃO:

PROCESSO EXPORTAÇÃO - BOTÃO OK. CaminhoL: Atualizações / Processo Export / Consulta Confecção / Opções Incluir e Alterar / Botão Ok. Descrição: Chamada na função AP100Grava(), após a gravação do header e mensagens do pedido. Uso: Executar rotinas de atualização de dados após a gravação dos dados do processo de exportação.

PROGRAMA FONTE: EECAP100.PRW

SINTAXE

EECAP100 - Processo Exportação ( [ "GRV_WORK" ], [ "AP100MAN_INICIO" ], [ "CAN_MODIFY" ], [ "ANTES_TELA_PRINCIPAL" ], [ "FECHA_TELA_PRINCIPAL" ], [ "DETMAN_ANTES_DIALOG" ], [ "PE_GRVDET",nTipo ], [ "DEL_WORKIT" ], [ "CANCELA" ], [ "PE_DEL_WORK" ], [ "ESTORNO_ITEM" ], [ "PE_GRV_EE8" ], [ "PE_GRV" ], [ "GRV_PED" ], [ "PE_LINOK" ], [ "ROD_CAPA_PED",aPos ], [ "ROD_ITENS_PED",aPos ], [ "PE_COPYPED",lCapa,IItens ], [ "COPYPED_TELA" ], [ "GETPESOS",nPesLC,nPesBC ], [ "GETPESOS_OK" ], [ "PE_OFFSHORE_GERA_CAPA" ], [ "ESTORNO_PEDIDO" ], [ "ESTORNO_PEDIDO_EXT" ], [ "PE_EXC" ], [ "CALC_FOBTOT",WorkIt->EE8_CODAGE ] )

...

Permite acesso ao Array aCampoVld que contem a lista de campos do produto padrão que não serão validados ao incluir/alterar o item do pedido de exportação.

...

Retorno ()

...

Efetuar modificações na rotina de pedido de exportação.

EXEMPLOS

#include "protheus.ch"

...

Begin Sequence

If ValType(ParamIXB) == "A"

cParamIXB:= ParamIXB[1]

Else

cParamIXB:= ParamIXB

EndIf

Do Case

Case cParamIXB == "PE_COPYPED"

/*
Exemplo quando acessada a ação de cópia do processo

If ParamIXB[3] //se foi selecionada a cópia dos itens

WorkIt->(DBgoTop())
While WorkIt->(!Eof())

WorkIt->EE8_ZZZZZ:= ""
WorkIt->(DBSkip())

EndDo

WorkIt->(DBgoTop())

EndIf

*/

Case cParamIXB == "GRV_WORK"

MsgInfo("Ponto de entrada EECAP100 com o parâmetro 'GRV_WORK'")

EndCase

End Sequence

Return lRet

...

Árvore de páginas

Versões comparadas

Versão antiga 10

Nova versão 11

Chave