Histórico da Página
...
| Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Função: Rotina Automática TMSA460 - Solicitação de Coleta
Descrição: A rotina automática TMSA460 tem como objetivo cadastrar os dados referentes às coletas que deverão ser realizadas. Programa Fonte: TMSA460 Sintaxe: Rotina Automática TMSA460 - Solicitação de Coleta ( [ ] ) Retorno:
Observações MSExecAuto({|x,y,k,w,z| TMSA460(x,y,k,w,z)},aCabec,aItens,aVeic,aCuba,nOpcx) aCabec= Array composto de campos do cabeçalho aItens = Array composto de campos dos Itens aVeic = Array composto de campos de tipos de veiculos aCuba = Array composto de campos de peso cubado nOpcx = Opção selecionada Exemplos // Exemplo de umainclusão de Solicitação de ColetaUser Functionde Coleta aCabec := {} aItens := {} aLinha := {} aVeic := {} aLinVeic := {} aCuba := {} aLinCuba := {} PRIVATE lMsErroAuto := .F. //-- InclusaoAadd{} //-- Inclusao ,Nil}) ,"011" ,Nil}) ," 20997000 "20997000 " ,Nil})
,Nil}) ,Nil}) ,Nil}) ,Nil}) ,Nil}) ,Nil}) ,"01" ,Nil}) PECAS" ,Nil}) ,Nil}) 25 ,Nil}) ,1000 ,Nil}) 2000 ,Nil}) ,"01" ,Nil}) ,"01" ,Nil}) ,3 ,Nil}) ,25 ,Nil}) ,10 ,Nil}) ,10 ,Nil}) ,10 ,Nil}) ,10 ,Nil}) TMSA460(x,y,k,w,z)},aCabec,aItens,aVeic,aCuba,3) lMsErroAuto
com sucesso !!!") EndIfReturn
Return(.T.) Parâmetros:
|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas