From be98090f0850621d37ccdccdbe3ffc7590aef48b Mon Sep 17 00:00:00 2001 From: Roger C Guilherme Date: Tue, 3 Mar 2026 10:21:10 -0300 Subject: [PATCH 1/2] Enables the Cepal database for OPAC. --- .../biblo/opac/en/biblo.def | 1 + .../biblo/opac/en/biblo.lang | 1 + .../biblo/opac/en/biblo_facetas.dat | 3 + .../biblo/opac/en/biblo_formatos.dat | 1 + .../biblo/opac/en/biblo_libre.tab | 1 + .../biblo/opac/es/biblo.def | 1 + .../biblo/opac/es/biblo.lang | 1 + .../biblo/opac/es/biblo_facetas.dat | 3 + .../biblo/opac/es/biblo_formatos.dat | 1 + .../biblo/opac/es/biblo_libre.tab | 1 + .../biblo/opac/fr/biblo.def | 1 + .../biblo/opac/fr/biblo.lang | 1 + .../biblo/opac/fr/biblo_facetas.dat | 3 + .../biblo/opac/fr/biblo_formatos.dat | 1 + .../biblo/opac/fr/biblo_libre.tab | 1 + .../biblo/opac/pt/biblo.def | 1 + .../biblo/opac/pt/biblo.lang | 1 + .../biblo/opac/pt/biblo_facetas.dat | 3 + .../biblo/opac/pt/biblo_formatos.dat | 1 + .../biblo/opac/pt/biblo_libre.tab | 1 + .../biblo/opac/relevance.def | 12 + .../biblo/pfts/en/abiblo.pft | 2 +- .../biblo/pfts/en/opac.pft | 451 +++++++---------- .../biblo/pfts/es/opac.pft | 451 +++++++---------- .../biblo/pfts/pt/opac.pft | 456 +++++++----------- www/bases-examples_Linux/par/biblo.par | 11 +- www/bases-examples_Windows/biblo/dr_path.def | 5 +- .../biblo/opac/en/biblo.def | 1 + .../biblo/opac/en/biblo.lang | 1 + .../biblo/opac/en/biblo_facetas.dat | 3 + .../biblo/opac/en/biblo_formatos.dat | 1 + .../biblo/opac/en/biblo_libre.tab | 1 + .../biblo/opac/es/biblo.def | 1 + .../biblo/opac/es/biblo.lang | 1 + .../biblo/opac/es/biblo_facetas.dat | 3 + .../biblo/opac/es/biblo_formatos.dat | 1 + .../biblo/opac/es/biblo_libre.tab | 1 + .../biblo/opac/fr/biblo.def | 1 + .../biblo/opac/fr/biblo.lang | 1 + .../biblo/opac/fr/biblo_facetas.dat | 3 + .../biblo/opac/fr/biblo_formatos.dat | 1 + .../biblo/opac/fr/biblo_libre.tab | 1 + .../biblo/opac/pt/biblo.def | 1 + .../biblo/opac/pt/biblo.lang | 1 + .../biblo/opac/pt/biblo_facetas.dat | 3 + .../biblo/opac/pt/biblo_formatos.dat | 1 + .../biblo/opac/pt/biblo_libre.tab | 1 + .../biblo/opac/relevance.def | 12 + .../biblo/pfts/en/opac.pft | 162 +++++++ .../biblo/pfts/es/opac.pft | 162 +++++++ .../biblo/pfts/fr/opac.pft | 162 +++++++ .../biblo/pfts/pt/opac.pft | 456 +++++++----------- www/bases-examples_Windows/par/biblo.par | 10 +- 53 files changed, 1242 insertions(+), 1166 deletions(-) create mode 100644 www/bases-examples_Linux/biblo/opac/en/biblo.def create mode 100644 www/bases-examples_Linux/biblo/opac/en/biblo.lang create mode 100644 www/bases-examples_Linux/biblo/opac/en/biblo_facetas.dat create mode 100644 www/bases-examples_Linux/biblo/opac/en/biblo_formatos.dat create mode 100644 www/bases-examples_Linux/biblo/opac/en/biblo_libre.tab create mode 100644 www/bases-examples_Linux/biblo/opac/es/biblo.def create mode 100644 www/bases-examples_Linux/biblo/opac/es/biblo.lang create mode 100644 www/bases-examples_Linux/biblo/opac/es/biblo_facetas.dat create mode 100644 www/bases-examples_Linux/biblo/opac/es/biblo_formatos.dat create mode 100644 www/bases-examples_Linux/biblo/opac/es/biblo_libre.tab create mode 100644 www/bases-examples_Linux/biblo/opac/fr/biblo.def create mode 100644 www/bases-examples_Linux/biblo/opac/fr/biblo.lang create mode 100644 www/bases-examples_Linux/biblo/opac/fr/biblo_facetas.dat create mode 100644 www/bases-examples_Linux/biblo/opac/fr/biblo_formatos.dat create mode 100644 www/bases-examples_Linux/biblo/opac/fr/biblo_libre.tab create mode 100644 www/bases-examples_Linux/biblo/opac/pt/biblo.def create mode 100644 www/bases-examples_Linux/biblo/opac/pt/biblo.lang create mode 100644 www/bases-examples_Linux/biblo/opac/pt/biblo_facetas.dat create mode 100644 www/bases-examples_Linux/biblo/opac/pt/biblo_formatos.dat create mode 100644 www/bases-examples_Linux/biblo/opac/pt/biblo_libre.tab create mode 100644 www/bases-examples_Linux/biblo/opac/relevance.def create mode 100644 www/bases-examples_Windows/biblo/opac/en/biblo.def create mode 100644 www/bases-examples_Windows/biblo/opac/en/biblo.lang create mode 100644 www/bases-examples_Windows/biblo/opac/en/biblo_facetas.dat create mode 100644 www/bases-examples_Windows/biblo/opac/en/biblo_formatos.dat create mode 100644 www/bases-examples_Windows/biblo/opac/en/biblo_libre.tab create mode 100644 www/bases-examples_Windows/biblo/opac/es/biblo.def create mode 100644 www/bases-examples_Windows/biblo/opac/es/biblo.lang create mode 100644 www/bases-examples_Windows/biblo/opac/es/biblo_facetas.dat create mode 100644 www/bases-examples_Windows/biblo/opac/es/biblo_formatos.dat create mode 100644 www/bases-examples_Windows/biblo/opac/es/biblo_libre.tab create mode 100644 www/bases-examples_Windows/biblo/opac/fr/biblo.def create mode 100644 www/bases-examples_Windows/biblo/opac/fr/biblo.lang create mode 100644 www/bases-examples_Windows/biblo/opac/fr/biblo_facetas.dat create mode 100644 www/bases-examples_Windows/biblo/opac/fr/biblo_formatos.dat create mode 100644 www/bases-examples_Windows/biblo/opac/fr/biblo_libre.tab create mode 100644 www/bases-examples_Windows/biblo/opac/pt/biblo.def create mode 100644 www/bases-examples_Windows/biblo/opac/pt/biblo.lang create mode 100644 www/bases-examples_Windows/biblo/opac/pt/biblo_facetas.dat create mode 100644 www/bases-examples_Windows/biblo/opac/pt/biblo_formatos.dat create mode 100644 www/bases-examples_Windows/biblo/opac/pt/biblo_libre.tab create mode 100644 www/bases-examples_Windows/biblo/opac/relevance.def create mode 100644 www/bases-examples_Windows/biblo/pfts/en/opac.pft create mode 100644 www/bases-examples_Windows/biblo/pfts/es/opac.pft create mode 100644 www/bases-examples_Windows/biblo/pfts/fr/opac.pft diff --git a/www/bases-examples_Linux/biblo/opac/en/biblo.def b/www/bases-examples_Linux/biblo/opac/en/biblo.def new file mode 100644 index 000000000..527b1a23b --- /dev/null +++ b/www/bases-examples_Linux/biblo/opac/en/biblo.def @@ -0,0 +1 @@ +Base de dados CEPAL \ No newline at end of file diff --git a/www/bases-examples_Linux/biblo/opac/en/biblo.lang b/www/bases-examples_Linux/biblo/opac/en/biblo.lang new file mode 100644 index 000000000..0cf405b19 --- /dev/null +++ b/www/bases-examples_Linux/biblo/opac/en/biblo.lang @@ -0,0 +1 @@ +LATIN \ No newline at end of file diff --git a/www/bases-examples_Linux/biblo/opac/en/biblo_facetas.dat b/www/bases-examples_Linux/biblo/opac/en/biblo_facetas.dat new file mode 100644 index 000000000..8f94c73e4 --- /dev/null +++ b/www/bases-examples_Linux/biblo/opac/en/biblo_facetas.dat @@ -0,0 +1,3 @@ +Language|(v64/)|LA_|Q +Subjects|(v76/)|MA_|A +Country|(v40/)|PA_|A \ No newline at end of file diff --git a/www/bases-examples_Linux/biblo/opac/en/biblo_formatos.dat b/www/bases-examples_Linux/biblo/opac/en/biblo_formatos.dat new file mode 100644 index 000000000..d8b16e155 --- /dev/null +++ b/www/bases-examples_Linux/biblo/opac/en/biblo_formatos.dat @@ -0,0 +1 @@ +opac|Visão pública|Y|Y \ No newline at end of file diff --git a/www/bases-examples_Linux/biblo/opac/en/biblo_libre.tab b/www/bases-examples_Linux/biblo/opac/en/biblo_libre.tab new file mode 100644 index 000000000..2a1f8e9e7 --- /dev/null +++ b/www/bases-examples_Linux/biblo/opac/en/biblo_libre.tab @@ -0,0 +1 @@ +Free search|TW_ \ No newline at end of file diff --git a/www/bases-examples_Linux/biblo/opac/es/biblo.def b/www/bases-examples_Linux/biblo/opac/es/biblo.def new file mode 100644 index 000000000..527b1a23b --- /dev/null +++ b/www/bases-examples_Linux/biblo/opac/es/biblo.def @@ -0,0 +1 @@ +Base de dados CEPAL \ No newline at end of file diff --git a/www/bases-examples_Linux/biblo/opac/es/biblo.lang b/www/bases-examples_Linux/biblo/opac/es/biblo.lang new file mode 100644 index 000000000..0cf405b19 --- /dev/null +++ b/www/bases-examples_Linux/biblo/opac/es/biblo.lang @@ -0,0 +1 @@ +LATIN \ No newline at end of file diff --git a/www/bases-examples_Linux/biblo/opac/es/biblo_facetas.dat b/www/bases-examples_Linux/biblo/opac/es/biblo_facetas.dat new file mode 100644 index 000000000..7d2bfba55 --- /dev/null +++ b/www/bases-examples_Linux/biblo/opac/es/biblo_facetas.dat @@ -0,0 +1,3 @@ +Idioma|(v64/)|LA_|Q +Descriptores|(v76/)|MA_|A +País|(v40/)|PA_|A \ No newline at end of file diff --git a/www/bases-examples_Linux/biblo/opac/es/biblo_formatos.dat b/www/bases-examples_Linux/biblo/opac/es/biblo_formatos.dat new file mode 100644 index 000000000..d8b16e155 --- /dev/null +++ b/www/bases-examples_Linux/biblo/opac/es/biblo_formatos.dat @@ -0,0 +1 @@ +opac|Visão pública|Y|Y \ No newline at end of file diff --git a/www/bases-examples_Linux/biblo/opac/es/biblo_libre.tab b/www/bases-examples_Linux/biblo/opac/es/biblo_libre.tab new file mode 100644 index 000000000..2a1f8e9e7 --- /dev/null +++ b/www/bases-examples_Linux/biblo/opac/es/biblo_libre.tab @@ -0,0 +1 @@ +Free search|TW_ \ No newline at end of file diff --git a/www/bases-examples_Linux/biblo/opac/fr/biblo.def b/www/bases-examples_Linux/biblo/opac/fr/biblo.def new file mode 100644 index 000000000..527b1a23b --- /dev/null +++ b/www/bases-examples_Linux/biblo/opac/fr/biblo.def @@ -0,0 +1 @@ +Base de dados CEPAL \ No newline at end of file diff --git a/www/bases-examples_Linux/biblo/opac/fr/biblo.lang b/www/bases-examples_Linux/biblo/opac/fr/biblo.lang new file mode 100644 index 000000000..0cf405b19 --- /dev/null +++ b/www/bases-examples_Linux/biblo/opac/fr/biblo.lang @@ -0,0 +1 @@ +LATIN \ No newline at end of file diff --git a/www/bases-examples_Linux/biblo/opac/fr/biblo_facetas.dat b/www/bases-examples_Linux/biblo/opac/fr/biblo_facetas.dat new file mode 100644 index 000000000..ee2ea5812 --- /dev/null +++ b/www/bases-examples_Linux/biblo/opac/fr/biblo_facetas.dat @@ -0,0 +1,3 @@ +Langue|(v64/)|LA_|Q +Sujets|(v76/)|MA_|A +Pays|(v40/)|PA_|A \ No newline at end of file diff --git a/www/bases-examples_Linux/biblo/opac/fr/biblo_formatos.dat b/www/bases-examples_Linux/biblo/opac/fr/biblo_formatos.dat new file mode 100644 index 000000000..d8b16e155 --- /dev/null +++ b/www/bases-examples_Linux/biblo/opac/fr/biblo_formatos.dat @@ -0,0 +1 @@ +opac|Visão pública|Y|Y \ No newline at end of file diff --git a/www/bases-examples_Linux/biblo/opac/fr/biblo_libre.tab b/www/bases-examples_Linux/biblo/opac/fr/biblo_libre.tab new file mode 100644 index 000000000..2a1f8e9e7 --- /dev/null +++ b/www/bases-examples_Linux/biblo/opac/fr/biblo_libre.tab @@ -0,0 +1 @@ +Free search|TW_ \ No newline at end of file diff --git a/www/bases-examples_Linux/biblo/opac/pt/biblo.def b/www/bases-examples_Linux/biblo/opac/pt/biblo.def new file mode 100644 index 000000000..527b1a23b --- /dev/null +++ b/www/bases-examples_Linux/biblo/opac/pt/biblo.def @@ -0,0 +1 @@ +Base de dados CEPAL \ No newline at end of file diff --git a/www/bases-examples_Linux/biblo/opac/pt/biblo.lang b/www/bases-examples_Linux/biblo/opac/pt/biblo.lang new file mode 100644 index 000000000..0cf405b19 --- /dev/null +++ b/www/bases-examples_Linux/biblo/opac/pt/biblo.lang @@ -0,0 +1 @@ +LATIN \ No newline at end of file diff --git a/www/bases-examples_Linux/biblo/opac/pt/biblo_facetas.dat b/www/bases-examples_Linux/biblo/opac/pt/biblo_facetas.dat new file mode 100644 index 000000000..e1596543b --- /dev/null +++ b/www/bases-examples_Linux/biblo/opac/pt/biblo_facetas.dat @@ -0,0 +1,3 @@ +Idioma|(v64/)|LA_|Q +Descritores|(v76/)|MA_|A +País|(v40/)|PA_|A diff --git a/www/bases-examples_Linux/biblo/opac/pt/biblo_formatos.dat b/www/bases-examples_Linux/biblo/opac/pt/biblo_formatos.dat new file mode 100644 index 000000000..d8b16e155 --- /dev/null +++ b/www/bases-examples_Linux/biblo/opac/pt/biblo_formatos.dat @@ -0,0 +1 @@ +opac|Visão pública|Y|Y \ No newline at end of file diff --git a/www/bases-examples_Linux/biblo/opac/pt/biblo_libre.tab b/www/bases-examples_Linux/biblo/opac/pt/biblo_libre.tab new file mode 100644 index 000000000..2a1f8e9e7 --- /dev/null +++ b/www/bases-examples_Linux/biblo/opac/pt/biblo_libre.tab @@ -0,0 +1 @@ +Free search|TW_ \ No newline at end of file diff --git a/www/bases-examples_Linux/biblo/opac/relevance.def b/www/bases-examples_Linux/biblo/opac/relevance.def new file mode 100644 index 000000000..f522d87e0 --- /dev/null +++ b/www/bases-examples_Linux/biblo/opac/relevance.def @@ -0,0 +1,12 @@ +[title] +fields = "12, 13, 18, 19, 25, 26, 30" + +[author] +fields = "10, 11, 16, 17, 23, 24" + +[subject] +fields = "42, 76, 82" + +[general] +fields = "3, 9, 39, 47, 55, 59, 63, 64, 72" + diff --git a/www/bases-examples_Linux/biblo/pfts/en/abiblo.pft b/www/bases-examples_Linux/biblo/pfts/en/abiblo.pft index d7ab2337d..101b82516 100755 --- a/www/bases-examples_Linux/biblo/pfts/en/abiblo.pft +++ b/www/bases-examples_Linux/biblo/pfts/en/abiblo.pft @@ -95,7 +95,7 @@ if(typeof(DocumentReady)!= "function" || jQuery(".grid_row").length == 0) '' '',/ '
'/ - (if p(v800) then '
' else '' / fi/) + (if p(v800) then '
' else '' / fi/) '' '' ''/ diff --git a/www/bases-examples_Linux/biblo/pfts/en/opac.pft b/www/bases-examples_Linux/biblo/pfts/en/opac.pft index 4e2c5691b..9905cacaa 100755 --- a/www/bases-examples_Linux/biblo/pfts/en/opac.pft +++ b/www/bases-examples_Linux/biblo/pfts/en/opac.pft @@ -1,289 +1,162 @@ - -''/ -'' -'' -'' -''/ -'' -'
',/ - (if p(v800) then '' / fi/) -' '/ -/ - -, - -'' -if p(v9) then 'Tipo de Material: ', - - '' (v9+|; |/),/'' - -fi/ - -if p(v160) then,'
' - - ' Profesor Gua: ' - - (if p(v160) then v160^b,| |v160^* , |, |v160^r if iocc<>nocc(v160) then '; ' fi fi) - - fi - - - -if p(v12) then '
' mhl,V12," = "v13,mpl ' ' else - mhl,'
' ""v18,"="v19, '' ,mpl, - - - fi, - if p(v10) or p(v11) then ' / ' fi, - (if p(v10) then v10^b,| |v10^*,|, |v10^r if iocc<>nocc(v10) then '; ' fi fi) - - if p(v10) and p(v11) then '; ' fi, - - (if p(v11) then v11^b|. |,v11^*+|; |,if iocc=nocc(v11) then '; ' fi, fi) - -if p(v16) or p(v17) then ' / ' fi, - (if p(v16) then v16^b,| |v16^*,|, |v16^r if iocc<>nocc(v16) then '; ' fi fi) - - if p(v16) and p(v17) then '; ' fi, - - (if p(v17) then v17^b|. |,v17^*+|; |,if iocc=nocc(v17) then '; ' fi, fi) - - if p(v12) and p(v30) then - - ".-- "v14,'.-- En: ' mhl,v30,mpl," / "d29,(V29^b|. |,|; |+v29^*),".-- "v39+|, |," : "v38,".-- "v31,", "v32," ("v43")" - - fi, - - if p(v12) and p(v18) then - - '. -- En : ' mhl,v18,mpl," / "d16,(|; |+v16^b,| |v16^*), |. -- |v41,|-- |v39,|: |V38|, |,V43,".-- "V20,". Serie: "V22^*,", "v22^n - - fi / - - -/ - -if v4='K' or v6='s' then - - '',mhl,v30,mpl,""d30,, - - " / "D29,(V29^b|. |,v29^*+|; |),".-- "v39+|, |," : "v38,".-- "v31,", "v32," ("v43")" , - - "
Situacin "v300, - - fi/ - - - - " .-- "v41," .--"v39+|; |," : "v38+|; |,", "v43,".-- "v20," : "v42,".-- "v73,".- Serie: "V22^*,", "v22^n, - - - - -if (v6='c' or v6='mc') and v4='M' then - - ".-- En : "v25," / "d23,(|; |+v23^b,| |v23^*), |. -- |v41,|-- |v39,|: |V38|, |,V43,".-- "V27,".-- Serie: "v22^n, - -fi, - - - -if V4='C' then, - - if v6='c' or v6='mc' then, - - mhl,""v25,"="v26,'',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 , - - "
Aos en existencia "v43+|; |, - - "
Volumenes "v27+|; |, - - fi, - -fi/ - - - -if v4='V' then - - if p(v410)then - - (v410),'/ '(|; |+v400^b,| |v400^*,|, |v400^r), - - " .-- "v41," .--"v39+|; |," : "v38+|; |,", "v43," : "v42, - - ".-- "v415," ("v420")"," ("v422")"," ,"v421, - - fi - - - - " Distribuidor: "d430,(v430^*,| / |v430^p+|; |), - - " Dirigido a: "d440,(v440+|; |), - -fi - - - -if p(v53) then, - - "
Evento: "v53," ("v56," : "v54+|. |") ",".- "v52+|; | fi, - - - -if p(v59) then, - - "
Proyecto: "v59^*," / "v59^s,", "v60," / "v58+|; | fi, - - - -if p(v50) then/ - - if v153:'A' then, - - "
Trabajo de Ascenso presentado ante "v50,". "V150,". "V152, - - ", para ascender a la categora de "V51 fi, - - if v153:'T' then "
Tesis presentada ante "v50,". "V150,". "V152, - - ", para obtener el grado de "V51 fi, - - if v153:'I' then "
Informe de Pasanta presentado ante "v50,". "V150,". "V152, - - ", para obtener el grado de "V51 fi, - -fi, - - -("
ISBN "v47+|; |), - - - -/ -if p(v63) then '
Formatos: ', - - '' (v63+|; |/),/'' - -fi/ -if p(v76) or p(v79) then '

