Histórico da Página
...
If VALTYPE(PARAMIXB) == "C" .And. PARAMIXB == "CALC_EMB_MULTIPLA"
//Verifica a empresa onde poderá ser executada a rotina
If Alltrim(cEmpAnt) == "99"
//Apura o peso da quantidade de embalagens internas já calculada pelo sistema para o item
nQtdEmb := nQtdeEmbInt
nPesEmb := nQtdEmb * EE5->EE5_PESO
//Ordenação da tabela de relação de embalagens
EEK->(DbSetOrder(1))
//Faz o Loop na relação de embalagens
If EEK->(DbSeek(xFilial("EEK")+"E"+cEmbalagem))
Do While EEK->(!Eof()) .And. EEK->EEK_FILIAL == xFilial("EEK") .And.;
EEK->EEK_TIPO == "E" .And.;
EEK->EEK_CODIGO == cEmbalagem
//Posiciona o cadastro de embalagens pela embalagem superior
If EE5->(DbSeek(xFilial("EE5")+EEK->EEK_EMB))
//Calcula o percentual de utilização da embalagem interna na embalagem superior
nQtdEmb := nQtdEmb / EEK->EEK_QTDE
//Atualiza o peso do relacionamento item + embalagens da relação
nPesEmb += (EE5->EE5_PESO * nQtdEmb)
//Atualiza a embalagem para buscar a próxima na relação
cEmbalagem := EEK->EEK_EMB
EndIf
EEK->(DbSkip())
EndDo
EndIf
EndIf
EndIf
Return
Para acessar este parâmetro (CALC_EMB_MULTIPLA) é necessário que os seguintes parâmetros/campos estejam informados com os valores a seguir:
PARAMETROS:
MV_AVG0009 ( Digitação de peso bruto total por item )
- Parametrizar .F.
MV_AVG0063 ( Calculo do Pes.Bruto Total (do item) Qtde*Peso Br.Unit )
- Parametrizar .F.
CAMPOS:
SB1->B1_REPOSIC
- Se existir o campo, informar com o valor "2=Não"
EE7_BRUEMB (Pedido) ou EEC_BRUEMB(Embarque)
- Se existir este campo, verificar se no Pedido este campo se inicia com valor "1-sim". Se não inicializar desta forma, alterar no módulo configurador este campo para que inicialize com o valor “1”
03. PARÂMETROS
Nome | Tipo | Descrição |
---|---|---|
NOT_DIALOG | Caracter | Variável que permite a customização da tela de Notifys. |
TROCA_FILIAL_NOTA | Caracter | Ponto de entrada responsável pela troca de filial para geração de nota |
TROCA_PERCOM_VLCOM | Caracter | Ponto de entrada para troca do valor da comissão do agente salva na work WorkIp ou WorkIt |
COMIS_TOT | Caracter | Ponto de entrada permite alterar o campo que será usado no calculo da comissão do agente. Através desse ponto de entrada, podem ser acessadas as tabelas "EE8/WorkIt(Fase Pedido Exportação)" ou "EE9/WorkIp(Fase Embarque)". Os nomes das tabelas serão passados nas posições 2 e 3 do ParamIxb. |
VALID_AG_COM | Caracter | Executado na validação da inclusão do agente e da comissão, permite implementar validações adicionais. Quando o retorno deste ponto for .F. (false), a inclusão da comissão do agente será interrompida. Estará disponível a variável nTipoDet, que indicará as ações executadas pelo usuário, a saber: 3: Visualização 4: Inclusão 5: Alteração 6: Exclusão |
{"PE_GRV_EET", WorkDe->EET_RECNO} | Array | Executado no looping da tabela temporária WorkDe, no momento da atualização dos dados na tabela de despesas nacionais (EET), permite customizar as gravações dos dados. A primeira posição do array, PE_GRV_EET, indica o momento em que o ponto de entrada é executado. A segunda posição do array é o RecNo do registro na tabela EET. Quando for 0, indicará que a despesa está sendo incluída e quando diferente de 0, indicará que é uma alteração de uma despesa existente. Estarão disponíveis neste momento dados das despesas nacionais nas tabelas WorkDe e EET. Este ponto é executado antes da realização da integração com o módulo SIGAFIN, para geração do título a pagar da despesa. |
FIM_BROWSE_AG | Caracter | Executado após a confirmação ou cancelamento da tela do agente de comissão - tela principal que lista todos os agentes de comissão. Para identificar se o usuário confirmou ou cancelou a gravação da tela, deve ser verificada a variável lOk. |
PE_SETMBROWSE | Caracter | Permite personalizar a exibição da mBrowse. |
ALT_TITULO_FIN | Permite alterar títulos gerados nas comissões de agente. | |
CALC_EMB_MULTIPLA | Alteração do cálculo do peso total das embalagens relacionadas ao item do Pedido de Exportação |
...