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 ] )
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| "GRV_WORK" | Caracter | Executado no início da função principal antes de criar a Work. | |||||||||||||||
| "AP100MAN_INICIO" | Array of Record | Executado no início da função de manutenção dos processos. | |||||||||||||||
| "CAN_MODIFY" | Array of Record | Executado após a verificação se o pedido pode ser alterado. | |||||||||||||||
| "ANTES_TELA_PRINCIPAL" | Array of Record | Executado antes da tela principal do pedido. | |||||||||||||||
| "FECHA_TELA_PRINCIPAL" | Array of Record | Executado após a abertura da tela principal do pedido. | |||||||||||||||
| "DETMAN_ANTES_DIALOG" | Array of Record | Executado antes da tela de manutenção do item. | |||||||||||||||
| "PE_GRVDET",nTipo | Array of Record | Após a gravação dos detalhes na WorkGrp. | |||||||||||||||
| "DEL_WORKIT" | Array of Record | Após a exclusão dos detalhes na WorkGrp. | |||||||||||||||
| "CANCELA" | Array of Record | Executado quando a opção de excluir o pedido é cancelada. | |||||||||||||||
| "PE_DEL_WORK" | Array of Record | Executado no início da função AP100Del antes de deletar o registro na WORK. | |||||||||||||||
| "ESTORNO_ITEM" | Array of Record | No estorno do item, após a exclusão dos registros na EEY e antes da exlcusão dos registros na EE8. | |||||||||||||||
| "PE_GRV_EE8" | Array of Record | Executado na função AP100Grava após a gravação da EE8. | |||||||||||||||
| "PE_GRV" | Array of Record | Executado após gravação da EE8. | |||||||||||||||
| "GRV_PED" | Array of Record | Permitir alteração no processo de gravação do pedido de exportação. | |||||||||||||||
| "PE_LINOK" | Array of Record | Executado na função AP100LINOK que valida os campos da enchoice. Usado na validação da linha. 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. | |||||||||||||||
| "ROD_CAPA_PED",aPos | Array of Record | Executado antes de apresentar o rodapé da capa. | |||||||||||||||
| "ROD_ITENS_PED",aPos | Array of Record | Executado antes de apresentar o rodapé dos itens. | |||||||||||||||
| "PE_COPYPED",lCapa,IItens | Array of Record | Executado na função AP100CopyFrom, após a cópia dos dados do processo. | |||||||||||||||
| "COPYPED_TELA" | Array of Record | Executado na função AP100SelProc que copia dados de um processo, antes da tela de seleção de pedidos. | |||||||||||||||
| "GETPESOS",nPesLC,nPesBC | Array of Record | Executado antes da tela de conferência de pesos. | |||||||||||||||
| "GETPESOS_OK" | Array of Record | Executado após a abertura da tela de conferência de pesos. | |||||||||||||||
| "PE_OFFSHORE_GERA_CAPA" | Array of Record | Executado na função AP100GerPed que gera pedido para filial do exterior, no momento de gravação dos campos de memória da tabela EE7. | |||||||||||||||
| "ESTORNO_PEDIDO" | Array of Record | Executado antes de deletar o pedido da tabela EE7. | |||||||||||||||
| "ESTORNO_PEDIDO_EXT" | Array of Record | Executado antes de deletar o pedido da tabela EE7 para filial do exterior. | |||||||||||||||
| "PE_EXC" | Array of Record | Executado no final da função AP100DelPed que deleta os pedidos de exportação. | |||||||||||||||
| "CALC_FOBTOT",WorkIt->EE8_CODAGE | Array of Record | Apurar o valor Fob total dos itens em que o agente está vinculado. |
Efetuar modificações na rotina de pedido de exportação.
#include "protheus.ch"
User Function EECAP100()
Local cParamIXB
Local lRet:= .T.
Local nPos
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
| Nome | Tipo | Escopo | Pode Alterar | descrição | ||||||||||
| nTipo | Numérico | Global | Sim | |||||||||||
| nOpcAux | Numérico | Global | Sim | Variável utilizada para a alteração da opção aRotina. | ||||||||||
| nFobTotAux | Numérico | Global | Sim | Apurar o valor Fob total dos itens em que o agente está vinculado. Utilizada no PE "CALC_FOBTOT". | ||||||||||
| lEECAP100 | Lógico | Global | Não | Flag para que o ponto de entrada "PE_GRV" seja executado apenas uma vez. |