Descriptores: ', - - (v76+|; |/) - (if p(v79) then |; |+v79^*,|--|v79^w,|--|v79^x,|--|v79^y,|--|v79^z fi )/,, - - if p(v80) or p(v81) then - - '
Categora temtica:'/ - - fi/ - - (v80+|; |)/ - - (v81+|; |),/ - - / - -fi, - - - -if p(v77) then '
Datos estadsticos: ', - - (v77+|; |/),/ - -fi/ - - - - - -if p(v82) or p(v85) then - '
Categora geogrfica: ' - (v82+|; |/) - (v85+|; |/) -fi/ - - - - -if p(v72) then - '

' - (| |v72+|
|/) -fi/ - - if p(v68) then '
Notas: ', - - '' (v68+|; |/),/'' - -fi/'

' - - if p(v36) then - '

Tabla de contenido:' - '

    '/ - - (if p(v36) then '
  • ' fi, v36^*,| // |v36^b ,| |v36^c,| |v36^d,| |v36^e,|; |v36^f,| |v36^g,| |v36^l, | |v36^m,| |v36^n), - '
'/ - - fi/ -'

' - (if p(v810) then ''/if p(v810^d) then v810^d else v810^* fi'
' fi/)/ - (if p(v840) then ''/if p(v840^d) then v840^d else v840^* fi'
' fi/)/ - -if p(v313) then 'Cdigo de Bibliografa Bsica/Complementaria: ', - - '' (v313+|; |/),/ - -fi/'' - -if p(v314) then '
SOLICITE POR ESTE CODIGO: ''
Ubicacin: ' (mhl,v314+|; |), else - - - -if p(v3) then, - '
SOLICITE POR ESTE CODIGO: ''
Ubicacin: ',v3^*," / "v3^b," / "v3^c,"."v3^d'' fi,fi - - - - - - -if p(v104) then - '
Sede: ',(v104^*+|; |)/ ' 'fi, -'
NDoc.: ',v2''," (Incluya estos datos en la boleta de pedido) " '' -'

'/ - - -''/ -/ -/ - -ref(['loanobjects']l(['loanobjects'],'CN_biblo_'v2), - '

' - '' - ' - ' - (if p(v959) then - '' - '`, fi - else - 'Prestado' - fi - fi/) - '
Total disponibilidad: 'f(nocc(v959),1,0)'
No.inventarioBibliotecaTipo de materialSituacinFecha devolucin
'v959^i''v959^l''v959^o'', - if npost(['trans'],'TR_P_'v959^i) = 0 then - 'Disponible' - if iocc>1 then `Reservar' ref(['trans']l(['trans'],'TR_P_'v959^i), - v40[1]*6.2,'/',v40[1]*4.2,'/',v40[1].4),'
', - ) -'


