Linha Microsiga Protheus

Árvore de páginas

Ponto-de-Entrada: TMK273PTC - Pós-gravação do Prospect em Cliente


Descrição:
O ponto de entrada TMK273PTC é executado no momento da conversão do prospect em cliente,
após a gravação dos dados do Cadastro de Clientes (SA1).

Programa Fonte:
TMKA273D.PRX

Sintaxe:

TMK273PTC( ) --> Nil


Retorno:
Nil - Nenhum

Exemplo:


User Function TMK273PTC()

Local aArea    := GetArea()
Local aAreaSA1 := SA1->(GetArea())

//Grava os campos no novo cadastro que está sendo gerado
//na conversão de Propect X Cliente
Reclock("SA1",.F.)
	SA1->A1_RECISS := "1"   //Recolhe ISS
	SA1->A1_INCISS := "S"   //ISS no Preço
SA1->(MsUnlock())

RestArea(aAreaSA1)
RestArea(aArea)

Return