'record=error'/ 'style=fixed'/ '1 message'/ 0 v2001 'STATUS'/'BD:',if v1091^s : 'm' then 'Y' else 'N' fi/ 'IF:',if v1091^s : 'i' then 'Y' else 'N' fi/ if p(v1091^n) then 'MAXMFN:',f(val(v1091^n) - 1,1,0) fi/ 'DENTRYLOCK:'v1091^d,/ 'EXCLUSIVEWRITELOCK:'v1091^e,/ v1092/ termino v2001 v3001 1000 Isis_Key Isis_Postings 'DICCIONARIO

'## 2001 9005 9006 ''v2010' ('v2011')
'/ 2010 v2003 termino v2001 v3001 v3001'ZZZZZZZZZZ' ALL Isis_Current Isis_Key Isis_Postings Isis_Posting 'POSTINGS

'## 2001 3001 9005 9006 if v3001=v1 then if val(v3^i)=1 then V1'

' '' fi, '' '' '' fi, '
Mfn Tag Occ Seq
'v3^m,'' ''v3^t''v3^o''v3^c'
' 2010 v2003 from count v2001 v3001 1 Isis_Status Isis_RecordStatus Isis_Total '
' ALL 3005 v2003 XOn Formato count v2001 1 v2004 Isis_Status Isis_RecordStatus Isis_Total 3030 V3030, 3005 v2003 from count v2001 v3001 v3002 Isis_Status Isis_RecordStatus Isis_Total 'Lista de registros

'## '
' if v1091='1' then 'Registro Eliminado
' fi ALL 3005 v2003 from count v2001 v3001 v3002 Isis_Status f(mfn,10,0),'|'if v1091='1' then 'DELETED' '|'/ else if p(v1101) or v1091='-2' then 'LOCKED' v1101,'|' v1091 else '|'/ fi, fi/ v2003 v2001 v2003 v2001 unlocked unlock from count if v2003 = 'control' then v2003 fi v2001 v3001 v3002 Isis_Status ,if v1091='1' then f(mfn,1,0),'|DELETED' /fi if v1091='-2' or p(v1101) then else 'Next' fi 2001 v2001 mfn(1) 0 'control.xis: ',getenv('REMOTE_ADDR') Isis_Lock Isis_Status Unlock f(mfn,1,0),'|UNLOCKED'/ v2003 v2001 v2001,'.fst' cat(v2004) Isis_Status mfn/ inverted v2004 v5001 'OK' 1

xOn cipar syspar from count login password Formato base Opcion cttype path_db if p(v9088) then 'Content-type: text/html'/# fi if p(v5016) then replace(s(cat(v5016)),'%path_database%',v1),fi,/if p(v5015) then replace(s(cat(v5015)),'%path_database%',v1)/ fi cat('isisac.tab') cat('isisuc.tab') v2002 FIN v2001 FIN v2001 END v2001 END v2001 END v2001 END v2001 END v2001 END v2001 END v2001 END v2001 END v2001 END v2001