' +/* Record Container Start */ +'

'/ + + /* ------------------------------------------------ */ + /* COLUMN 1: IMAGE (Left Side - col-md-3) */ + /* ------------------------------------------------ */ + '
'/ + (if p(v800) then + '' + 'Record image' + ''/ + else + /* Placeholder when no image exists */ + '
' + '' + '
' + fi)/ + '
'/ + + /* ------------------------------------------------ */ + /* COLUMN 2: BIBLIOGRAPHIC DATA (Right Side) */ + /* ------------------------------------------------ */ + '
'/ + + /* Material Type and Level (Badges) */ + '
' + if p(v9) then '',v9^*,'' fi, + if p(v6) then '',v6^*,'' fi, + '
'/ + + /* MAIN TITLE */ + '

', + if p(v12) then v12, if p(v13) then ' = ',v13, fi, + else + if p(v18) then v18, if p(v19) then ' = ',v19, fi, + else + if p(v30) then v30, fi, + fi, + fi, + '

'/ + + /* AUTHORS */ + if p(v10) or p(v11) or p(v16) or p(v17) then + '

Authors: ', + /* Personal Authors (Analytical) */ + (if p(v10) then v10^b,' ',v10^*, if p(v10^r) then ' (',v10^r,')' fi, if iocc < nocc(v10) then '; ' fi, fi), + /* Institutional Authors (Analytical) */ + if p(v10) and p(v11) then '; ' fi, + (if p(v11) then v11^*, if iocc < nocc(v11) then '; ' fi, fi), + /* Monographic Authors */ + if a(v10) and a(v11) then + (if p(v16) then v16^b,' ',v16^*, if p(v16^r) then ' (',v16^r,')' fi, if iocc < nocc(v16) then '; ' fi, fi), + if p(v16) and p(v17) then '; ' fi, + (if p(v17) then v17^*, if iocc < nocc(v17) then '; ' fi, fi), + fi, + '

'/ + fi, + + /* SOURCE (In:) */ + if p(v30) then + /* Case 1: Analytical (Article) */ + if p(v12) then + '

', + 'In: ', v30, + if p(v31) then ', Vol. ',v31, fi, + if p(v32) then ', No. ',v32, fi, + if p(v43) then ' (',v43,')' fi, + if p(v14) then ', p. ',v14, fi, + '

'/ + else + /* Case 2: Monograph (Series) */ + if p(v18) then + '

', + 'Series: ', v30, + if p(v31) then ', Vol. ',v31, fi, + if p(v32) then ', No. ',v32, fi, + if p(v43) then ' (',v43,')' fi, + '

'/ + fi + fi + fi, + + /* IMPRINT */ + if p(v38) or p(v39) or p(v43) then + '

', + if p(v41) then v41,'. -- ' fi, + if p(v39) then v39,': ' fi, + if p(v38) then v38, fi, + if p(v43) and a(v30) then ', ',v43, fi, + if p(v20) then '. -- ',v20,' p.' fi, + if p(v42) then '. -- (',v42,')' fi, + '

'/ + fi, + + /* SERIES / COLLECTION */ + if p(v25) then '

Series: ',v25, if p(v27) then '; ',v27 fi, '

'/ fi, + + /* NOTES AND ABSTRACT */ + if p(v72) then '
Abstract: ',v72,'
'/ fi, + if p(v37) then '
Contents:
',(v37+|
|),'
'/ fi, + if p(v68) then '
Notes: ',v68,'
'/ fi, + + /* SUBJECTS */ + if p(v76) then + '
', + ( '',v76,'' ), + '
'/ + fi, + + /* DIGITAL LINKS */ + if p(v810) or p(v840) then + '
', + (if p(v810) then + '', + ' Full Text', + if p(v810^d) then ' (',v810^d,')' fi, + ' ' + fi), + (if p(v840) then + '', + ' External Link', + if p(v840^d) then ' (',v840^d,')' fi, + ' ' + fi), + '
'/ + fi, + + /* FOOTER: LOCATION AND CONTROLS */ + '
', + '
', + if p(v3) then + 'Location: ',v3^*,' ',v3^b,' ',v3^c,' ',v3^d,'' + fi, + if p(v104) then ' | Branch: ',v104, fi, + if p(v2) then ' | ID: ',v2, fi, + '
', + '
', + if p(v2) then ' Check Copies' fi, + + if npost(['copies'],'CN_biblo_'v1)>0 then + ' + + + + + + + + + '/ + /'$$REF:copies,inven,CN_biblo_'v2/ + ' +
Total copies:' + f(npost(['copies'],'CN_biblo_'v2),1,0) + '
ControlInv. NumberStatusCopiesAvailability
' + fi, + + '
', + '
', + + '
'/ +'
'/ \ No newline at end of file diff --git a/www/bases-examples_Linux/biblo/pfts/es/opac.pft b/www/bases-examples_Linux/biblo/pfts/es/opac.pft index 4e2c5691b..86646e667 100755 --- a/www/bases-examples_Linux/biblo/pfts/es/opac.pft +++ b/www/bases-examples_Linux/biblo/pfts/es/opac.pft @@ -1,289 +1,162 @@ - -''/ -'' -'' -'' -''/ -'' -'
',/ - (if p(v800) then '' / fi/) -' '/ -/ - -, - -'' -if p(v9) then 'Tipo de Material: ', - - '' (v9+|; |/),/'' - -fi/ - -if p(v160) then,'
' - - ' Profesor Gua: ' - - (if p(v160) then v160^b,| |v160^* , |, |v160^r if iocc<>nocc(v160) then '; ' fi fi) - - fi - - - -if p(v12) then '
' mhl,V12," = "v13,mpl ' ' else - mhl,'
' ""v18,"="v19, '' ,mpl, - - - fi, - if p(v10) or p(v11) then ' / ' fi, - (if p(v10) then v10^b,| |v10^*,|, |v10^r if iocc<>nocc(v10) then '; ' fi fi) - - if p(v10) and p(v11) then '; ' fi, - - (if p(v11) then v11^b|. |,v11^*+|; |,if iocc=nocc(v11) then '; ' fi, fi) - -if p(v16) or p(v17) then ' / ' fi, - (if p(v16) then v16^b,| |v16^*,|, |v16^r if iocc<>nocc(v16) then '; ' fi fi) - - if p(v16) and p(v17) then '; ' fi, - - (if p(v17) then v17^b|. |,v17^*+|; |,if iocc=nocc(v17) then '; ' fi, fi) - - if p(v12) and p(v30) then - - ".-- "v14,'.-- En: ' mhl,v30,mpl," / "d29,(V29^b|. |,|; |+v29^*),".-- "v39+|, |," : "v38,".-- "v31,", "v32," ("v43")" - - fi, - - if p(v12) and p(v18) then - - '. -- En : ' mhl,v18,mpl," / "d16,(|; |+v16^b,| |v16^*), |. -- |v41,|-- |v39,|: |V38|, |,V43,".-- "V20,". Serie: "V22^*,", "v22^n - - fi / - - -/ - -if v4='K' or v6='s' then - - '',mhl,v30,mpl,""d30,, - - " / "D29,(V29^b|. |,v29^*+|; |),".-- "v39+|, |," : "v38,".-- "v31,", "v32," ("v43")" , - - "
Situacin "v300, - - fi/ - - - - " .-- "v41," .--"v39+|; |," : "v38+|; |,", "v43,".-- "v20," : "v42,".-- "v73,".- Serie: "V22^*,", "v22^n, - - - - -if (v6='c' or v6='mc') and v4='M' then - - ".-- En : "v25," / "d23,(|; |+v23^b,| |v23^*), |. -- |v41,|-- |v39,|: |V38|, |,V43,".-- "V27,".-- Serie: "v22^n, - -fi, - - - -if V4='C' then, - - if v6='c' or v6='mc' then, - - mhl,""v25,"="v26,'',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 , - - "
Aos en existencia "v43+|; |, - - "
Volumenes "v27+|; |, - - fi, - -fi/ - - - -if v4='V' then - - if p(v410)then - - (v410),'/ '(|; |+v400^b,| |v400^*,|, |v400^r), - - " .-- "v41," .--"v39+|; |," : "v38+|; |,", "v43," : "v42, - - ".-- "v415," ("v420")"," ("v422")"," ,"v421, - - fi - - - - " Distribuidor: "d430,(v430^*,| / |v430^p+|; |), - - " Dirigido a: "d440,(v440+|; |), - -fi - - - -if p(v53) then, - - "
Evento: "v53," ("v56," : "v54+|. |") ",".- "v52+|; | fi, - - - -if p(v59) then, - - "
Proyecto: "v59^*," / "v59^s,", "v60," / "v58+|; | fi, - - - -if p(v50) then/ - - if v153:'A' then, - - "
Trabajo de Ascenso presentado ante "v50,". "V150,". "V152, - - ", para ascender a la categora de "V51 fi, - - if v153:'T' then "
Tesis presentada ante "v50,". "V150,". "V152, - - ", para obtener el grado de "V51 fi, - - if v153:'I' then "
Informe de Pasanta presentado ante "v50,". "V150,". "V152, - - ", para obtener el grado de "V51 fi, - -fi, - - -("
ISBN "v47+|; |), - - - -/ -if p(v63) then '
Formatos: ', - - '' (v63+|; |/),/'' - -fi/ -if p(v76) or p(v79) then '

Descriptores: ', - - (v76+|; |/) - (if p(v79) then |; |+v79^*,|--|v79^w,|--|v79^x,|--|v79^y,|--|v79^z fi )/,, - - if p(v80) or p(v81) then - - '
Categora temtica:'/ - - fi/ - - (v80+|; |)/ - - (v81+|; |),/ - - / - -fi, - - - -if p(v77) then '
Datos estadsticos: ', - - (v77+|; |/),/ - -fi/ - - - - - -if p(v82) or p(v85) then - '
Categora geogrfica: ' - (v82+|; |/) - (v85+|; |/) -fi/ - - - - -if p(v72) then - '

' - (| |v72+|
|/) -fi/ - - if p(v68) then '
Notas: ', - - '' (v68+|; |/),/'' - -fi/'

' - - if p(v36) then - '

Tabla de contenido:' - '

    '/ - - (if p(v36) then '
  • ' fi, v36^*,| // |v36^b ,| |v36^c,| |v36^d,| |v36^e,|; |v36^f,| |v36^g,| |v36^l, | |v36^m,| |v36^n), - '
'/ - - fi/ -'

' - (if p(v810) then ''/if p(v810^d) then v810^d else v810^* fi'
' fi/)/ - (if p(v840) then ''/if p(v840^d) then v840^d else v840^* fi'
' fi/)/ - -if p(v313) then 'Cdigo de Bibliografa Bsica/Complementaria: ', - - '' (v313+|; |/),/ - -fi/'' - -if p(v314) then '
SOLICITE POR ESTE CODIGO: ''
Ubicacin: ' (mhl,v314+|; |), else - - - -if p(v3) then, - '
SOLICITE POR ESTE CODIGO: ''
Ubicacin: ',v3^*," / "v3^b," / "v3^c,"."v3^d'' fi,fi - - - - - - -if p(v104) then - '
Sede: ',(v104^*+|; |)/ ' 'fi, -'
NDoc.: ',v2''," (Incluya estos datos en la boleta de pedido) " '' -'

'/ - - -''/ -/ -/ - -ref(['loanobjects']l(['loanobjects'],'CN_biblo_'v2), - '

' - '' - ' - ' - (if p(v959) then - '' - '`, fi - else - 'Prestado' - fi - fi/) - '
Total disponibilidad: 'f(nocc(v959),1,0)'
No.inventarioBibliotecaTipo de materialSituacinFecha devolucin
'v959^i''v959^l''v959^o'', - if npost(['trans'],'TR_P_'v959^i) = 0 then - 'Disponible' - if iocc>1 then `Reservar' ref(['trans']l(['trans'],'TR_P_'v959^i), - v40[1]*6.2,'/',v40[1]*4.2,'/',v40[1].4),'
', - ) -'


