'<table width=90% border=0 cellpadding=0 cellspacing=0>'/
'<tr>'/
'<td width=10% valign=top align=center class=td_N rowspan=4>',/


'<font size=-2> &nbsp;'
if v1081= 'reverse' then 
	f(val(v1002)-val(v1003)+1,1,0),'/',v1002,/
else
	v1001,'/',v1002
fi/
'<p align=center>'/ 

'</td>'

'<td width=1%  align=center>&nbsp;</td>'
'<td   align=left valign=top width=84% class=texto8>'/
/*v4'.'v6
'<br>'/*/

'<font face=arial size=2>'

if v6='a' or v6='A' or v6='as' then "<b> "V12,"  = "v13, '</b> '   
   if p(v10) or p(v11) then '  /  '     fi,
    (if p(v10) then |; |+v10^*,|, |v10^b fi)
   if p(v10) and p(v11) then '; ' fi,
    (if p(v11) then |; |+v11^*,|. |v11^b fi)
   if v4='S' then 
       ".-- "v14,".--  <b>  En: </b> "v30," /  "d29,(V29^b|. |,|; |+v29^*),".-- "v39+|, |," : "v38,".-- "v31,", "v32," ("v43")" 
   fi,
   if v4='M'  then 
       ". -- <b> En : </b> "v18," / "d16,(|; |+v16^b,| |v16^*), |. -- |v41,|-- |v39,|: |V38|, |,V43,".-- "V20,". Serie: "V22^*,", "v22^n   
   fi /
fi
/
if v4='S' or v4='K'  then 
   if v6='s' or v6='k'  then 
      "<b>",v30,"</b>"d30,,
      " / "D29,(V29^b|. |,v29^*+|; |),".-- "v39+|, |," : "v38,".--  "v31,", "v32," ("v43")" ,
      "<br><b> Situación </b> "v300,
       fi/
     
fi/
if  p(v34)  then
 '<br>',  

      (|<br> |+v34^a,|, Vol. |v34^v,|, No. |v34^n),
fi/
 

if v4='M' or v4='m' or v4:'T' or v4='MC' or v4='S' then 
    if p(v12) then 
       ".-- <b>  En:  </b> "v18,
    else 
       "<b>"v18,"="v19, '</b>' ,mpl, 
    fi,
    if p(v16) or p(v17)  then ' / ' fi,

    (if p(v16) then |; |+v16^*,|, |v16^b fi)

    if p(v160) then,
      '; Tutor: '
    (if p(v160) then |; |+v160^*,|, |v160^b  fi)
    fi

    if p(v16) and p(v17) then  ';  ' fi,
       (if p(v17) then |; |+v17^*,|. |v17^b fi)

    " .-- "v41," .--"v39+|; |," : "v38+|; |,", "v43,".-- "v20," : "v42,".-- "v73,".- Serie: "V22^*,", "v22^n,

fi, 
if (v6='c' or v6='mc') and v4='M'  then 
    ".--  <b> En : </b> "v25," / "d23,(|; |+v23^b,| |v23^*), |. -- |v41,|-- |v39,|: |V38|, |,V43,".-- "V27,".-- Serie: "V22^*,", "v22^n,
fi, 

if V4='C'  then,
   if v6='c' or v6='mc' then,
      "<b>"v25,"="v26,'</b>',mpl,
      if p(v23) or p(v24) then  ' / '     fi,
      (|; |+v23^b,| |v23^*,|, |v23^r),
      if p(v23) and p(v24) then  '; '   fi,
      (v24^b|. |,v24^*+|; |),
      ".-- "v39+|, |," : "v38+|; |," .-- "v42,".-- "v73 ,
      "<br>Años en existencia "v43+|; |,
      "<br>Volumenes  "v27+|; |,
   fi,  
fi/

if v4='V' then
     if p(v410)then
       "<b>" v410 "</b>"  '/ ',

       (if p(v400) then |; |+v400^*,|, |v400^b fi)
      if p(v400) then  ';  ' fi,
       (if p(v405) then |; |+v405^*,|. |,v405^b fi)
        " .-- "v41," .--"v39+|; |," : "v38+|; |,", "v43," : "v42,
        ".-- "v415," ("v420")"," ("v422")"," ,"v421,
      fi
       
        "<b> Distribuidor: </b> "d430,(v430^*,| /  |v430^p+|; |),
       "<b> Dirigido a: </b> "d440,(v440+|; |),
fi  

if p(v53)  then,  
 "<br><b> Evento: </b> "v53," ("v56," : "v54+|. |") ",".- "v52+|; |    fi,

if p(v59)  then,
 "<br><b> Proyecto: </b> "v59^*," / "v59^s,", "v60," /  "v58+|; |  fi,

if p(v50)  then/
  if v153:'A' then,
    "<br> Trabajo de Ascenso presentado ante "v50,". "V150,". "V152,
    ", para ascender a la categoría de "V51      fi,
  if v153:'T' then  "<br> Tesis presentada ante "v50,". "V150,". "V152,
   ", para obtener el grado de "V51     fi,
  if v153:'I'  then  "<br> Informe de Pasantía presentado ante "v50,". "V150,". "V152,
    ", para obtener el grado de "V51   fi,
fi,

("<br> ISBN  "v47+|; |),

/

if p(v104) then,
 '<br><b> Ubicación: </b> ',(v104^*+|; |)/ '<br>' fi,
if p(v3) then,
 "<br><b> Solicite el material por este código: "d3,v3^*,"."v3^b,"."v3^c,"."v3^d,"</b>"d3/ fi,
if  p(v72) then
      '<p align=justify>  '
      (|&nbsp; &nbsp; |v72+|<br>|/)
fi/ 

'</td>'
'</tr>'

'</table>'/

'<p>'/