Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/327912/newLayout.css |
Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: OFMT010D - Utilização do vetor aIncSB1
Descrição: Ponto de Entrada que utiliza o vetor aIncSB1, integrado com o Mata010 (Cadastro de Produtos) para outros tratamentos, após a Inclusão do Produto. Eventos /* =============================================================================== ############################################################################### ##+----------+------------+-------+-----------------------+------+----------+## ##|Programa | OFMT010D |Autor | | Data | 99/99/99 |## ##+----------+------------+-------+-----------------------+------+----------+## ##|Descri‡„o | Pondo de Entrada que utiliza o vetor aIncSB1 que é passado |## ##| | Integração com o Mata010 (Cadastro de Produtos) para outros |## ##| | tratamentos, após a Inclusão do Produto)|## ##+----------+--------------------------------------------------------------+## ##|Uso | Concessionarias |## ##+----------+--------------------------------------------------------------+## ############################################################################### =============================================================================== */ User function OFMT010D() MsgAlert("Ponto de Entrada OFMT010D chamado com Sucesso!") Return Programa Fonte OFIIA000 Sintaxe OFMT010D - Utilização do vetor aIncSB1 ( [ ] ) Parâmetros:
Retorno
Observações { STR0004 ,"Mata010Deleta", 0 , 5} }//Excluir DbSelectArea("SB1") A010ALTERA("SB1",Recno(),4) aRotina := aClone(aRotOld) cCadastro := OemToAnsi(STR0006) //"Garantia Solicitada VW" //"Importacao do Retorno de Garantia da Fabrica" EndIf EndIf EndIf DbSelectArea("VEI") DbSetOrder(2) DbSeek( xFilial("VEI") + VIA->VIA_CODMAR + VIA->VIA_PEDCON ) If ( ExistBlock("OFMT010D") ) ExecBlock("OFMT010D",.f.,.f.,{aIncSB1}) EndIf && Utilizacao da funcao de NF Entrada MATA140 && Entrada da Nota Fiscal - Itens cTesE := "" If !Empty(VIA->VIA_TESENT) cTesE := VIA->VIA_TESENT ElseIf !Empty(VE4->VE4_TESENT) cTesE := VE4->VE4_TESENT Else cTesE := SB1->B1_TE EndIf Variáveis
|
Import HTML Content
Visão Geral
Conteúdo das Ferramentas