' +/* Inicio del Contenedor del Registro */ +'

'/ + + /* ------------------------------------------------ */ + /* COLUMNA 1: IMAGEN (Lado Izquierdo - col-md-3) */ + /* ------------------------------------------------ */ + '
'/ + (if p(v800) then + '' + 'Imagen del registro' + ''/ + else + /* Placeholder para cuando no hay imagen */ + '
' + '' + '
' + fi)/ + '
'/ + + /* ------------------------------------------------ */ + /* COLUMNA 2: DATOS BIBLIOGRÁFICOS (Lado Derecho) */ + /* ------------------------------------------------ */ + '
'/ + + /* Tipo de Material y Nivel Bibliográfico (Badges) */ + '
' + if p(v9) then '',v9^*,'' fi, + if p(v6) then '',v6^*,'' fi, + '
'/ + + /* TÍTULO PRINCIPAL */ + '

', + if p(v12) then v12, if p(v13) then ' = ',v13, fi, + else + if p(v18) then v18, if p(v19) then ' = ',v19, fi, + else + if p(v30) then v30, fi, + fi, + fi, + '

'/ + + /* AUTORES */ + if p(v10) or p(v11) or p(v16) or p(v17) then + '

Autores: ', + /* Autores Personales (Analítico) */ + (if p(v10) then v10^b,' ',v10^*, if p(v10^r) then ' (',v10^r,')' fi, if iocc < nocc(v10) then '; ' fi, fi), + /* Autores Institucionales (Analítico) */ + if p(v10) and p(v11) then '; ' fi, + (if p(v11) then v11^*, if iocc < nocc(v11) then '; ' fi, fi), + /* Autores Monográficos */ + if a(v10) and a(v11) then + (if p(v16) then v16^b,' ',v16^*, if p(v16^r) then ' (',v16^r,')' fi, if iocc < nocc(v16) then '; ' fi, fi), + if p(v16) and p(v17) then '; ' fi, + (if p(v17) then v17^*, if iocc < nocc(v17) then '; ' fi, fi), + fi, + '

'/ + fi, + + /* FUENTE (EN:) */ + if p(v30) then + /* Caso 1: Analítica (Artículo) */ + if p(v12) then + '

', + 'En: ', v30, + if p(v31) then ', Vol. ',v31, fi, + if p(v32) then ', Nº ',v32, fi, + if p(v43) then ' (',v43,')' fi, + if p(v14) then ', p. ',v14, fi, + '

'/ + else + /* Caso 2: Monografía (Serie) */ + if p(v18) then + '

', + 'Serie: ', v30, + if p(v31) then ', Vol. ',v31, fi, + if p(v32) then ', Nº ',v32, fi, + if p(v43) then ' (',v43,')' fi, + '

'/ + fi + fi + fi, + + /* PIE DE IMPRENTA */ + if p(v38) or p(v39) or p(v43) then + '

', + if p(v41) then v41,'. -- ' fi, + if p(v39) then v39,': ' fi, + if p(v38) then v38, fi, + if p(v43) and a(v30) then ', ',v43, fi, + if p(v20) then '. -- ',v20,' p.' fi, + if p(v42) then '. -- (',v42,')' fi, + '

'/ + fi, + + /* SERIE / COLECCIÓN */ + if p(v25) then '

Serie: ',v25, if p(v27) then '; ',v27 fi, '

'/ fi, + + /* NOTAS Y RESUMEN */ + if p(v72) then '
Resumen: ',v72,'
'/ fi, + if p(v37) then '
Contenido:
',(v37+|
|),'
'/ fi, + if p(v68) then '
Notas: ',v68,'
'/ fi, + + /* MATERIAS / DESCRIPTORES */ + if p(v76) then + '
', + ( '',v76,'' ), + '
'/ + fi, + + /* ENLACES DIGITALES */ + if p(v810) or p(v840) then + '
', + (if p(v810) then + '', + ' Texto Completo', + if p(v810^d) then ' (',v810^d,')' fi, + ' ' + fi), + (if p(v840) then + '', + ' Acceso Externo', + if p(v840^d) then ' (',v840^d,')' fi, + ' ' + fi), + '
'/ + fi, + + /* PIE DE PÁGINA: UBICACIÓN Y CONTROLES */ + '
', + '
', + if p(v3) then + 'Ubicación: ',v3^*,' ',v3^b,' ',v3^c,' ',v3^d,'' + fi, + if p(v104) then ' | Sede: ',v104, fi, + if p(v2) then ' | ID: ',v2, fi, + '
', + '
', + if p(v2) then ' Ver Ejemplares' fi, + + if npost(['copies'],'CN_biblo_'v1)>0 then + ' + + + + + + + + + '/ + /'$$REF:copies,inven,CN_biblo_'v2/ + ' +
Total ejemplares:' + f(npost(['copies'],'CN_biblo_'v2),1,0) + '
ControlInv. NúmeroSituaciónEjemplaresDisponibilidad
' + fi, + + '
', + '
', + + '
'/ +'
'/ \ No newline at end of file diff --git a/www/bases-examples_Linux/biblo/pfts/pt/opac.pft b/www/bases-examples_Linux/biblo/pfts/pt/opac.pft index 4e2c5691b..b5508172b 100755 --- a/www/bases-examples_Linux/biblo/pfts/pt/opac.pft +++ b/www/bases-examples_Linux/biblo/pfts/pt/opac.pft @@ -1,289 +1,167 @@ - -''/ -'' -'' -'' -''/ -'' -'
',/ - (if p(v800) then '' / fi/) -' '/ -/ - -, - -'' -if p(v9) then 'Tipo de Material: ', - - '' (v9+|; |/),/'' - -fi/ - -if p(v160) then,'
' - - ' Profesor Gua: ' - - (if p(v160) then v160^b,| |v160^* , |, |v160^r if iocc<>nocc(v160) then '; ' fi fi) - - fi - - - -if p(v12) then '
' mhl,V12," = "v13,mpl ' ' else - mhl,'
' ""v18,"="v19, '' ,mpl, - - - fi, - if p(v10) or p(v11) then ' / ' fi, - (if p(v10) then v10^b,| |v10^*,|, |v10^r if iocc<>nocc(v10) then '; ' fi fi) - - if p(v10) and p(v11) then '; ' fi, - - (if p(v11) then v11^b|. |,v11^*+|; |,if iocc=nocc(v11) then '; ' fi, fi) - -if p(v16) or p(v17) then ' / ' fi, - (if p(v16) then v16^b,| |v16^*,|, |v16^r if iocc<>nocc(v16) then '; ' fi fi) - - if p(v16) and p(v17) then '; ' fi, - - (if p(v17) then v17^b|. |,v17^*+|; |,if iocc=nocc(v17) then '; ' fi, fi) - - if p(v12) and p(v30) then - - ".-- "v14,'.-- En: ' mhl,v30,mpl," / "d29,(V29^b|. |,|; |+v29^*),".-- "v39+|, |," : "v38,".-- "v31,", "v32," ("v43")" - - fi, - - if p(v12) and p(v18) then - - '. -- En : ' mhl,v18,mpl," / "d16,(|; |+v16^b,| |v16^*), |. -- |v41,|-- |v39,|: |V38|, |,V43,".-- "V20,". Serie: "V22^*,", "v22^n - - fi / - - -/ - -if v4='K' or v6='s' then - - '',mhl,v30,mpl,""d30,, - - " / "D29,(V29^b|. |,v29^*+|; |),".-- "v39+|, |," : "v38,".-- "v31,", "v32," ("v43")" , - - "
Situacin "v300, - - fi/ - - - - " .-- "v41," .--"v39+|; |," : "v38+|; |,", "v43,".-- "v20," : "v42,".-- "v73,".- Serie: "V22^*,", "v22^n, - - - - -if (v6='c' or v6='mc') and v4='M' then - - ".-- En : "v25," / "d23,(|; |+v23^b,| |v23^*), |. -- |v41,|-- |v39,|: |V38|, |,V43,".-- "V27,".-- Serie: "v22^n, - -fi, - - - -if V4='C' then, - - if v6='c' or v6='mc' then, - - mhl,""v25,"="v26,'',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 , - - "
Aos en existencia "v43+|; |, - - "
Volumenes "v27+|; |, - - fi, - -fi/ - - - -if v4='V' then - - if p(v410)then - - (v410),'/ '(|; |+v400^b,| |v400^*,|, |v400^r), - - " .-- "v41," .--"v39+|; |," : "v38+|; |,", "v43," : "v42, - - ".-- "v415," ("v420")"," ("v422")"," ,"v421, - - fi - - - - " Distribuidor: "d430,(v430^*,| / |v430^p+|; |), - - " Dirigido a: "d440,(v440+|; |), - -fi - - - -if p(v53) then, - - "
Evento: "v53," ("v56," : "v54+|. |") ",".- "v52+|; | fi, - - - -if p(v59) then, - - "
Proyecto: "v59^*," / "v59^s,", "v60," / "v58+|; | fi, - - - -if p(v50) then/ - - if v153:'A' then, - - "
Trabajo de Ascenso presentado ante "v50,". "V150,". "V152, - - ", para ascender a la categora de "V51 fi, - - if v153:'T' then "
Tesis presentada ante "v50,". "V150,". "V152, - - ", para obtener el grado de "V51 fi, - - if v153:'I' then "
Informe de Pasanta presentado ante "v50,". "V150,". "V152, - - ", para obtener el grado de "V51 fi, - -fi, - - -("
ISBN "v47+|; |), - - - -/ -if p(v63) then '
Formatos: ', - - '' (v63+|; |/),/'' - -fi/ -if p(v76) or p(v79) then '

Descriptores: ', - - (v76+|; |/) - (if p(v79) then |; |+v79^*,|--|v79^w,|--|v79^x,|--|v79^y,|--|v79^z fi )/,, - - if p(v80) or p(v81) then - - '
Categora temtica:'/ - - fi/ - - (v80+|; |)/ - - (v81+|; |),/ - - / - -fi, - - - -if p(v77) then '
Datos estadsticos: ', - - (v77+|; |/),/ - -fi/ - - - - - -if p(v82) or p(v85) then - '
Categora geogrfica: ' - (v82+|; |/) - (v85+|; |/) -fi/ - - - - -if p(v72) then - '

' - (| |v72+|
|/) -fi/ - - if p(v68) then '
Notas: ', - - '' (v68+|; |/),/'' - -fi/'

' - - if p(v36) then - '

Tabla de contenido:' - '

    '/ - - (if p(v36) then '
  • ' fi, v36^*,| // |v36^b ,| |v36^c,| |v36^d,| |v36^e,|; |v36^f,| |v36^g,| |v36^l, | |v36^m,| |v36^n), - '
'/ - - fi/ -'

' - (if p(v810) then ''/if p(v810^d) then v810^d else v810^* fi'
' fi/)/ - (if p(v840) then ''/if p(v840^d) then v840^d else v840^* fi'
' fi/)/ - -if p(v313) then 'Cdigo de Bibliografa Bsica/Complementaria: ', - - '' (v313+|; |/),/ - -fi/'' - -if p(v314) then '
SOLICITE POR ESTE CODIGO: ''
Ubicacin: ' (mhl,v314+|; |), else - - - -if p(v3) then, - '
SOLICITE POR ESTE CODIGO: ''
Ubicacin: ',v3^*," / "v3^b," / "v3^c,"."v3^d'' fi,fi - - - - - - -if p(v104) then - '
Sede: ',(v104^*+|; |)/ ' 'fi, -'
NDoc.: ',v2''," (Incluya estos datos en la boleta de pedido) " '' -'

'/ - - -''/ -/ -/ - -ref(['loanobjects']l(['loanobjects'],'CN_biblo_'v2), - '

' - '' - ' - ' - (if p(v959) then - '' - '`, fi - else - 'Prestado' - fi - fi/) - '
Total disponibilidad: 'f(nocc(v959),1,0)'
No.inventarioBibliotecaTipo de materialSituacinFecha devolucin
'v959^i''v959^l''v959^o'', - if npost(['trans'],'TR_P_'v959^i) = 0 then - 'Disponible' - if iocc>1 then `Reservar' ref(['trans']l(['trans'],'TR_P_'v959^i), - v40[1]*6.2,'/',v40[1]*4.2,'/',v40[1].4),'
', - ) -'


