'Content-type: text/html; charset=iso-8859-1'/# phl84/001.fnc phl84/100.fnc phl84/rede.bibliotecas.fnc phl84/tipo.curso.fnc phl84/tipo.documento.fnc

now opc ,if v3000^2='' then 'login_invalido' else v950 fi, 1 login_invalido ,ref(['tab_fmx']55,v4), 1 usr_form ,ref(['tab_fmx']25,v4), 1 usr_form_eeb ,ref(['tab_fmx']259,v4), 1 usr_nova ,v3000^2, 027 sc now now now now ,ref(['tab_fmt']6,'[pft]',v4,'[/pft]',), 1 usr_bib_eeb ,cat('phl_bib_eeb.txt'), ,(v123/), (,f(iocc,3,0),') - 'v123^a'
'/) 0 usr_eeb ,v3000^2, 027 eeb ,v3000^1, now now ,cat('tab_bibliotecas_eeb.txt'), ,(v123/), ,ref(['tab_fmt']6,'[pft]',v4,'[/pft]',), 1 usr_consulta phl_cpa ,'USR='v3000^2'*TOP=SC', Isis_Current Isis_Total 3000,4001 ,ref(['tab_fmx']28,v4), ,if val(v1002)=0 then 'a250~411~' fi, ,if val(v1002)=0 then ref(['tab_fmx']10,v4),fi, phl_cpa usr_consulta_eeb phl_cpa ,'USR='v3000^2'*TOP=EEB', Isis_Current Isis_Total 3000,4001 ,ref(['tab_fmx']28,v4), ,if val(v1002)=0 then 'a250~411~' fi, ,if val(v1002)=0 then ref(['tab_fmx']10,v4),fi, phl_cpa