Histórico da Página

Descrição:Informe o Menu em que estará localizada a rotina

Este Ponto de Entrada tem como finalidade gravar a tabela VAO (Reg Satisfação/Insatisfação) depois que a Pesquisa de Satisfação for realizada.

Eventos:

VAO->VAO_USUREC := __CUSERID // Usuario que criou a reclamacao

VAO->VAO_USURES := cRAICUR // Usuario responsavel

VAO->VAO_DEPART := cRAICDP // Departamento

VAO->VAO_TIPREC := cRAICTR // Tipo de reclamacao

VAO->VAO_SITUAC := "0" // Reclamacao aberta

If lOrigem

VAO->VAO_TIPORI :

Informe o Título da rotina

Função:

Informe o Nome do(s) produto(s) a ser utilizado ou “Todos”

= cTipOri // Tipo de Origem

VAO->VAO_FILORI := cFilOri // Filial da Origem

VAO->VAO_ORIGEM := cCodOri // Codigo da Origem

VAO->VAO_TIPTEM := cTipTem // Tipo de Tempo

VAO->VAO_CODPRO := cCodPro // Codigo do Produtivo

EndIf

MsUnlock()

ConfirmSX8()

M->VAO_RECLAM := cRAICOBS

MSMM(VAO->VAO_RECLAO,TamSx3("VAO_RECLAM")[1],,&("VAO_RECLAM"),1,,,"VAO","VAO_RECLAO")

//Ponto de entrada após gravar VAO depois que fez a Pesquisa de Satisfação.

if ExistBlock("VCA100VAO")

ExecBlock("VCA100VAO",.f.,.f.)

Endif

Função:

Informe o Nome do(s) produto(s) a ser utilizado ou “Todos”