' +/* Incio do Container do Registro */ +'

'/ + + /* ------------------------------------------------ */ + /* COLUNA 1: IMAGEM (Lado Esquerdo - col-md-3) */ + /* ------------------------------------------------ */ + '
'/ + (if p(v800) then + '' + 'Imagem do registro' + ''/ + else + /* Placeholder para quando no houver imagem */ + '
' + '' + '
' + fi)/ + '
'/ + + /* ------------------------------------------------ */ + /* COLUNA 2: DADOS BIBLIOGRFICOS (Lado Direito) */ + /* ------------------------------------------------ */ + '
'/ + + /* Tipo de Material e Nvel Bibliogrfico (Badges) */ + '
' + if p(v9) then '',v9^*,'' fi, + if p(v6) then '',v6^*,'' fi, + '
'/ + + /* TTULO PRINCIPAL */ + /* Verifica se Analtico (v12) ou Monogrfico (v18) ou Seriado (v30) */ + '

', + if p(v12) then v12, if p(v13) then ' = ',v13, fi, + else + if p(v18) then v18, if p(v19) then ' = ',v19, fi, + else + if p(v30) then v30, fi, /* Ttulo da Revista caso seja o registro pai */ + fi, + fi, + '

'/ + + /* AUTORES */ + if p(v10) or p(v11) or p(v16) or p(v17) then + '

Autores: ', + /* Autores Pessoais (Analtico) */ + (if p(v10) then v10^b,' ',v10^*, if p(v10^r) then ' (',v10^r,')' fi, if iocc < nocc(v10) then '; ' fi, fi), + /* Autores Institucionais (Analtico) */ + if p(v10) and p(v11) then '; ' fi, + (if p(v11) then v11^*, if iocc < nocc(v11) then '; ' fi, fi), + /* Autores Monogrficos (se no houver analticos ou para complementar) */ + if a(v10) and a(v11) then + (if p(v16) then v16^b,' ',v16^*, if p(v16^r) then ' (',v16^r,')' fi, if iocc < nocc(v16) then '; ' fi, fi), + if p(v16) and p(v17) then '; ' fi, + (if p(v17) then v17^*, if iocc < nocc(v17) then '; ' fi, fi), + fi, + '

'/ + fi, + +/* FONTE (EM:) - Verso Infalvel (Sem OR/AND misturados) */ + if p(v30) then + /* Caso 1: uma analtica (Artigo) */ + if p(v12) then + '

', + 'Em: ', v30, + if p(v31) then ', Vol. ',v31, fi, + if p(v32) then ', N ',v32, fi, + if p(v43) then ' (',v43,')' fi, + if p(v14) then ', p. ',v14, fi, + '

'/ + else + /* Caso 2: uma monografia (Livro em Srie) */ + if p(v18) then + '

', + 'Srie: ', v30, + if p(v31) then ', Vol. ',v31, fi, + if p(v32) then ', N ',v32, fi, + if p(v43) then ' (',v43,')' fi, + '

'/ + fi + fi + fi, + + /* IMPRENTA (Edio, Cidade, Editora, Data) - Para Monografias */ + if p(v38) or p(v39) or p(v43) then + '

', + if p(v41) then v41,'. -- ' fi, + if p(v39) then v39,': ' fi, + if p(v38) then v38, fi, + if p(v43) and a(v30) then ', ',v43, fi, /* S mostra data aqui se no mostrou no "Em:" */ + if p(v20) then '. -- ',v20,' p.' fi, + if p(v42) then '. -- (',v42,')' fi, + '

'/ + fi, + + /* SRIE / COLEO */ + if p(v25) then '

Srie: ',v25, if p(v27) then '; ',v27 fi, '

'/ fi, + + /* NOTAS E RESUMO */ + if p(v72) then '
Resumo: ',v72,'
'/ fi, + if p(v37) then '
Contedo:
',(v37+|
|),'
'/ fi, + if p(v68) then '
Notas: ',v68,'
'/ fi, + + /* ASSUNTOS / DESCRITORES */ + if p(v76) then + '
', + ( '',v76,'' ), + '
'/ + fi, + + /* LINKS DIGITAIS (PDFs e URLs) */ + if p(v810) or p(v840) then + '
', + /* Link para Texto Completo Interno (PDF) */ + (if p(v810) then + + '', + ' Texto Completo', + if p(v810^d) then ' (',v810^d,')' fi, + ' ' + fi), + /* Link Externo (URL) */ + (if p(v840) then + '', + ' Acesso Externo', + if p(v840^d) then ' (',v840^d,')' fi, + ' ' + fi), + '
'/ + fi, + + /* RODAP: LOCALIZAO E CONTROLES */ + '
', + '
', + if p(v3) then + 'Localizao: ',v3^*,' ',v3^b,' ',v3^c,' ',v3^d,'' + fi, + if p(v104) then ' | Sede: ',v104, fi, + if p(v2) then ' | ID: ',v2, fi, + '
', + /* Boto falso de Exemplares (se quiser implementar script de clique depois) */ + '
', + if p(v2) then ' Ver Exemplares' fi, + + if npost(['copies'],'CN_biblo_'v1)>0 then + ' + + + + + + + + + '/ + /'$$REF:copies,inven,CN_biblo_'v2/ + ' +
Total de exemplares:' + f(npost(['copies'],'CN_biblo_'v2),1,0) + '
ControleTomboSitua??oExemplaresDisponibilidade
' + fi, + + '
', + '
', + + '
'/ /* Fim col-md-9 */ +'
'/ /* Fim row */ \ No newline at end of file diff --git a/www/bases-examples_Linux/par/biblo.par b/www/bases-examples_Linux/par/biblo.par index 4900719c1..828f38c6d 100644 --- a/www/bases-examples_Linux/par/biblo.par +++ b/www/bases-examples_Linux/par/biblo.par @@ -1,11 +1,14 @@ biblo.*=%path_database%biblo/data/biblo.* +loanobjects.*=%path_database%loanobjects/data/loanobjects.* +copies.*=%path_database%copies/data/copies.* marc.*=%path_database%marc/data/marc.* +htmlgizmo.*=%path_database%biblo/data/htmlgizmo.* copies.*=%path_database%copies/data/copies.* biblo.pft=c%path_database%biblo/www/biblo.pft prologoact.pft=%path_database%www/prologoact.pft epilogoact.pft=%path_database%www/epilogoact.pft autoridades.pft=%path_database%biblo/pfts/en/autoridades.pft - - - - +abiblo.pft=%path_database%biblo/pfts/%lang%/abiblo.pft +bbiblo.pft=%path_database%biblo/pfts/%lang%/bbiblo.pft +autoridades_opac.pft=%path_database%biblo/pfts/autoridades_opac.pft +opac.pft=%path_database%biblo/pfts/%lang%/opac.pft diff --git a/www/bases-examples_Windows/biblo/dr_path.def b/www/bases-examples_Windows/biblo/dr_path.def index 95f49ff25..42d9bdf0e 100644 --- a/www/bases-examples_Windows/biblo/dr_path.def +++ b/www/bases-examples_Windows/biblo/dr_path.def @@ -1 +1,4 @@ -ROOT=%path_database%biblo/collection/ \ No newline at end of file +UNICODE=0 +ROOT=%path_database%biblo/collection/ +COLLECTION=%path_database%biblo/collection/ +DIRTREE_EXT=*.def,*.iso,*.png,*.gif,*.jpg,*.pdf,*.xrf,*.mst,*.n01,*.n02,*.l01,*.l02,*.cnt,*.ifp,*.fmt,*.fdt,*.pft,*.fst,*.tab,*.txt,*.par,*.html,*.zip, diff --git a/www/bases-examples_Windows/biblo/opac/en/biblo.def b/www/bases-examples_Windows/biblo/opac/en/biblo.def new file mode 100644 index 000000000..527b1a23b --- /dev/null +++ b/www/bases-examples_Windows/biblo/opac/en/biblo.def @@ -0,0 +1 @@ +Base de dados CEPAL \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/opac/en/biblo.lang b/www/bases-examples_Windows/biblo/opac/en/biblo.lang new file mode 100644 index 000000000..0cf405b19 --- /dev/null +++ b/www/bases-examples_Windows/biblo/opac/en/biblo.lang @@ -0,0 +1 @@ +LATIN \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/opac/en/biblo_facetas.dat b/www/bases-examples_Windows/biblo/opac/en/biblo_facetas.dat new file mode 100644 index 000000000..8f94c73e4 --- /dev/null +++ b/www/bases-examples_Windows/biblo/opac/en/biblo_facetas.dat @@ -0,0 +1,3 @@ +Language|(v64/)|LA_|Q +Subjects|(v76/)|MA_|A +Country|(v40/)|PA_|A \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/opac/en/biblo_formatos.dat b/www/bases-examples_Windows/biblo/opac/en/biblo_formatos.dat new file mode 100644 index 000000000..d8b16e155 --- /dev/null +++ b/www/bases-examples_Windows/biblo/opac/en/biblo_formatos.dat @@ -0,0 +1 @@ +opac|Visão pública|Y|Y \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/opac/en/biblo_libre.tab b/www/bases-examples_Windows/biblo/opac/en/biblo_libre.tab new file mode 100644 index 000000000..2a1f8e9e7 --- /dev/null +++ b/www/bases-examples_Windows/biblo/opac/en/biblo_libre.tab @@ -0,0 +1 @@ +Free search|TW_ \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/opac/es/biblo.def b/www/bases-examples_Windows/biblo/opac/es/biblo.def new file mode 100644 index 000000000..527b1a23b --- /dev/null +++ b/www/bases-examples_Windows/biblo/opac/es/biblo.def @@ -0,0 +1 @@ +Base de dados CEPAL \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/opac/es/biblo.lang b/www/bases-examples_Windows/biblo/opac/es/biblo.lang new file mode 100644 index 000000000..0cf405b19 --- /dev/null +++ b/www/bases-examples_Windows/biblo/opac/es/biblo.lang @@ -0,0 +1 @@ +LATIN \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/opac/es/biblo_facetas.dat b/www/bases-examples_Windows/biblo/opac/es/biblo_facetas.dat new file mode 100644 index 000000000..7d2bfba55 --- /dev/null +++ b/www/bases-examples_Windows/biblo/opac/es/biblo_facetas.dat @@ -0,0 +1,3 @@ +Idioma|(v64/)|LA_|Q +Descriptores|(v76/)|MA_|A +País|(v40/)|PA_|A \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/opac/es/biblo_formatos.dat b/www/bases-examples_Windows/biblo/opac/es/biblo_formatos.dat new file mode 100644 index 000000000..d8b16e155 --- /dev/null +++ b/www/bases-examples_Windows/biblo/opac/es/biblo_formatos.dat @@ -0,0 +1 @@ +opac|Visão pública|Y|Y \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/opac/es/biblo_libre.tab b/www/bases-examples_Windows/biblo/opac/es/biblo_libre.tab new file mode 100644 index 000000000..2a1f8e9e7 --- /dev/null +++ b/www/bases-examples_Windows/biblo/opac/es/biblo_libre.tab @@ -0,0 +1 @@ +Free search|TW_ \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/opac/fr/biblo.def b/www/bases-examples_Windows/biblo/opac/fr/biblo.def new file mode 100644 index 000000000..527b1a23b --- /dev/null +++ b/www/bases-examples_Windows/biblo/opac/fr/biblo.def @@ -0,0 +1 @@ +Base de dados CEPAL \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/opac/fr/biblo.lang b/www/bases-examples_Windows/biblo/opac/fr/biblo.lang new file mode 100644 index 000000000..0cf405b19 --- /dev/null +++ b/www/bases-examples_Windows/biblo/opac/fr/biblo.lang @@ -0,0 +1 @@ +LATIN \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/opac/fr/biblo_facetas.dat b/www/bases-examples_Windows/biblo/opac/fr/biblo_facetas.dat new file mode 100644 index 000000000..ee2ea5812 --- /dev/null +++ b/www/bases-examples_Windows/biblo/opac/fr/biblo_facetas.dat @@ -0,0 +1,3 @@ +Langue|(v64/)|LA_|Q +Sujets|(v76/)|MA_|A +Pays|(v40/)|PA_|A \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/opac/fr/biblo_formatos.dat b/www/bases-examples_Windows/biblo/opac/fr/biblo_formatos.dat new file mode 100644 index 000000000..d8b16e155 --- /dev/null +++ b/www/bases-examples_Windows/biblo/opac/fr/biblo_formatos.dat @@ -0,0 +1 @@ +opac|Visão pública|Y|Y \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/opac/fr/biblo_libre.tab b/www/bases-examples_Windows/biblo/opac/fr/biblo_libre.tab new file mode 100644 index 000000000..2a1f8e9e7 --- /dev/null +++ b/www/bases-examples_Windows/biblo/opac/fr/biblo_libre.tab @@ -0,0 +1 @@ +Free search|TW_ \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/opac/pt/biblo.def b/www/bases-examples_Windows/biblo/opac/pt/biblo.def new file mode 100644 index 000000000..527b1a23b --- /dev/null +++ b/www/bases-examples_Windows/biblo/opac/pt/biblo.def @@ -0,0 +1 @@ +Base de dados CEPAL \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/opac/pt/biblo.lang b/www/bases-examples_Windows/biblo/opac/pt/biblo.lang new file mode 100644 index 000000000..0cf405b19 --- /dev/null +++ b/www/bases-examples_Windows/biblo/opac/pt/biblo.lang @@ -0,0 +1 @@ +LATIN \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/opac/pt/biblo_facetas.dat b/www/bases-examples_Windows/biblo/opac/pt/biblo_facetas.dat new file mode 100644 index 000000000..e1596543b --- /dev/null +++ b/www/bases-examples_Windows/biblo/opac/pt/biblo_facetas.dat @@ -0,0 +1,3 @@ +Idioma|(v64/)|LA_|Q +Descritores|(v76/)|MA_|A +País|(v40/)|PA_|A diff --git a/www/bases-examples_Windows/biblo/opac/pt/biblo_formatos.dat b/www/bases-examples_Windows/biblo/opac/pt/biblo_formatos.dat new file mode 100644 index 000000000..d8b16e155 --- /dev/null +++ b/www/bases-examples_Windows/biblo/opac/pt/biblo_formatos.dat @@ -0,0 +1 @@ +opac|Visão pública|Y|Y \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/opac/pt/biblo_libre.tab b/www/bases-examples_Windows/biblo/opac/pt/biblo_libre.tab new file mode 100644 index 000000000..2a1f8e9e7 --- /dev/null +++ b/www/bases-examples_Windows/biblo/opac/pt/biblo_libre.tab @@ -0,0 +1 @@ +Free search|TW_ \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/opac/relevance.def b/www/bases-examples_Windows/biblo/opac/relevance.def new file mode 100644 index 000000000..f522d87e0 --- /dev/null +++ b/www/bases-examples_Windows/biblo/opac/relevance.def @@ -0,0 +1,12 @@ +[title] +fields = "12, 13, 18, 19, 25, 26, 30" + +[author] +fields = "10, 11, 16, 17, 23, 24" + +[subject] +fields = "42, 76, 82" + +[general] +fields = "3, 9, 39, 47, 55, 59, 63, 64, 72" + diff --git a/www/bases-examples_Windows/biblo/pfts/en/opac.pft b/www/bases-examples_Windows/biblo/pfts/en/opac.pft new file mode 100644 index 000000000..f29aad17b --- /dev/null +++ b/www/bases-examples_Windows/biblo/pfts/en/opac.pft @@ -0,0 +1,162 @@ +/* Record Container Start */ +'
'/ + + /* ------------------------------------------------ */ + /* COLUMN 1: IMAGE (Left Side - col-md-3) */ + /* ------------------------------------------------ */ + '
'/ + (if p(v800) then + '' + 'Record image' + ''/ + else + /* Placeholder when no image exists */ + '
' + '' + '
' + fi)/ + '
'/ + + /* ------------------------------------------------ */ + /* COLUMN 2: BIBLIOGRAPHIC DATA (Right Side) */ + /* ------------------------------------------------ */ + '
'/ + + /* Material Type and Level (Badges) */ + '
' + if p(v9) then '',v9^*,'' fi, + if p(v6) then '',v6^*,'' fi, + '
'/ + + /* MAIN TITLE */ + '

