| Produto: | |
|---|---|
| Linha de Produto: | |
| Segmento: | |
| Módulo: | |
| Função: | MATA116 - Conhecimento de Frete |
| País: | Brasil |
| Ticket: | |
| Requisito/Story/Issue (informe o requisito relacionado) : |
O Ponto de Entrada MT116TEL permite substituir a tela padrão de parâmetros no módulo de Conhecimento de Frete.
MATA116 > “Conhecimento de Frete”.
É executado no início da função MATA116A - Programa de Digitação de Conhecimento de Frete e substitui a tela padrão de parâmetros. O ponto de entrada deve colocar todos os parâmetros no Array “aParametros”, conf. o quadro abaixo e poderá exibi-los, opcionalmente, numa tela customizada pelo cliente.
aParametros | Descrição |
|---|---|
| 01 | Define a Rotina : 1-Inclusao / 2-Exclusao |
| 02 | Considerar Notas : 1 - Compra , 2 - Devolução |
| 03 | Data Inicial para Filtro das NF Originais |
| 04 | Data Final para Filtro das NF originais |
| 05 | Cod. Fornecedor para Filtro das NF Originais |
| 06 | Loja Fornecedor para filtro das NF Originais |
| 07 | Utiliza Formulario proprio ? 1-Sim,2-Nao |
| 08 | Num. da NF de Conhecimento de Frete |
| 09 | Serie da NF de COnhecimento de Frete |
| 10 | Codigo do Fornecedor da NF de FRETE |
| 11 | Loja do Fornecedor da NF de Frete |
12 | Tes utilizada na Classificacao da NF |
13 | Valor total do Frete sem Impostos |
14 | Estado de Origem do Frete |
15 | Aglutina Produtos : .T. , .F |
16 | Base do Icms Retido |
17 | Valor do Icms Retido |
18 | Filtra nota com conhecimento frete .F. , .T. |
19 | Espécie da Nota Fiscal |
20 | Natureza de Rendimento |
Nome | Tipo | Descrição |
|---|---|---|
| lRet | Logico | .T. = Continua / .F. = Aborta |
#Include 'Protheus.ch'
/*/{Protheus.doc} MT116TEL
Insere parâmetros ao array no Conhecimento de Frete.
@type function
@author
@since 19/09/2024
/*/
User Function MT116TEL()
Local lRet := .T.
//Customizações do cliente
aAdd(aParametros,1) // 01o.parâmetro: Define a Rotina : 1-Inclusao / 2-Exclusao
aAdd(aParametros,1) // 02o.parâmetro: Considerar Notas : 1 - Compra , 2 - Devolução
aAdd(aParametros,date()-100) // 03o.parâmetro: Data Inicial para Filtro das NF Originais
aAdd(aParametros,date()) // 04o.parâmetro: Data Final para Filtro das NF originais
aAdd(aParametros,SPACE(6)) // 05o.parâmetro: Cod. Fornecedor para Filtro das NF Originais
aAdd(aParametros,SPACE(2)) // 06o.parâmetro: Loja Fornecedor para Fltro das NF Originais
aAdd(aParametros,2) // 07o.parâmetro: Utiliza Formulário próprio ? 1-Sim,2-Nao
aAdd(aParametros,SPACE(9)) // 08o.parâmetro: Num. da NF de Conhecimento de Frete
aAdd(aParametros,SPACE(3)) // 09o.parâmetro: Serie da NF de Conhecimento de Frete
aAdd(aParametros,SPACE(6)) // 10o.parâmetro: Código do Fornecedor da NF de FRETE
aAdd(aParametros,SPACE(2)) // 11o.parâmetro: Loja do Fornecedor da NF de Frete
aAdd(aParametros,SPACE(3)) // 12o.parâmetro: Tes utilizada na Classificação da NF
aAdd(aParametros,0) // 13o.parâmetro: Valor total do Frete sem Impostos
aAdd(aParametros,SPACE(2)) // 14o.parâmetro: Estado de Origem do Frete
aAdd(aParametros,.F.) // 15o.parâmetro: Aglutina Produtos : .T. , .F.
aAdd(aParametros,0) // 16o.parâmetro: Base do Icms Retido
aAdd(aParametros,0) // 17o.parâmetro: Valor do Icms Retido
aAdd(aParametros,.F.) // 18o.parâmetro: Filtra nota com conhecimento frete .F. , .T.
aAdd(aParametros,SPACE(5)) // 19o.parâmetro: Espécie da Nota Fiscal
aAdd(aParametros,SPACE(5)) // 20o.parâmetro: Natureza de Rendimento
If ! l116Auto // Caso não executando rotina automática
//-- Tela do usuário para exibição / alteração dos parâmetros (opcional)
//-- Ex. de pergunta (podem ser botões) p/ Cancelar ou Confirmar a execução da rotina (recurso obrigatório para o ponto de entrada)
lRet := ( Aviso('ATENÇÃO','Executa a rotina Conhecimento de Frete?',{'Cancela','Confirma'}) == 2 )
EndIf
Return lRet
|