Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/327912/newLayout.css |
Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: TM500BLQ - Bloqueia a alteração do serviço de transporte
Descrição: Este Ponto de Entrada, localizado no TMSA500 (Manutenção Doctos.) tem por objetivo bloquear a alteração do serviço de transporte quando a filial de origem for diferente da filial destino. Programa Fonte TMSA500.PRW Sintaxe TM500BLQ - Bloqueia a alteração do serviço de transporte ( [ ] ) --> lRet Parâmetros:
Retorno
Exemplos #Include 'Protheus.ch'User Function TM500BLQ()Local lRet := .T.Local cCdrOri := DT6->DT6_CDRORILocal cCdrDes := DT6->DT6_CDRDESIf cCdrOri <> cCdrDes Alert("Não é permitido realizar a Manut. Transp. quando a Filial de Origem for diferente da Filial Destino.") lRet := .F.EndIfReturn( lRet ) Variáveis
|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas