[pft]if v3009^n='NOVO'
then
if a(v3006) or v3006^m='New'
then ''/
else
if a(v2000) and v3005^t<>'S'
then ''/
else ''/
fi,
fi,
else
if v3009^n='ALTERACAO'
then
''/
if a(v3005^a)
then '
Este Tipo de literatura não permite analítica'/
else
if a(v2000)
then ''/
else ''/
''/
''/
''/
fi,
fi,
else
if v3009^n='INDEXACAO'
then ''/
if a(v2000)
then '
Documento sem analíticas'/
else ''/
''/
fi,
fi,
fi,
fi,[/pft]
[pft]
if v3009^n='NOVO'
then
if (a(v3006) or v3006^m='New') and a(v2000)
then 'Para efetivar a criação do documento ingresse o registro fonte.
'
else
if p(v2000)
then 'Lista de analíticas do documento
'
(''v2000^t'
')
fi,
fi,
else
if p(v2000)
then 'Lista de analíticas do documento
'
fi,
fi,
[/pft]