Ponto-de-Entrada: OFMT010A - Manipulação do Vetor AIncSB1
| Abrangências: | Microsiga Protheus 10 , Microsiga Protheus 11 |
| Versões: | Microsiga Protheus 10 , Microsiga Protheus 11 |
| Compatível Países: | Todos |
| Sistemas Operacionais: | Todos |
| Compatível às Bases de Dados: | Todos |
| Idiomas: | Português (Brasil) |
Descrição:
Ponto de Entrada para manipular o vetor aIncSB1, integrado com o Mata010 (cadastro de Produtos).
Eventos
/*
===============================================================================
###############################################################################
##+----------+------------+-------+-----------------------+------+----------+##
##|Programa | OFMT010A |Autor | | Data | 99/99/99 |##
##+----------+------------+-------+-----------------------+------+----------+##
##|Descri‡„o | Pondo de Entrada para manipulação do vetor aIncSB1 que é |##
##| | passado na Integração com o Mata010 (cadastro de Produtos) |##
##+----------+--------------------------------------------------------------+##
##|Uso | Concessionarias |##
##+----------+--------------------------------------------------------------+##
###############################################################################
===============================================================================
*/
User function OFMT010A()
MsgAlert("Ponto de Entrada OFMT010A chamado com Sucesso!")
Return
Programa Fonte
OFIIA000
Sintaxe
OFMT010A - Manipulação do Vetor AIncSB1 ( [ ] )
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| Array of Record |
Retorno
-
()
Observações
// aAdd(aIncSB1,{"B1_GRUDES" ,alltrim(VI3->VI3_GRUDST),Nil}) //
aAdd(aIncSB1,{"B1_PICM" ,VE5->VE5_ALIICM ,Nil}) //
aAdd(aIncSB1,{"B1_IPI" ,VIA->VIA_TXAIPI ,Nil}) //
aAdd(aIncSB1,{"B1_DESC" ,VIA->VIA_DESITE ,Nil}) // Descricao
aAdd(aIncSB1,{"B1_PRV1" ,VE5->VE5_ALTVLR ,Nil}) //
lMSHelpAuto := .t.
lMSErroAuto := .f.
If ( ExistBlock("OFMT010A") )
aIncSB1 := ExecBlock("OFMT010A",.f.,.f.,{aIncSB1})
EndIf
MSExecAuto({|x| mata010(x)},aIncSB1)
if lMSErroAuto
DisarmTransaction()
Break
endif
Variáveis
| Nome | Tipo | Escopo | Pode Alterar | descrição | ||||||||||
| Array of Record | Global | Não |