Salve salve....
Ponto de entrada MT116VTP - ( Compras - Digitacao de Conhecimento de Frete )
MATA116-MT116VTP - Valida a tela de parâmetros.
#INCLUDE "TOTVS.CH" /*/{Protheus.doc} MT116VTP Valida a tela de Digitação de Conhecimento de Frete.  @type function @author Eurai Rapelli @since 2023.01.01 /*/ User Function MT116VTP() Local lRet := .T. as logical Local aParametros := ParamIXB[01] as array /* aParametros:= { nCombo1,; // 1 Define a Rotina : 1-Inclusao / 2-Exclusao nCombo2,; // 2 Considerar Notas : 1 - Compra , 2 - Devolucao d116DataDe,; // 3 Data Inicial para Filtro das NF Originais d116DataAte,; // 4 Data Final para Filtro das NF originais c116FornOri,; // 5 Cod. Fornecedor para Filtro das NF Originais c116LojaOri,; // 6 Loja Fornecedor para Fltro das NF Originais nCombo3,; // 7 Utiliza Formulario proprio ? 1-Sim,2-Nao c116NumNF,; // 8 Num. da NF de Conhecimento de Frete c116SerNF,; // 9 Serie da NF de COnhecimento de Frete c116Fornece,; // 10 Codigo do Fornecedor da NF de FRETE c116Loja,; // 11 Loja do Fornecedor da NF de Frete c116Tes,; // 12 Tes utilizada na Classificacao da NF n116Valor,; // 13 Valor total do Frete sem Impostos c116UFOri,; // 14 Estado de Origem do Frete (nCombo4==1),; // 15 Aglutina Produtos : .T. , .F. n116BsIcmRet,; // 16 Base do Icms Retido n116VlrIcmRet,; //17 Valor do Icms Retido (nCombo5==2),; //18 Filtra nota com conhecimento frete .F. , .T. c116Especie,; //19 Especie da Nota Fiscal } */ Return( lRet )
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎
Um abraço, e até a próxima