Histórico da Página
...
Ponto de Entrada: | GFEXFA01 | ||||||||||||
Descrição: | Permitir ajustar a data e horário do prazo de entrega de acordo com a regra do cliente | ||||||||||||
Localização: | Após a liberação do romaneio de carga, para tabelas de frete que calculam prazo pela Tarifa da Tabela de Frete | ||||||||||||
Programa Fonte: | GFEXFUNA - Função PrevEntreg | ||||||||||||
Parâmetros: |
| ||||||||||||
Retorno: |
|
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
#INCLUDE 'PROTHEUS.CH' Useruser Functionfunction GFEXFB16GFEXFA01() Local cNrRom dDataPr := PARAMIXB[1] Local cChavegwucHrPrev := PARAMIXB[2] Local cCdTrp aRet := PARAMIXB[3]{} Local cNrTab dDtPr := PARAMIXB[4]DDatabase Local cNrNegcHrPr := PARAMIXB[5]"08:00" Localif cCdfxTvdDtPr := PARAMIXB[6] Local cNrRota := PARAMIXB[7] Local dDtPrev := PARAMIXB[8] Local cHrPrev := PARAMIXB[9] Local aRet := { CTOD("25/12/2018"), "09:00:15" } Return== DDatabase RecLock("GWU",.F.) GWU->GWU_DTPENT := dDtPr GWU->GWU_HRPENT := cHrPr MsUnLock("GWU") Else aRet[1] := .F. aRet[2] := "Data prevista não calculada." Endif return aRet |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas