Histórico da Página
...
| Portuguese | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Função: ExecAuto Nota sobre cupom LOJR130
Descrição: Exemplos de execução da Rotina automática de forma automática. Geração de uma nota para um cupom, múltiplos cupons e estorno da nota gerada. Mais informações vide Boletim do chamado TEQSE4. Sintaxe: ExecAuto Nota sobre cupom LOJR130 ( aParam ) Retorno:
Observação:Este exemplo refere-se a geração de uma nota para apenas um cupom(MV_LJ130MN com o conteúdo .F.)
/* ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ ±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±± ±±ÉÍÍÍÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍÍ»±± ±±ºPrograma ³MyLOJR130 ºAutor ³Vendas Clientes º Data ³ 03/02/2011 º±± ±±ÌÍÍÍÍÍÍÍÍÍÍØÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍ͹±± ±±ºDesc. ³ Funcao de teste para chamar a Nf sobre Cupom (LOJR130). º±± ±±º ³ A chamada desta função deverá ser adicionada ao menu do º±± ±±º ³ modulo SIGALOJA. º±± ±±ÌÍÍÍÍÍÍÍÍÍÍØÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ͹±± ±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±± ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß */ USER Function MyLOJR130 Local _aParam := {{"","","",""}} //Array do Cabeçalho do Orçamento
Private lMsHelpAuto := .T. // Variavel de controle interno do ExecAuto Private lMsErroAuto := .F. // Variavel que informa a ocorrência de erros no ExecAuto //Indica inclusão lMsHelpAuto := .T. lMsErroAuto := .F. //Monta os parametros _aParam[1][1] := "000050" _aParam[1][2] := "ECF" _aParam[1][3] := "000001" _aParam[1][4] := "01" //Chama a rotina de nota sobre cupom MSExecAuto({|a| Lojr130(a)},_aParam) If lMsErroAuto Alert("Erro no ExecAuto") DisarmTransaction() // Libera sequencial RollBackSx8() Else Alert("Sucesso na execução do ExecAuto") EndIf Return Descrição: Exemplo de execução da Rotina automática de forma automática. Este exemplo refere-se a geração de uma nota para múltiplos cupons(MV_LJ130MN com o conteúdo .T.). Sintaxe: ExecAuto Nota sobre cupom LOJR130 ( aParam, lNota, cCliNF, cLojNF ) Retorno:
Este exemplo refere-se a geração de uma nota para múltiplos cupons(MV_LJ130MN com o conteúdo .T.) /* Local aCupons := {} //Array com os cupons para geracao da nota Local lNota := .T. //Informa se eh geracao ou estorno da nota Private lMsHelpAuto := .T. // Variavel de controle interno do ExecAuto //Adiciona os cupons para geracao da nota com multiplos cupons //Chamada da EXECAUTO If lMsErroAuto Alert("Erro no ExecAuto") DisarmTransaction() // Libera sequencial RollBackSx8() Else Alert("Sucesso na execução do ExecAuto") EndIf Return
Parâmetros:
|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas