Olá pessoal!
Mais um ponto de entrada útil para o cálculo de frete.
Se você quiser limitar de alguma forma o cálculo de frete, seja pelo parâmetro ParamIXB[1], seja por outras métricas, basta retornar .F. na função.
Se retorna falso, o sistema não finaliza o cálculo de frete
Este P.E. está localizado no fonte TMSA200.PRW
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 |
/*/{Protheus.doc} TM200CTR //TODO Ponto de entrada para bloquear Lote, caso número de CTRC's que serão gerados exceda o permitido, de acordo com o limite estabelecido pelo ponto de entrada. @author Fernando Bueno @since 01/01/2017 @version undefined @type function /*/ User function TM200CTR() Local nNumCTRC := ParamIXB[1] Local aRet := {NIL,{}} Local aDocumentos := aDoctos If MsgYesNo("Bloqueia Lote?") If nNumCTRC > 1 aRet[1] := .F. AAdd( aRet[2], {"PE bloqueou CTRC"} ) AAdd( aRet[2], {"mensagem 2"} ) EndIf EndIf Return |
Referência: http://tdn.totvs.com/display/public/PROT/TM200CTR+-+Boqueio+de+Lote
Fernando Bueno
Consultor em FBSOLUTIONS
Sou consultor na área de implantação de sistemas ERP, com experiência na análise e implantação de projetos de sistemas, configurando a estrutura do software, capacitando usuários-chaves, ministrando treinamentos e workshops.
Atuando desde 2005 no mercado de tecnologia, desenvolvendo e implantando e sistemas gerenciais, sistemas e sites web e ecommerce.
Siga-me no Linked In
Atuando desde 2005 no mercado de tecnologia, desenvolvendo e implantando e sistemas gerenciais, sistemas e sites web e ecommerce.
Siga-me no Linked In