', + if p(v12) then v12, if p(v13) then ' = ',v13, fi, + else + if p(v18) then v18, if p(v19) then ' = ',v19, fi, + else + if p(v30) then v30, fi, + fi, + fi, + '

'/ + + /* AUTHORS */ + if p(v10) or p(v11) or p(v16) or p(v17) then + '

Authors: ', + /* Personal Authors (Analytical) */ + (if p(v10) then v10^b,' ',v10^*, if p(v10^r) then ' (',v10^r,')' fi, if iocc < nocc(v10) then '; ' fi, fi), + /* Institutional Authors (Analytical) */ + if p(v10) and p(v11) then '; ' fi, + (if p(v11) then v11^*, if iocc < nocc(v11) then '; ' fi, fi), + /* Monographic Authors */ + if a(v10) and a(v11) then + (if p(v16) then v16^b,' ',v16^*, if p(v16^r) then ' (',v16^r,')' fi, if iocc < nocc(v16) then '; ' fi, fi), + if p(v16) and p(v17) then '; ' fi, + (if p(v17) then v17^*, if iocc < nocc(v17) then '; ' fi, fi), + fi, + '

'/ + fi, + + /* SOURCE (In:) */ + if p(v30) then + /* Case 1: Analytical (Article) */ + if p(v12) then + '

', + 'In: ', v30, + if p(v31) then ', Vol. ',v31, fi, + if p(v32) then ', No. ',v32, fi, + if p(v43) then ' (',v43,')' fi, + if p(v14) then ', p. ',v14, fi, + '

'/ + else + /* Case 2: Monograph (Series) */ + if p(v18) then + '

', + 'Series: ', v30, + if p(v31) then ', Vol. ',v31, fi, + if p(v32) then ', No. ',v32, fi, + if p(v43) then ' (',v43,')' fi, + '

'/ + fi + fi + fi, + + /* IMPRINT */ + if p(v38) or p(v39) or p(v43) then + '

', + if p(v41) then v41,'. -- ' fi, + if p(v39) then v39,': ' fi, + if p(v38) then v38, fi, + if p(v43) and a(v30) then ', ',v43, fi, + if p(v20) then '. -- ',v20,' p.' fi, + if p(v42) then '. -- (',v42,')' fi, + '

'/ + fi, + + /* SERIES / COLLECTION */ + if p(v25) then '

Series: ',v25, if p(v27) then '; ',v27 fi, '

'/ fi, + + /* NOTES AND ABSTRACT */ + if p(v72) then '
Abstract: ',v72,'
'/ fi, + if p(v37) then '
Contents:
',(v37+|
|),'
'/ fi, + if p(v68) then '
Notes: ',v68,'
'/ fi, + + /* SUBJECTS */ + if p(v76) then + '
', + ( '',v76,'' ), + '
'/ + fi, + + /* DIGITAL LINKS */ + if p(v810) or p(v840) then + '
', + (if p(v810) then + '', + ' Full Text', + if p(v810^d) then ' (',v810^d,')' fi, + ' ' + fi), + (if p(v840) then + '', + ' External Link', + if p(v840^d) then ' (',v840^d,')' fi, + ' ' + fi), + '
'/ + fi, + + /* FOOTER: LOCATION AND CONTROLS */ + '
', + '
', + if p(v3) then + 'Location: ',v3^*,' ',v3^b,' ',v3^c,' ',v3^d,'' + fi, + if p(v104) then ' | Branch: ',v104, fi, + if p(v2) then ' | ID: ',v2, fi, + '
', + '
', + if p(v2) then ' Check Copies' fi, + + if npost(['copies'],'CN_biblo_'v1)>0 then + ' + + + + + + + + + '/ + /'$$REF:copies,inven,CN_biblo_'v2/ + ' +
Total copies:' + f(npost(['copies'],'CN_biblo_'v2),1,0) + '
ControlInv. NumberStatusCopiesAvailability
' + fi, + + '
', + '
', + + '
'/ +'
'/ \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/pfts/es/opac.pft b/www/bases-examples_Windows/biblo/pfts/es/opac.pft new file mode 100644 index 000000000..4883d205f --- /dev/null +++ b/www/bases-examples_Windows/biblo/pfts/es/opac.pft @@ -0,0 +1,162 @@ +/* Inicio del Contenedor del Registro */ +'
'/ + + /* ------------------------------------------------ */ + /* COLUMNA 1: IMAGEN (Lado Izquierdo - col-md-3) */ + /* ------------------------------------------------ */ + '
'/ + (if p(v800) then + '' + 'Imagen del registro' + ''/ + else + /* Placeholder para cuando no hay imagen */ + '
' + '' + '
' + fi)/ + '
'/ + + /* ------------------------------------------------ */ + /* COLUMNA 2: DATOS BIBLIOGRÁFICOS (Lado Derecho) */ + /* ------------------------------------------------ */ + '
'/ + + /* Tipo de Material y Nivel Bibliográfico (Badges) */ + '
' + if p(v9) then '',v9^*,'' fi, + if p(v6) then '',v6^*,'' fi, + '
'/ + + /* TÍTULO PRINCIPAL */ + '

', + if p(v12) then v12, if p(v13) then ' = ',v13, fi, + else + if p(v18) then v18, if p(v19) then ' = ',v19, fi, + else + if p(v30) then v30, fi, + fi, + fi, + '

'/ + + /* AUTORES */ + if p(v10) or p(v11) or p(v16) or p(v17) then + '

Autores: ', + /* Autores Personales (Analítico) */ + (if p(v10) then v10^b,' ',v10^*, if p(v10^r) then ' (',v10^r,')' fi, if iocc < nocc(v10) then '; ' fi, fi), + /* Autores Institucionales (Analítico) */ + if p(v10) and p(v11) then '; ' fi, + (if p(v11) then v11^*, if iocc < nocc(v11) then '; ' fi, fi), + /* Autores Monográficos */ + if a(v10) and a(v11) then + (if p(v16) then v16^b,' ',v16^*, if p(v16^r) then ' (',v16^r,')' fi, if iocc < nocc(v16) then '; ' fi, fi), + if p(v16) and p(v17) then '; ' fi, + (if p(v17) then v17^*, if iocc < nocc(v17) then '; ' fi, fi), + fi, + '

'/ + fi, + + /* FUENTE (EN:) */ + if p(v30) then + /* Caso 1: Analítica (Artículo) */ + if p(v12) then + '

', + 'En: ', v30, + if p(v31) then ', Vol. ',v31, fi, + if p(v32) then ', Nº ',v32, fi, + if p(v43) then ' (',v43,')' fi, + if p(v14) then ', p. ',v14, fi, + '

'/ + else + /* Caso 2: Monografía (Serie) */ + if p(v18) then + '

', + 'Serie: ', v30, + if p(v31) then ', Vol. ',v31, fi, + if p(v32) then ', Nº ',v32, fi, + if p(v43) then ' (',v43,')' fi, + '

'/ + fi + fi + fi, + + /* PIE DE IMPRENTA */ + if p(v38) or p(v39) or p(v43) then + '

', + if p(v41) then v41,'. -- ' fi, + if p(v39) then v39,': ' fi, + if p(v38) then v38, fi, + if p(v43) and a(v30) then ', ',v43, fi, + if p(v20) then '. -- ',v20,' p.' fi, + if p(v42) then '. -- (',v42,')' fi, + '

'/ + fi, + + /* SERIE / COLECCIÓN */ + if p(v25) then '

Serie: ',v25, if p(v27) then '; ',v27 fi, '

