Olá, tudo bem? Algumas vezes é necessário bloquear uma opção de parâmetro de um “Pergunte”, para todos os usuários. Então[…]
Saiba maisAutor: Fernando Bueno
MNTA420P – Chamado após a inclusão, alteração ou o cancelamento de uma O.S.
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 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 |
/*/{Protheus.doc} MNTA420P //TODO Chamado após a inclusão, alteração ou o cancelamento de uma O.S. @author Fernando @since 15/09/2017 @version undefined @type function /*/ User Function MNTA420P() Local aArea := GetArea() Local cHtml := "" Local cNumOS := STJ->TJ_ORDEM Local dDataOrig := DTOC(STJ->TJ_DTORIGI) Local cCodBem := STJ->TJ_CODBEM Local cServic := STJ->TJ_SERVICO Local cDesSer := AllTrim(Posicione("ST4",1,xFilial("ST4")+STJ->TJ_SERVICO,"T4_NOME")) Local cObserv := STJ->TJ_OBSERVA Local cUsr := STJ->TJ_USUARIO If AllTrim(STJ->TJ_TERCEIR) <> '2' RestArea(aArea) Return EndIf // Parâmetro nOPCX := ParamIxb[1] // Inclusão, Alteração ou Exclusão cHtml += "<p><span style='text-decoration: underline;'><strong>Lanchero Alimentos do Brasil LTDA</strong></span></p>" cHtml += "<p> </p>" cHtml += "<p><strong>Dados da Ordem de Serviço</strong></p>" cHtml += "<p><strong>Num:</strong> " + cNumOS + "</p>" cHtml += "<p><strong>Data:</strong> " + dDataOrig + "</p>" cHtml += "<p><strong>Bem:</strong> " + cCodBem + "</p>" cHtml += "<p><strong>Serviço:</strong> " + cServic + " - " + cDesSer + "</p>" cHtml += "<p><strong>Observação: </strong></p>" cHtml += "<p>" + StrTran(cObserv,CHR(13),"<br/>") + "</p>" cHtml += "<p><strong>Incluído por:</strong>" + cUsr + "</p>" cHtml += "<p> </p>" cHtml += "<p>Verifique se o documento fiscal referente a OS foi entregue em seu setor.</p>" cHtml += "<p>Ao incluir o documento fiscal, vincule o item correspondente à OS</p>" cHtml += "<p><em>Esta é uma mensagem automática</em></p>" cHtml += "<p> </p>" cHtml += "<p> </p>" If nOPCX == 3 U_TEnvMail(SuperGETMV("MV__MAILOS",.F.,"mf@lanchero.com.br"),"Nova Ordem de Serviço para terceiros incluída",cHtml) ElseIf nOPCX == 4 //MsgInfo("Alteração de O.S. Realizada.") ElseIf nOPCX == 5 //MsgInfo("Cancelamento de O.S. Realizado.") EndIf RestArea(aArea) Return .T. |
Saiba mais
5 Dicas para melhorar a eficiência das suas entregas
A movimentação de cargas ao redor do mundo envolve muita administração e coordenação, com vários processos trabalhando simultaneamente. Ao melhorar[…]
Saiba maisO que é FIFO ou PEPS o que é ?
FIFO significa “First In, First Out”. Ou PEPS, em português, “Primeiro a Entrar, Primeiro a Sair”. É um método usado[…]
Saiba maisO que é gerenciamento de inventário?
O gerenciamento de estoque é uma abordagem sistemática para suprir, armazenar e vender o estoque, tanto de matérias-primas (componentes), quanto[…]
Saiba maisDiferenças entre Redespacho, Redespacho Intermediário e Subcontratação?
Num mercado altamente competitivo, com prazos de entrega cada vez mais apertados e inúmeros desafios relacionados à logística e distribuição,[…]
Saiba maisComo Cadastrar NCM no Protheus
Olá, tudo bem? Segue abaixo os passos básicos de como cadastrar NCM no Protheus. É um menu que deve ser adicionado onde melhor[…]
Saiba maisCurso Faturamento
Como utilizar a função FieldPos
Quando estamos programando em AdvPL, pode acontecer de precisarmos referenciar um determinado campo, onde o mesmo foi criado através de[…]
Saiba maisSistema DCTFWeb
Está disponível, no sítio da Receita Federal na internet, a Declaração de Débitos e Créditos Tributários Federais Previdenciários e de[…]
Saiba mais6 tendências para o mercado de ERP
Há alguns anos, no mundo dos sistemas de gestão empresarial, era impensável atualizar um Enterprise Resource Planning (ERP) a toda[…]
Saiba maisComo fornecer informações de pedidos para os clientes via web
Olá, tudo bem? Uma grande solicitação dos clientes (e até de vendedores) é: gostaria de estar ciente de tudo que[…]
Saiba mais