Histórico da Página

CONTEÚDO

1. Visão Geral
2. Descrição
3. Sintaxe
4. Parâmetros
5. Retorno

...

1. Exemplos
   

01. VISÃO GERAL

02. DESCRIÇÃO

...

Este ponto

...

de

...

03. SINTAXE

entrada tem como objetivo que sejam feitas validações para o atendimento de telemarketing, sua execução ocorre na validação das linhas e na gravação do atendimento.
Na validação das linhas sua chamada é feita sempre que o usuário troca de linha e uma ultima vez na gravação para validar a linha em que estiver posicionado, já na gravação sua
chamada é feita para a validação geral do atendimento. Sendo assim, caso sua aplicação seja feita para validação em apenas uma destas situações deve ser feita uma proteção na
execução deste conforme exemplo no item 6.

TMKLINOK - Valida a linha de Telemarketing ( [ ] ) --> lReturn 

...

Variáveis disponíveis para consulta dentro do PE:

03. SINTAXE

TMKLINOK() --> lReturn 

04. PARÂMETROS

• Não há

05. RETORNO

06. EXEMPLOS

Escolha o modelo desejado abaixo de acordo com a sua necessidade de execução:

...

Este é o exemplo básico para a execução da Rotina Automática do Pedido de Venda:

Exemplo:

#INCLUDE "PROTHEUS.CH"

User Function GEM410LI()

Local aArea       := GetArea()
Local aParam    := PARAMIXB
Local nCntFor   := aParam[1]
Local lReturn     := .T.

If aParam <> Nil

      lReturn := MsgYesNo( 'Confirma a inclusão do item'+Alltrim(STR(nCntFor))+'?', 'Validação da linha') 

EndIf

RestArea(aArea)

#INCLUDE "PROTHEUS.CH"
#INCLUDE "TMKA272.CH"

User Function TMKLINOK()

Local lReturn   := .T.

Alert( 'Passou pelo ponto de entrada TMKLINOK' )
lReturn := MsgYesNo( 'Aceita os valores?', 'Validação.' )

Return lReturn
 

#INCLUDE "PROTHEUS.CH"
#INCLUDE "TMKA272.CH"

User Function TMKLINOK()

Local lReturn := .T.

If !IsInCallStack("TudoOK")//Não executa o trecho do PE na gravacao do atendimento, apenas na validacao das linhas.
	Alert( 'Passou pelo ponto de entrada TMKLINOK na linha' )
	lReturn := MsgYesNo( 'Aceita os valores?', 'Validação de linha.' )
EndIf

Return lReturn

...