'/ fi, + + /* NOTAS Y RESUMEN */ + if p(v72) then '
Resumen: ',v72,'
'/ fi, + if p(v37) then '
Contenido:
',(v37+|
|),'
'/ fi, + if p(v68) then '
Notas: ',v68,'
'/ fi, + + /* MATERIAS / DESCRIPTORES */ + if p(v76) then + '
', + ( '',v76,'' ), + '
'/ + fi, + + /* ENLACES DIGITALES */ + if p(v810) or p(v840) then + '
', + (if p(v810) then + '', + ' Texto Completo', + if p(v810^d) then ' (',v810^d,')' fi, + ' ' + fi), + (if p(v840) then + '', + ' Acceso Externo', + if p(v840^d) then ' (',v840^d,')' fi, + ' ' + fi), + '
'/ + fi, + + /* PIE DE PÁGINA: UBICACIÓN Y CONTROLES */ + '
', + '
', + if p(v3) then + 'Ubicación: ',v3^*,' ',v3^b,' ',v3^c,' ',v3^d,'' + fi, + if p(v104) then ' | Sede: ',v104, fi, + if p(v2) then ' | ID: ',v2, fi, + '
', + '
', + if p(v2) then ' Ver Ejemplares' fi, + + if npost(['copies'],'CN_biblo_'v1)>0 then + ' + + + + + + + + + '/ + /'$$REF:copies,inven,CN_biblo_'v2/ + ' +
Total ejemplares:' + f(npost(['copies'],'CN_biblo_'v2),1,0) + '
ControlInv. NúmeroSituaciónEjemplaresDisponibilidad
' + fi, + + '
', + '
', + + '
'/ +'
'/ \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/pfts/fr/opac.pft b/www/bases-examples_Windows/biblo/pfts/fr/opac.pft new file mode 100644 index 000000000..22e351214 --- /dev/null +++ b/www/bases-examples_Windows/biblo/pfts/fr/opac.pft @@ -0,0 +1,162 @@ +/* Début du conteneur d'enregistrement */ +'
'/ + + /* ------------------------------------------------ */ + /* COLONNE 1: IMAGE (Côté Gauche - col-md-3) */ + /* ------------------------------------------------ */ + '
'/ + (if p(v800) then + '' + 'Image de l\'enregistrement' + ''/ + else + /* Espace réservé s'il n'y a pas d'image */ + '
' + '' + '
' + fi)/ + '
'/ + + /* ------------------------------------------------ */ + /* COLONNE 2: DONNÉES BIBLIOGRAPHIQUES (Côté Droit) */ + /* ------------------------------------------------ */ + '
'/ + + /* Type de matériel et niveau bibliographique (Badges) */ + '
' + if p(v9) then '',v9^*,'' fi, + if p(v6) then '',v6^*,'' fi, + '
'/ + + /* TITRE PRINCIPAL */ + '

', + if p(v12) then v12, if p(v13) then ' = ',v13, fi, + else + if p(v18) then v18, if p(v19) then ' = ',v19, fi, + else + if p(v30) then v30, fi, + fi, + fi, + '

'/ + + /* AUTEURS */ + if p(v10) or p(v11) or p(v16) or p(v17) then + '

Auteurs: ', + /* Auteurs personnels (Analytique) */ + (if p(v10) then v10^b,' ',v10^*, if p(v10^r) then ' (',v10^r,')' fi, if iocc < nocc(v10) then '; ' fi, fi), + /* Auteurs institutionnels (Analytique) */ + if p(v10) and p(v11) then '; ' fi, + (if p(v11) then v11^*, if iocc < nocc(v11) then '; ' fi, fi), + /* Auteurs monographiques */ + if a(v10) and a(v11) then + (if p(v16) then v16^b,' ',v16^*, if p(v16^r) then ' (',v16^r,')' fi, if iocc < nocc(v16) then '; ' fi, fi), + if p(v16) and p(v17) then '; ' fi, + (if p(v17) then v17^*, if iocc < nocc(v17) then '; ' fi, fi), + fi, + '

'/ + fi, + + /* SOURCE (Dans:) */ + if p(v30) then + /* Cas 1: Analytique (Article) */ + if p(v12) then + '

', + 'Dans: ', v30, + if p(v31) then ', Vol. ',v31, fi, + if p(v32) then ', N° ',v32, fi, + if p(v43) then ' (',v43,')' fi, + if p(v14) then ', p. ',v14, fi, + '

'/ + else + /* Cas 2: Monographie (Série) */ + if p(v18) then + '

', + 'Série: ', v30, + if p(v31) then ', Vol. ',v31, fi, + if p(v32) then ', N° ',v32, fi, + if p(v43) then ' (',v43,')' fi, + '

'/ + fi + fi + fi, + + /* ADRESSE BIBLIOGRAPHIQUE */ + if p(v38) or p(v39) or p(v43) then + '

', + if p(v41) then v41,'. -- ' fi, + if p(v39) then v39,': ' fi, + if p(v38) then v38, fi, + if p(v43) and a(v30) then ', ',v43, fi, + if p(v20) then '. -- ',v20,' p.' fi, + if p(v42) then '. -- (',v42,')' fi, + '

'/ + fi, + + /* SÉRIE / COLLECTION */ + if p(v25) then '

Collection: ',v25, if p(v27) then '; ',v27 fi, '

'/ fi, + + /* NOTES ET RÉSUMÉ */ + if p(v72) then '
Résumé: ',v72,'
'/ fi, + if p(v37) then '
Contenu:
',(v37+|
|),'
'/ fi, + if p(v68) then '
Notes: ',v68,'
'/ fi, + + /* SUJETS / DESCRIPTEURS */ + if p(v76) then + '
', + ( '',v76,'' ), + '
'/ + fi, + + /* LIENS NUMÉRIQUES */ + if p(v810) or p(v840) then + '
', + (if p(v810) then + '', + ' Texte Intégral', + if p(v810^d) then ' (',v810^d,')' fi, + ' ' + fi), + (if p(v840) then + '', + ' Accès Externe', + if p(v840^d) then ' (',v840^d,')' fi, + ' ' + fi), + '
'/ + fi, + + /* PIED DE PAGE: LOCALISATION ET CONTRÔLES */ + '
', + '
', + if p(v3) then + 'Cote: ',v3^*,' ',v3^b,' ',v3^c,' ',v3^d,'' + fi, + if p(v104) then ' | Localisation: ',v104, fi, + if p(v2) then ' | ID: ',v2, fi, + '
', + '
', + if p(v2) then ' Voir Exemplaires' fi, + + if npost(['copies'],'CN_biblo_'v1)>0 then + ' + + + + + + + + + '/ + /'$$REF:copies,inven,CN_biblo_'v2/ + ' +
Total exemplaires:' + f(npost(['copies'],'CN_biblo_'v2),1,0) + '
ContrôleN° Inv.SituationExemplairesDisponibilité
' + fi, + + '
', + '
', + + '
'/ +'
'/ \ No newline at end of file diff --git a/www/bases-examples_Windows/biblo/pfts/pt/opac.pft b/www/bases-examples_Windows/biblo/pfts/pt/opac.pft index 7a3519072..b5508172b 100644 --- a/www/bases-examples_Windows/biblo/pfts/pt/opac.pft +++ b/www/bases-examples_Windows/biblo/pfts/pt/opac.pft @@ -1,289 +1,167 @@ - -''/ -'' -'' -'' -''/ -'' -'
',/ - (if p(v800) then '' / fi/) -' '/ -/ - -, - -'' -if p(v9) then 'Tipo de Material: ', - - '' (v9+|; |/),/'' - -fi/ - -if p(v160) then,'
' - - ' Profesor Gua: ' - - (if p(v160) then v160^b,| |v160^* , |, |v160^r if iocc<>nocc(v160) then '; ' fi fi) - - fi - - - -if p(v12) then '
' mhl,V12," = "v13,mpl ' ' else - mhl,'
' ""v18,"="v19, '' ,mpl, - - - fi, - if p(v10) or p(v11) then ' / ' fi, - (if p(v10) then v10^b,| |v10^*,|, |v10^r if iocc<>nocc(v10) then '; ' fi fi) - - if p(v10) and p(v11) then '; ' fi, - - (if p(v11) then v11^b|. |,v11^*+|; |,if iocc=nocc(v11) then '; ' fi, fi) - -if p(v16) or p(v17) then ' / ' fi, - (if p(v16) then v16^b,| |v16^*,|, |v16^r if iocc<>nocc(v16) then '; ' fi fi) - - if p(v16) and p(v17) then '; ' fi, - - (if p(v17) then v17^b|. |,v17^*+|; |,if iocc=nocc(v17) then '; ' fi, fi) - - if p(v12) and p(v30) then - - ".-- "v14,'.-- En: ' mhl,v30,mpl," / "d29,(V29^b|. |,|; |+v29^*),".-- "v39+|, |," : "v38,".-- "v31,", "v32," ("v43")" - - fi, - - if p(v12) and p(v18) then - - '. -- En : ' mhl,v18,mpl," / "d16,(|; |+v16^b,| |v16^*), |. -- |v41,|-- |v39,|: |V38|, |,V43,".-- "V20,". Serie: "V22^*,", "v22^n - - fi / - - -/ - -if v4='K' or v6='s' then - - '',mhl,v30,mpl,""d30,, - - " / "D29,(V29^b|. |,v29^*+|; |),".-- "v39+|, |," : "v38,".-- "v31,", "v32," ("v43")" , - - "
Situacin "v300, - - fi/ - - - - " .-- "v41," .--"v39+|; |," : "v38+|; |,", "v43,".-- "v20," : "v42,".-- "v73,".- Serie: "V22^*,", "v22^n, - - - - -if (v6='c' or v6='mc') and v4='M' then - - ".-- En : "v25," / "d23,(|; |+v23^b,| |v23^*), |. -- |v41,|-- |v39,|: |V38|, |,V43,".-- "V27,".-- Serie: "v22^n, - -fi, - - - -if V4='C' then, - - if v6='c' or v6='mc' then, - - mhl,""v25,"="v26,'',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 , - - "
Aos en existencia "v43+|; |, - - "
Volumenes "v27+|; |, - - fi, - -fi/ - - - -if v4='V' then - - if p(v410)then - - (v410),'/ '(|; |+v400^b,| |v400^*,|, |v400^r), - - " .-- "v41," .--"v39+|; |," : "v38+|; |,", "v43," : "v42, - - ".-- "v415," ("v420")"," ("v422")"," ,"v421, - - fi - - - - " Distribuidor: "d430,(v430^*,| / |v430^p+|; |), - - " Dirigido a: "d440,(v440+|; |), - -fi - - - -if p(v53) then, - - "
Evento: "v53," ("v56," : "v54+|. |") ",".- "v52+|; | fi, - - - -if p(v59) then, - - "
Proyecto: "v59^*," / "v59^s,", "v60," / "v58+|; | fi, - - - -if p(v50) then/ - - if v153:'A' then, - - "
Trabajo de Ascenso presentado ante "v50,". "V150,". "V152, - - ", para ascender a la categora de "V51 fi, - - if v153:'T' then "
Tesis presentada ante "v50,". "V150,". "V152, - - ", para obtener el grado de "V51 fi, - - if v153:'I' then "
Informe de Pasanta presentado ante "v50,". "V150,". "V152, - - ", para obtener el grado de "V51 fi, - -fi, - - -("
ISBN "v47+|; |), - - - -/ -if p(v63) then '
Formatos: ', - - '' (v63+|; |/),/'' - -fi/ -if p(v76) or p(v79) then '

Descriptores: ', - - (v76+|; |/) - (if p(v79) then |; |+v79^*,|--|v79^w,|--|v79^x,|--|v79^y,|--|v79^z fi )/,, - - if p(v80) or p(v81) then - - '
Categora temtica:'/ - - fi/ - - (v80+|; |)/ - - (v81+|; |),/ - - / - -fi, - - - -if p(v77) then '
Datos estadsticos: ', - - (v77+|; |/),/ - -fi/ - - - - - -if p(v82) or p(v85) then - '
Categora geogrfica: ' - (v82+|; |/) - (v85+|; |/) -fi/ - - - - -if p(v72) then - '

' - (| |v72+|
|/) -fi/ - - if p(v68) then '
Notas: ', - - '' (v68+|; |/),/'' - -fi/'

' - - if p(v36) then - '

Tabla de contenido:' - '

    '/ - - (if p(v36) then '
  • ' fi, v36^*,| // |v36^b ,| |v36^c,| |v36^d,| |v36^e,|; |v36^f,| |v36^g,| |v36^l, | |v36^m,| |v36^n), - '
