...
| Produto: | ||||
|---|---|---|---|---|
| Solucoes_totvs_cross | Producto: | TOTVS Backoffice | ||
| Linha Línea de Produtoproducto: | | Linhas_totvs | | Linha | Linha|
Segmento: | | Segmentos_totvs | | Segmento | |
Módulo: | | Modulos_cross_segmentos |
TOTVS Backoffice ( LinhaLínea Protheus) - Compras (SIGACOM) | ||
| Função Función: | MATA116 - ConhecimentoConocimiento de Freteflete | |||
País: | Brasil | |||
Ticket: | ||||
Requisito/ | StoryStory/Issue (informe | o el requisito relacionado) | : |
...
El Punto de entrada MT116TEL permite sustituir la pantalla estándar de parámetros en el módulo Conocimiento de flete
...
O Ponto de Entrada MT116TEL permite substituir a tela padrão de parâmetros no módulo de Conhecimento de Frete.
...
MATA116 > “Conhecimento “Conocimiento de Frete”flete”.
É executado no início da função Se ejecuta al inicio de la función MATA116A - Programa de Digitação digitación 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 Conocimiento de flete y sustituye la pantalla estándar de parámetros. El punto de entrada debe colocar todos los parámetros en el Array “aParametros”, configure el siguiente cuadro y podrá mostrarlos, opcionalmente, en una pantalla personalizada por el cliente.
...
aParametros | DescriçãoDescripción | |||
01 | Define | a Rotina la rutina: 1- | Inclusao Inclusión / 2- | ExclusaoBorrado |
02 | Considerar | Notas facturas: 1 - Compra , 2 - | DevoluçãoDevolución | |
03Data Inicial para Filtro das NF Originais | Fecha inicial para filtro de las Facturas originales | |||
04Data Final para Filtro das NF originais | Fecha final para filtro de las Facturas originales | |||
05 | CodCód. | Fornecedor para Filtro das NF OriginaisProveedor para filtro de las Facturas originales | ||
06 | Loja Fornecedor Tienda Proveedor para filtro | das NF Originaisde las Facturas originales | ||
07 | Utiliza Formulario ¿Utiliza formulario proprio? 1- | SimSí,2- | NaoNo | |
08 | Num. da NF de Conhecimento de FreteNº de la Factura de conocimiento de flete | |||
09 | Serie | da NF de COnhecimento de Fretede la Factura de conocimiento de flete | ||
10 | Codigo do Fornecedor da NF de FRETE | 11 | Loja do Fornecedor da NF de FreteCódigo del Proveedor de la Factura de FLETE | |
11 | Tienda del Proveedor de la Factura de flete | |||
12 | Tes utilizada | na Classificacao da NFen la Clasificación de la factura | ||
13 | Valor total | do Frete sem Impostosdel Flete sin impuestos | ||
14 | Estado | de Origem do Frete/Prov/Reg de Origen del flete | ||
15 | Aglutina Produtos Agrupa productos: .T. , .F | |||
16 | Base do del Icms Retidoretenido | |||
17 | Valor | do de Icms | Retidoretenido | |
18 | Filtra | nota com conhecimento frete factura con conocimiento de flete .F. , .T. | ||
19 | Espécie da Nota FiscalClase de la factura | |||
20 | Natureza Modalidad de | Rendimentoingreso |
...
Nombre | Tipo | DescriçãoDescripción | |
lRet | LogicoLógico | .T. = Continua / .F. = | AbortaInterrumpe |
...
...
| Bloco de código | ||||||||
|---|---|---|---|---|---|---|---|---|
| ||||||||
#Include 'Protheus.ch'
/*/{Protheus.doc} MT116TEL
InsereIncluye parâmetrosparámetros aoal array noen el ConhecimentoConocimiento de Freteflete.
@type function
@author
@since 19/09/2024
/*/
User Function MT116TEL()
Local lRet := .T.
//CustomizaçõesPersonalizaciones dodel cliente
aAdd(aParametros,1) // 01o.parâmetroparámetro: Define ala Rotina rutina: 1-InclusaoInclusión / 2-ExclusaoBorrado
aAdd(aParametros,1) // 02o.parâmetroparámetro: Considerar Notas facturas: 1 - Compra , 2 - DevoluçãoDevolución
aAdd(aParametros,date()-100) // 03o.parâmetroparámetro: DataFecha Inicialinicial para filtro Filtrode daslas NFFacturas Originaisoriginales
aAdd(aParametros,date()) // 04o.parâmetroparámetro: DataFecha Finalfinal para Filtrofiltro de daslas NFFacturas originaisoriginales
aAdd(aParametros,SPACE(6)) // 05o.parâmetroparámetro: CodCód. FornecedorProveedor para Filtrofiltro de daslas NFFacturas Originaisoriginales
aAdd(aParametros,SPACE(2)) // 06o.parâmetroparámetro: LojaTienda FornecedorProveedor para filtro Fltrode daslas NFFacturas Originaisoriginales
aAdd(aParametros,2) // 07o.parâmetroparámetro: Utiliza¿Utiliza FormulárioFormulario próprio propio? 1-SimSí,2-NaoNo
aAdd(aParametros,SPACE(9)) // 08o.parâmetroparámetro: Num. da NFNº de la Factura de Conhecimentoconocimiento de Freteflete
aAdd(aParametros,SPACE(3)) // 09o.parâmetroparámetro: Serie de dala NFFactura de Conhecimentoconocimiento de Freteflete
aAdd(aParametros,SPACE(6)) // 10o.parâmetroparámetro: Código dodel Proveedor Fornecedorde dala NFFactura de FRETEFLETE
aAdd(aParametros,SPACE(2)) // 11o.parâmetroparámetro: Tienda Lojadel doProveedor Fornecedorde dala NFFactura de Freteflete
aAdd(aParametros,SPACE(3)) // 12o.parâmetroparámetro: Tes utilizada en la naClasificación Classificaçãode dala NFfactura
aAdd(aParametros,0) // 13o.parâmetroparámetro: Valor total dodel FreteFlete semsin Impostosimpuestos
aAdd(aParametros,SPACE(2)) // 14o.parâmetroparámetro: Estado/Prov/Reg de OrigemOrigen dodel Freteflete
aAdd(aParametros,.F.) // 15o.parâmetroparámetro: AglutinaAgrupa Produtos productos: .T. , .F.
aAdd(aParametros,0) // 16o.parâmetroparámetro: Base dodel Icms Retidoretenido
aAdd(aParametros,0) // 17o.parâmetroparámetro: Valor dode Icms Retidoretenido
aAdd(aParametros,.F.) // 18o.parâmetroparámetro: Filtra notafactura con comconocimiento conhecimentode freteflete .F. , .T.
aAdd(aParametros,SPACE(5)) // 19o.parâmetroparámetro: EspécieClase dade Notala Fiscalfactura
aAdd(aParametros,SPACE(5)) // 20o.parâmetroparámetro: NaturezaModalidad de Rendimentoingreso
If ! l116Auto // Si Casono nãoejecutara executandola rotinarutina automática
//-- TelaPantalla dodel usuáriousuario para exibiçãoexhibición / alteraçãomodificación de doslos parâmetrosparámetros (opcional)
//-- ExEj. de perguntapregunta (podempueden ser botõesopciones) p/ CancelarAnular ouo Confirmar ala ejecución execuçãode dala rotinarutina (recurso obrigatórioobligatorio para oel pontopunto de entrada)
lRet := ( Aviso('ATENÇÃOATENCIÓN','Executa¿Ejecuta ala rotinarutina ConhecimentoConocimiento de Freteflete?',{'CancelaAnula','Confirma'}) == 2 )
EndIf
Return lRet
|
...