Histórico da Página
MNTA6005 - Alteração de campo na movimentação de Pneus (SD3) na Análise Técnica
Características do Requisito
Linha de Produto: | Microsiga Protheus. | ||||
Segmento: | Manufatura/Distribuição e Logística | ||||
Módulo: | Manutenção de Ativos e Gestão de Frotas | ||||
Rotina: |
| ||||
Ponto de Entrada: | MNTA6005 | ||||
País(es): | Brasil | ||||
Banco(s) de Dados: | Todos | ||||
Tabelas utilizadas: | SD3 | ||||
Sistema(s) operacional(is): | Windows/Linux | ||||
Versões/Release: | 11 |
Ponto de Entrada
Descrição: | Ponto de entrada para alterar campo da SD3 na análise técnica. | ||||||||||||||||
Localização: | Informe o Submenu em que estará localizada a rotina | ||||||||||||||||
Eventos:Informe o Título da rotina | Análise Técnica dos Pneus | ||||||||||||||||
Programa Fonte:Informe o Fonte da rotina | MNTA600 | ||||||||||||||||
Função: | Informe o Nome do(s) produto(s) a ser utilizado ou “Todos”Todos | ||||||||||||||||
Retorno: |
|
Exemplo:
Return .T. |
Exemplo:
#Include 'Protheus.ch'
User Function
CN120ALTMNTA6005()
Local aCab:= PARAMIXB[1]
Local cTipo:= PARAMIXB[2]
If cTipo == '1'
aCab[4][2]:= 'NF' //Validações do usuário
EndIf
Return aCab// Parâmetros
cCodFil := PARAMIXB1 // Código da Filial
cCodDoc := PARAMIXB2 // Número do Documento
cCodSeq := PARAMIXB3 // Numeração Sequencial
dbSelectArea("SD3")
dbSetOrder(8) //D3_FILIAL+D3_DOC+D3_NUMSEQ
If dbSeek(cCodFil+cCodDoc+cCodSeq)
RecLock("SD3",.f.)
SD3->D3_EMISSAO := dDataBase
MsUnlock("SD3")
EndIf
Return .T.