'/ - - fi/ -'

' - (if p(v810) then ''/if p(v810^d) then v810^d else v810^* fi'
' fi/)/ - (if p(v840) then ''/if p(v840^d) then v840^d else v840^* fi'
' fi/)/ - -if p(v313) then 'Cdigo de Bibliografa Bsica/Complementaria: ', - - '' (v313+|; |/),/ - -fi/'' - -if p(v314) then '
SOLICITE POR ESTE CODIGO: ''
Ubicacin: ' (mhl,v314+|; |), else - - - -if p(v3) then, - '
SOLICITE POR ESTE CODIGO: ''
Ubicacin: ',v3^*," / "v3^b," / "v3^c,"."v3^d'' fi,fi - - - - - - -if p(v104) then - '
Sede: ',(v104^*+|; |)/ ' 'fi, -'
NDoc.: ',v2''," (Incluya estos datos en la boleta de pedido) " '' -'

'/ - - -''/ -/ -/ - -ref(['loanobjects']l(['loanobjects'],'CN_biblo_'v2), - '

' - '' - ' - ' - (if p(v959) then - '' - '`, fi - else - 'Prestado' - fi - fi/) - '
Total disponibilidad: 'f(nocc(v959),1,0)'
No.inventarioBibliotecaTipo de materialSituacinFecha devolucin
'v959^i''v959^l''v959^o'', - if npost(['trans'],'TR_P_'v959^i) = 0 then - 'Disponible' - if iocc>1 then `Reservar' ref(['trans']l(['trans'],'TR_P_'v959^i), - v40[1]*6.2,'/',v40[1]*4.2,'/',v40[1].4),'
', - ) -'


' +/* Incio do Container do Registro */ +'

'/ + + /* ------------------------------------------------ */ + /* COLUNA 1: IMAGEM (Lado Esquerdo - col-md-3) */ + /* ------------------------------------------------ */ + '
'/ + (if p(v800) then + '' + 'Imagem do registro' + ''/ + else + /* Placeholder para quando no houver imagem */ + '
' + '' + '
' + fi)/ + '
'/ + + /* ------------------------------------------------ */ + /* COLUNA 2: DADOS BIBLIOGRFICOS (Lado Direito) */ + /* ------------------------------------------------ */ + '
'/ + + /* Tipo de Material e Nvel Bibliogrfico (Badges) */ + '
' + if p(v9) then '',v9^*,'' fi, + if p(v6) then '',v6^*,'' fi, + '
'/ + + /* TTULO PRINCIPAL */ + /* Verifica se Analtico (v12) ou Monogrfico (v18) ou Seriado (v30) */ + '

', + if p(v12) then v12, if p(v13) then ' = ',v13, fi, + else + if p(v18) then v18, if p(v19) then ' = ',v19, fi, + else + if p(v30) then v30, fi, /* Ttulo da Revista caso seja o registro pai */ + fi, + fi, + '

'/ + + /* AUTORES */ + if p(v10) or p(v11) or p(v16) or p(v17) then + '

Autores: ', + /* Autores Pessoais (Analtico) */ + (if p(v10) then v10^b,' ',v10^*, if p(v10^r) then ' (',v10^r,')' fi, if iocc < nocc(v10) then '; ' fi, fi), + /* Autores Institucionais (Analtico) */ + if p(v10) and p(v11) then '; ' fi, + (if p(v11) then v11^*, if iocc < nocc(v11) then '; ' fi, fi), + /* Autores Monogrficos (se no houver analticos ou para complementar) */ + if a(v10) and a(v11) then + (if p(v16) then v16^b,' ',v16^*, if p(v16^r) then ' (',v16^r,')' fi, if iocc < nocc(v16) then '; ' fi, fi), + if p(v16) and p(v17) then '; ' fi, + (if p(v17) then v17^*, if iocc < nocc(v17) then '; ' fi, fi), + fi, + '

'/ + fi, + +/* FONTE (EM:) - Verso Infalvel (Sem OR/AND misturados) */ + if p(v30) then + /* Caso 1: uma analtica (Artigo) */ + if p(v12) then + '

', + 'Em: ', v30, + if p(v31) then ', Vol. ',v31, fi, + if p(v32) then ', N ',v32, fi, + if p(v43) then ' (',v43,')' fi, + if p(v14) then ', p. ',v14, fi, + '

'/ + else + /* Caso 2: uma monografia (Livro em Srie) */ + if p(v18) then + '

', + 'Srie: ', v30, + if p(v31) then ', Vol. ',v31, fi, + if p(v32) then ', N ',v32, fi, + if p(v43) then ' (',v43,')' fi, + '

'/ + fi + fi + fi, + + /* IMPRENTA (Edio, Cidade, Editora, Data) - Para Monografias */ + if p(v38) or p(v39) or p(v43) then + '

', + if p(v41) then v41,'. -- ' fi, + if p(v39) then v39,': ' fi, + if p(v38) then v38, fi, + if p(v43) and a(v30) then ', ',v43, fi, /* S mostra data aqui se no mostrou no "Em:" */ + if p(v20) then '. -- ',v20,' p.' fi, + if p(v42) then '. -- (',v42,')' fi, + '

'/ + fi, + + /* SRIE / COLEO */ + if p(v25) then '

Srie: ',v25, if p(v27) then '; ',v27 fi, '

'/ fi, + + /* NOTAS E RESUMO */ + if p(v72) then '
Resumo: ',v72,'
'/ fi, + if p(v37) then '
Contedo:
',(v37+|
|),'
'/ fi, + if p(v68) then '
Notas: ',v68,'
'/ fi, + + /* ASSUNTOS / DESCRITORES */ + if p(v76) then + '
', + ( '',v76,'' ), + '
'/ + fi, + + /* LINKS DIGITAIS (PDFs e URLs) */ + if p(v810) or p(v840) then + '
', + /* Link para Texto Completo Interno (PDF) */ + (if p(v810) then + + '', + ' Texto Completo', + if p(v810^d) then ' (',v810^d,')' fi, + ' ' + fi), + /* Link Externo (URL) */ + (if p(v840) then + '', + ' Acesso Externo', + if p(v840^d) then ' (',v840^d,')' fi, + ' ' + fi), + '
'/ + fi, + + /* RODAP: LOCALIZAO E CONTROLES */ + '
', + '
', + if p(v3) then + 'Localizao: ',v3^*,' ',v3^b,' ',v3^c,' ',v3^d,'' + fi, + if p(v104) then ' | Sede: ',v104, fi, + if p(v2) then ' | ID: ',v2, fi, + '
', + /* Boto falso de Exemplares (se quiser implementar script de clique depois) */ + '
', + if p(v2) then ' Ver Exemplares' fi, + + if npost(['copies'],'CN_biblo_'v1)>0 then + ' + + + + + + + + + '/ + /'$$REF:copies,inven,CN_biblo_'v2/ + ' +
Total de exemplares:' + f(npost(['copies'],'CN_biblo_'v2),1,0) + '
ControleTomboSitua??oExemplaresDisponibilidade
' + fi, + + '
', + '
', + + '
'/ /* Fim col-md-9 */ +'
'/ /* Fim row */ \ No newline at end of file diff --git a/www/bases-examples_Windows/par/biblo.par b/www/bases-examples_Windows/par/biblo.par index fe93bb996..828f38c6d 100644 --- a/www/bases-examples_Windows/par/biblo.par +++ b/www/bases-examples_Windows/par/biblo.par @@ -1,4 +1,6 @@ biblo.*=%path_database%biblo/data/biblo.* +loanobjects.*=%path_database%loanobjects/data/loanobjects.* +copies.*=%path_database%copies/data/copies.* marc.*=%path_database%marc/data/marc.* htmlgizmo.*=%path_database%biblo/data/htmlgizmo.* copies.*=%path_database%copies/data/copies.* @@ -6,7 +8,7 @@ biblo.pft=c%path_database%biblo/www/biblo.pft prologoact.pft=%path_database%www/prologoact.pft epilogoact.pft=%path_database%www/epilogoact.pft autoridades.pft=%path_database%biblo/pfts/en/autoridades.pft - - - - +abiblo.pft=%path_database%biblo/pfts/%lang%/abiblo.pft +bbiblo.pft=%path_database%biblo/pfts/%lang%/bbiblo.pft +autoridades_opac.pft=%path_database%biblo/pfts/autoridades_opac.pft +opac.pft=%path_database%biblo/pfts/%lang%/opac.pft From 7a822882f825526033e6ba1efcb7247b419e1ad5 Mon Sep 17 00:00:00 2001 From: Roger C Guilherme Date: Tue, 3 Mar 2026 10:26:15 -0300 Subject: [PATCH 2/2] Enables the Cepal database for OPAC. --- www/bases-examples_Linux/opac_conf/en/bases.dat | 3 ++- www/bases-examples_Linux/opac_conf/es/bases.dat | 1 + www/bases-examples_Linux/opac_conf/pt/bases.dat | 3 ++- www/bases-examples_Windows/opac_conf/en/bases.dat | 3 ++- www/bases-examples_Windows/opac_conf/es/bases.dat | 1 + www/bases-examples_Windows/opac_conf/pt/bases.dat | 3 ++- 6 files changed, 10 insertions(+), 4 deletions(-) diff --git a/www/bases-examples_Linux/opac_conf/en/bases.dat b/www/bases-examples_Linux/opac_conf/en/bases.dat index d20c28e63..b5f36d394 100644 --- a/www/bases-examples_Linux/opac_conf/en/bases.dat +++ b/www/bases-examples_Linux/opac_conf/en/bases.dat @@ -1,2 +1,3 @@ marc|MARC -dubcore|Dublin Core \ No newline at end of file +dubcore|Dublin Core +biblo|Cepal \ No newline at end of file diff --git a/www/bases-examples_Linux/opac_conf/es/bases.dat b/www/bases-examples_Linux/opac_conf/es/bases.dat index 10a2f86bd..e5465578c 100755 --- a/www/bases-examples_Linux/opac_conf/es/bases.dat +++ b/www/bases-examples_Linux/opac_conf/es/bases.dat @@ -1,2 +1,3 @@ marc|MARC dubcore|Dublincore +biblo|Cepal \ No newline at end of file diff --git a/www/bases-examples_Linux/opac_conf/pt/bases.dat b/www/bases-examples_Linux/opac_conf/pt/bases.dat index 38847accc..a72c2371b 100755 --- a/www/bases-examples_Linux/opac_conf/pt/bases.dat +++ b/www/bases-examples_Linux/opac_conf/pt/bases.dat @@ -1,2 +1,3 @@ marc|Livros -dubcore|Dublin Core \ No newline at end of file +dubcore|Dublin Core +biblo|Cepal \ No newline at end of file diff --git a/www/bases-examples_Windows/opac_conf/en/bases.dat b/www/bases-examples_Windows/opac_conf/en/bases.dat index d20c28e63..b5f36d394 100644 --- a/www/bases-examples_Windows/opac_conf/en/bases.dat +++ b/www/bases-examples_Windows/opac_conf/en/bases.dat @@ -1,2 +1,3 @@ marc|MARC -dubcore|Dublin Core \ No newline at end of file +dubcore|Dublin Core +biblo|Cepal \ No newline at end of file diff --git a/www/bases-examples_Windows/opac_conf/es/bases.dat b/www/bases-examples_Windows/opac_conf/es/bases.dat index 10a2f86bd..e5465578c 100755 --- a/www/bases-examples_Windows/opac_conf/es/bases.dat +++ b/www/bases-examples_Windows/opac_conf/es/bases.dat @@ -1,2 +1,3 @@ marc|MARC dubcore|Dublincore +biblo|Cepal \ No newline at end of file diff --git a/www/bases-examples_Windows/opac_conf/pt/bases.dat b/www/bases-examples_Windows/opac_conf/pt/bases.dat index 38847accc..a72c2371b 100755 --- a/www/bases-examples_Windows/opac_conf/pt/bases.dat +++ b/www/bases-examples_Windows/opac_conf/pt/bases.dat @@ -1,2 +1,3 @@ marc|Livros -dubcore|Dublin Core \ No newline at end of file +dubcore|Dublin Core +biblo|Cepal \ No newline at end of file