Função: Execauto FATA300 - Oportunidade de vendas.
Abrangências: | Microsiga Protheus 11 , Protheus 10 |
Versões: | Protheus 10 |
Compatível Países: | Todos |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todos |
Nível de Acesso: | Nível 1 (Acesso Clientes) |
Idiomas: | Português (Brasil) , Português (Portugal) , Espanhol , Inglês |
Descrição:
Esta função utilizada para geração da oportunidade de vendas via rotina automática (ExecAuto)
Programa Fonte:
FATA300.PRX
Sintaxe:
Execauto FATA300 - Oportunidade de vendas. ( [ nOpcAuto ] [ xAutoCab ] [ xAutoAD2 ] [ xAutoAD3 ] [ xAutoAD4 ] [ xAutoAD9 ] [ xAutoADJ ] )
Retorno:
-
()
Observações
Exemplos
#Include "Protheus.ch"User Function MYFata300()Local aCabec := {}Local lRet := .T.Local lTodosSim := .F.Private lMsErroAuto := .f.dbSelectArea("AD1")dbSetOrder(1)If !dbSeek(xFilial("AD1")+"000001"+"01") // Monta o array com as informacoes para a gravacao aCabec:= {{ "AD1_FILIAL" , "" , NIL },; { "AD1_NROPOR" , "000001" , NIL },; { "AD1_REVISA" , "01" , NIL },; { "AD1_DESCRI" , "TESTE DE ROT AUTOM" , NIL },; { "AD1_DATA " , DATE() , NIL },; { "AD1_HORA " , TIME() , NIL },; { "AD1_USER " , "000000" , NIL },; { "AD1_VEND " , "01" , NIL },; { "AD1_NOMVEN" , "TESTE VEND" , NIL },; { "AD1_DTINI " , DATE() , NIL },; { "AD1_PROVEN" , "01" , NIL },; { "AD1_STAGE " , "01" , NIL },; { "AD1_MOEDA " , 1 , NIL },; { "AD1_PRIOR " , "1" , NIL },; { "AD1_STATUS" , "1" , NIL }} EndIf lTodosSim := ApMsgNoYes( 'Confirma a ação [Sim p/Todos] ?' )//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿//³Gravacao da oportunidade³//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙIf lTodosSim MSExecAuto({|x,y|FATA300(x,y)},3,aCabec) If lMsErroAuto DisarmTransaction() MostraErro() lRet := .F. Else lRet := .T. EndIfEndIf Return lRet
Parâmetros:
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
nOpcAuto | Numérico | Opção desejada 3- Inclusão 4- Alteração 5- Exclusão | |||||||||||||||
xAutoCab | Array of Record | Array contendo os itens de cabeçalho da oportunidade de venda. | |||||||||||||||
xAutoAD2 | Array of Record | Array contendo os itens da pasta Concorrente. | |||||||||||||||
xAutoAD3 | Array of Record | Array contendo os itens da pasta Time de vendas. | |||||||||||||||
xAutoAD4 | Array of Record | Array contendo os itens da pasta Parceiros. | |||||||||||||||
xAutoAD9 | Array of Record | Array contendo os itens da pasta Contatos. | |||||||||||||||
xAutoADJ | Array of Record | Array contendo os itens da pasta Produtos. |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas