]> git.evergreen-ils.org Git - Evergreen.git/blob - Open-ILS/xul/staff_client/server/cat/marcedit.js
LP#1282286 Tab is NULL error
[Evergreen.git] / Open-ILS / xul / staff_client / server / cat / marcedit.js
1 /* vim: et:sw=4:ts=4:
2  *
3  * Copyright (C) 2004-2008  Georgia Public Library Service
4  * Copyright (C) 2008-2010  Equinox Software, Inc.
5  * Mike Rylander <miker@esilibrary.com> 
6  *
7  * Copyright (C) 2010 Dan Scott <dan@coffeecode.net>
8  * Copyright (C) 2010 Internationaal Instituut voor Sociale Geschiedenis <info@iisg.nl>
9  *
10  * This program is free software; you can redistribute it and/or
11  * modify it under the terms of the GNU General Public License
12  * as published by the Free Software Foundation; either version 2
13  * of the License, or (at your option) any later version.
14  *
15  * This program is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  * GNU General Public License for more details.  
19  *
20  */
21 // Pretty printing kills whitespace too, so disable it.
22 XML.prettyPrinting = false;
23 var xmlDeclaration = /^<\?xml version[^>]+?>/;
24
25 var serializer = new XMLSerializer();
26 var marcns = new Namespace("http://www.loc.gov/MARC21/slim");
27 var gw = new Namespace("http://opensrf.org/-/namespaces/gateway/v1");
28 var xulns = new Namespace("http://www.mozilla.org/keymaster/gatekeeper/there.is.only.xul");
29 default xml namespace = marcns;
30
31 var tooltip_hash = {};
32 var current_focus;
33 var _record;
34 var _record_type;
35 var bib_data;
36
37 var xml_record;
38
39 var context_menus;
40 var tag_menu;
41 var p;
42 var auth_pages = {};
43 var show_auth_menu = false;
44
45 var _fixed_field_values = {}, _fixed_field_context_menus = {};
46 var _fixed_field_anonymous_func_counter = 0;
47
48 function $(id) { return document.getElementById(id); }
49
50 var acs; // AuthorityControlSet
51
52 function get_new_008() {
53     var orig008 = '                                        ';
54     var now = new Date();
55     var y = now.getUTCFullYear().toString().substr(2,2);
56     var m = now.getUTCMonth() + 1;
57     if (m < 10) m = '0' + m;
58     var d = now.getUTCDate();
59     if (d < 10) d = '0' + d;
60
61     if (xml_record.controlfield.(@tag == '008')) {
62         var field = xml_record.controlfield.(@tag == '008')[0];
63         orig008 = field.text();
64     }
65
66     /* lang code from 041a */
67     var lang = orig008.substr(35, 3);
68     if (xml_record.datafield.(@tag == '041')) {
69         var field = xml_record.datafield.(@tag == '041')[0];
70         if (field && field.subfield.(@code == 'a')) {
71             lang = field.subfield.(@code == 'a')[0];
72         }
73     }
74
75     /* country code from 044a */
76     var country = orig008.substr(15, 3);
77     if (xml_record.datafield.(@tag == '044')) {
78         var field = xml_record.datafield.(@tag == '044')[0];
79         if (field && field.subfield.(@code == 'a')) {
80             country = field.subfield.(@code == 'a')[0];
81         }
82     }
83     while (country.length < 3) country = country + ' ';
84     if (country.length > 3) country = country.substr(0,3);
85
86     /* date1 from 260c */
87     var date1 = now.getUTCFullYear().toString();
88     if (xml_record.datafield.(@tag == '260')) {
89         var field = xml_record.datafield.(@tag == '260')[0];
90         if (field && field.subfield.(@code == 'c')) {
91             var tmpd = field.subfield.(@code == 'c')[0].replace(/[^0-9]/g, '');
92             if (tmpd.match(/^\d\d\d\d/)) {
93                 date1 = tmpd.substr(0, 4);
94             }
95         }
96     }
97
98     var date2 = orig008.substr(11, 4);
99     var datetype = orig008.substr(6, 1);
100     var modded = orig008.substr(38, 1);
101     var catsrc = orig008.substr(39, 1);
102
103     return '' + y + m + d + datetype + date1 + date2 + country + '                 ' + lang + modded + catsrc;
104
105 }
106
107 function mangle_005() {
108     var now = new Date();
109     var y = now.getUTCFullYear();
110
111     var m = now.getUTCMonth() + 1;
112     if (m < 10) m = '0' + m;
113     
114     var d = now.getUTCDate();
115     if (d < 10) d = '0' + d;
116     
117     var H = now.getUTCHours();
118     if (H < 10) H = '0' + H;
119     
120     var M = now.getUTCMinutes();
121     if (M < 10) M = '0' + M;
122     
123     var S = now.getUTCSeconds();
124     if (S < 10) S = '0' + S;
125     
126
127     var stamp = '' + y + m + d + H + M + S + '.0';
128     createControlField('005',stamp);
129
130 }
131
132 function createControlField (tag,data) {
133     // first, remove the old field, if any;
134     for (var i in xml_record.controlfield.(@tag == tag)) delete xml_record.controlfield.(@tag == tag)[i];
135
136     var cf = <controlfield tag="" xmlns="http://www.loc.gov/MARC21/slim">{ data }</controlfield>;
137     cf.@tag = tag;
138
139     // then, find the right position and insert it
140     var done = 0;
141     var cfields = xml_record.controlfield;
142     var base = Number(tag.substring(2));
143     for (var i in cfields) {
144         var t = Number(cfields[i].@tag.toString().substring(2));
145         if (t > base) {
146             xml_record.insertChildBefore( cfields[i], cf );
147             done = 1
148             break;
149         }
150     }
151
152     if (!done) xml_record.insertChildBefore( xml_record.datafield[0], cf );
153
154     return cf;
155 }
156
157 function xml_escape_unicode ( str ) {
158     return str.replace(
159         /([\u0080-\ufffe])/g,
160         function (r,s) { return "&#x" + s.charCodeAt(0).toString(16) + ";"; }
161     );
162 }
163
164 function wrap_long_fields (node) {
165     var text_size = dojo.attr(node, 'size');
166     var hard_width = 100; 
167     if (text_size > hard_width) {
168         dojo.attr(node, 'multiline', 'true');
169         dojo.attr(node, 'cols', hard_width);
170         var text_rows = (text_size / hard_width) + 1;
171         dojo.attr(node, 'rows', text_rows);
172     }
173 }
174
175 function set_flat_editor (useFlatText) {
176
177     var xe = $('xul-editor');
178     var te = $('text-editor');
179
180     if (useFlatText) {
181         if (xe.hidden) { return; }
182         te.hidden = false;
183         xe.hidden = true;
184     } else {
185         if (te.hidden) { return; }
186         te.hidden = true;
187         xe.hidden = false;
188     }
189
190     if (te.hidden) {
191         // get the marcxml from the text box
192         var xml_string = new MARC.Record({
193             marcbreaker : $('text-editor-box').value,
194             delimiter : '$'
195         }).toXmlString();
196
197         // reset the xml record and rerender it
198         xml_record = new XML( xml_string );
199         if (xml_record..record[0]) xml_record = xml_record..record[0];
200         loadRecord();
201     } else {
202         var xml_string = xml_record.toXMLString();
203
204         // push the xml record into the textbox
205         var rec = new MARC.Record ({ delimiter : '$', marcxml : xml_string });
206         $('text-editor-box').value = rec.toBreaker();
207     }
208 }
209
210 function my_init() {
211     try {
212
213         if (typeof JSAN == 'undefined') { throw( $("commonStrings").getString('common.jsan.missing') ); }
214         JSAN.errorLevel = "die"; // none, warn, or die
215         JSAN.addRepository('/xul/server/');
216
217         dojo.require('openils.AuthorityControlSet');
218         acs = new openils.AuthorityControlSet ();
219
220         // Fake xulG for standalone...
221         try {
222             window.xulG.record;
223         } catch (e) {
224             window.xulG = {};
225             window.xulG.record = {};
226             window.xulG.save = {};
227             window.xulG.marc_control_number_identifier = 'CONS';
228
229             window.xulG.save.label = $('catStrings').getString('staff.cat.marcedit.save.label');
230             window.xulG.save.func = function (r) { alert(r); }
231
232             var cgi = new CGI();
233             var _rid = cgi.param('record');
234             if (_rid) {
235                 window.xulG.record.id = _rid;
236                 window.xulG.record.url = '/opac/extras/supercat/retrieve/marcxml/record/' + _rid;
237             }
238         }
239
240         // End faking part...
241
242         /* Check for an explicitly passed record type
243          * This is not the same as the fixed-field record type; we can't trust
244          * the fixed fields when making modifications to the attributes for a
245          * given record (in particular, config.bib_source only applies for bib
246          * records, but an auth or MFHD record with the same ID and bad fixed
247          * fields could trample the config.bib_source value for the
248          * corresponding bib record if we're not careful.
249          *
250          * are = authority record
251          * sre = serial record (MFHD)
252          * bre = bibliographic record
253          */
254         if (!window.xulG.record.rtype) {
255             var cgi = new CGI();
256             window.xulG.record.rtype = cgi.param('rtype') || false;
257         }
258
259         document.getElementById('save-button').setAttribute('label', window.xulG.save.label);
260         /* Ugh. Sorry about the spaghetti. */
261         document.getElementById('save-button').setAttribute('oncommand',
262             'var to_save = function() { ' + /* begin to_save() */
263             'if ($("xul-editor").hidden) set_flat_editor(false); ' +
264             'mangle_005(); ' + 
265             'var xml_string = xml_escape_unicode( xml_record.toXMLString() ); ' + 
266             'save_attempt( xml_string ); ' +
267             'loadRecord(); ' +
268             '}; ' + /* end to_save() */
269
270             'if (typeof _owPCW == "object") { ' +
271             ' for (var k in _owPCW) { ' +
272             '  if (_owPCW[k].active) { ' +
273             '    try { _owPCW[k].apply(to_save); to_save.ran = true; } ' +
274             '    catch (E) { alert("_ow_PCW[" + k + "]: " + E); } ' +
275             '    break; ' +
276             '  }' +
277             ' }' +
278             '} ' +
279             'if (!to_save.ran) to_save();'
280         );
281
282         if (window.xulG.record.url) {
283             var req =  new XMLHttpRequest();
284             req.open('POST',window.xulG.record.url,false);
285             req.send(null);
286             window.xulG.record.marc = req.responseText.replace(xmlDeclaration, '');
287         }
288
289         xml_record = new XML( window.xulG.record.marc );
290         if (xml_record..record[0]) xml_record = xml_record..record[0];
291
292         // Get the tooltip xml all async like
293         req =  new XMLHttpRequest();
294
295         // Set a default locale in case preferences fail us
296         var locale = "en-US";
297
298         // Try to get the locale from our preferences
299         try {
300             const Cc = Components.classes;
301             const Ci = Components.interfaces;
302             locale = Cc["@mozilla.org/preferences-service;1"].
303                 getService(Ci.nsIPrefBranch).
304                 getCharPref("general.useragent.locale");
305         }
306         catch (e) { }
307
308         // TODO: We should send a HEAD request to check for the existence of the desired file
309         // then fall back to the default locale if preferred locale is not necessary;
310         // however, for now we have a simplistic check:
311         //
312         // we currently have translations for only three locales; in the absence of a
313         // valid locale, default to the almighty en-US
314         if (locale != 'en-US' && locale != 'fr-CA' && locale != 'fi-FI') {
315             locale = 'en-US';
316         }
317
318         // grab the right tooltip based on MARC type
319         var tooltip_doc = 'marcedit-tooltips.xml';
320         switch (window.xulG.record.rtype) {
321             case 'bre':
322                 tooltip_doc = 'marcedit-tooltips.xml';
323                 break; 
324             case 'are':
325                 tooltip_doc = 'marcedit-tooltips-authority.xml';
326                 locale = 'en-US'; // FIXME - note TODO above; at moment only en-US has this
327                 break; 
328             case 'sre':
329                 tooltip_doc = 'marcedit-tooltips-mfhd.xml';
330                 locale = 'en-US'; // FIXME - note TODO above; at moment only en-US has this
331                 break; 
332             default: 
333                 tooltip_doc = 'marcedit-tooltips.xml';
334         }
335
336         // Get the locale-specific tooltips
337         req.open('GET','/xul/server/locale/' + locale + '/' + tooltip_doc,true);
338
339         context_menus = createComplexXULElement('popupset');
340         document.documentElement.appendChild( context_menus );
341
342         tag_menu = createMenuPopup({position : 'after_start', id : 'tags_popup'});
343         context_menus.appendChild( tag_menu );
344
345         tag_menu.appendChild(
346             createMenuitem(
347                 { label : $('catStrings').getString('staff.cat.marcedit.add_row.label'),
348                   oncommand : 
349                     'var e = document.createEvent("KeyEvents");' +
350                     'e.initKeyEvent("keypress",1,1,null,1,0,0,0,13,0);' +
351                     'current_focus.inputField.dispatchEvent(e);'
352                  }
353             )
354         );
355
356         tag_menu.appendChild(
357             createMenuitem(
358                 { label : $('catStrings').getString('staff.cat.marcedit.insert_row.label'),
359                   oncommand : 
360                     'var e = document.createEvent("KeyEvents");' +
361                     'e.initKeyEvent("keypress",1,1,null,1,0,1,0,13,0);' +
362                     'current_focus.inputField.dispatchEvent(e);'
363                  }
364             )
365         );
366
367         tag_menu.appendChild(
368             createMenuitem(
369                 { label : $('catStrings').getString('staff.cat.marcedit.remove_row.label'),
370                   oncommand : 
371                     'var e = document.createEvent("KeyEvents");' +
372                     'e.initKeyEvent("keypress",1,1,null,1,0,0,0,46,0);' +
373                     'current_focus.inputField.dispatchEvent(e);'
374                 }
375             )
376         );
377
378         tag_menu.appendChild( createComplexXULElement( 'separator' ) );
379
380         tag_menu.appendChild(
381             createMenuitem(
382                 { label : $('catStrings').getString('staff.cat.marcedit.replace_006.label'),
383                   oncommand : 
384                     'var e = document.createEvent("KeyEvents");' +
385                     'e.initKeyEvent("keypress",1,1,null,1,0,0,0,117,0);' +
386                     'current_focus.inputField.dispatchEvent(e);'
387                  }
388             )
389         );
390
391         tag_menu.appendChild(
392             createMenuitem(
393                 { label : $('catStrings').getString('staff.cat.marcedit.replace_007.label'),
394                   oncommand : 
395                     'var e = document.createEvent("KeyEvents");' +
396                     'e.initKeyEvent("keypress",1,1,null,1,0,0,0,118,0);' +
397                     'current_focus.inputField.dispatchEvent(e);'
398                 }
399             )
400         );
401
402         tag_menu.appendChild(
403             createMenuitem(
404                 { label : $('catStrings').getString('staff.cat.marcedit.replace_008.label'),
405                   oncommand : 
406                     'var e = document.createEvent("KeyEvents");' +
407                     'e.initKeyEvent("keypress",1,1,null,1,0,0,0,119,0);' +
408                     'current_focus.inputField.dispatchEvent(e);'
409                 }
410             )
411         );
412
413         tag_menu.appendChild( createComplexXULElement( 'separator' ) );
414
415         p = createComplexXULElement('popupset');
416         document.documentElement.appendChild( p );
417
418         req.onreadystatechange = function () {
419             if (req.readyState == 4) {
420                 bib_data = new XML( req.responseText.replace(xmlDeclaration, '') );
421                 genToolTips();
422             }
423         }
424         req.send(null);
425
426         loadRecord();
427
428
429         if (! xulG.fast_add_item) {
430             document.getElementById('fastItemAdd_checkbox').hidden = true;
431         }
432         document.getElementById('fastItemAdd_textboxes').hidden = document.getElementById('fastItemAdd_checkbox').hidden || !document.getElementById('fastItemAdd_checkbox').checked;
433
434         // Only show bib sources for bib records that already exist in the database
435         if (xulG.record.rtype == 'bre' && xulG.record.id) {
436             dojo.require('openils.PermaCrud');
437             var authtoken = ses();
438             // Retrieve the current record attributes
439             var bib = new openils.PermaCrud({"authtoken": authtoken}).retrieve('bre', xulG.record.id);
440
441             // Remember the current bib source of the record
442             xulG.record.bre = bib;
443
444             buildBibSourceList(authtoken, xulG.record.id);
445         }
446
447         preparePhysCharWizardContext();
448         dojo.require('MARC.FixedFields');
449         dojo.require("openils.widget.PhysCharWizard");
450
451     } catch(E) {
452         alert('FIXME, MARC Editor, my_init: ' + E);
453     }
454 }
455
456
457 function createComplexHTMLElement (e, attrs, objects, text) {
458     var l = document.createElementNS('http://www.w3.org/1999/xhtml',e);
459
460     if (attrs) {
461         for (var i in attrs) l.setAttribute(i,attrs[i]);
462     }
463
464     if (objects) {
465         for ( var i in objects ) l.appendChild( objects[i] );
466     }
467
468     if (text) {
469         l.appendChild( document.createTextNode(text) )
470     }
471
472     return l;
473 }
474
475 function createComplexXULElement (e, attrs, objects) {
476     var l = document.createElementNS('http://www.mozilla.org/keymaster/gatekeeper/there.is.only.xul',e);
477
478     if (attrs) {
479         for (var i in attrs) {
480             if (typeof attrs[i] == 'function') {
481                 l.addEventListener( i, attrs[i], true );
482             } else {
483                 l.setAttribute(i,attrs[i]);
484             }
485         }
486     } 
487
488     if (objects) {
489         for ( var i in objects ) l.appendChild( objects[i] );
490     }
491
492     return l;
493 }
494
495 function createDescription (attrs) {
496     return createComplexXULElement('description', attrs, Array.prototype.slice.apply(arguments, [1]) );
497 }
498
499 function createTooltip (attrs) {
500     return createComplexXULElement('tooltip', attrs, Array.prototype.slice.apply(arguments, [1]) );
501 }
502
503 function createLabel (attrs) {
504     return createComplexXULElement('label', attrs, Array.prototype.slice.apply(arguments, [1]) );
505 }
506
507 function createVbox (attrs) {
508     return createComplexXULElement('vbox', attrs, Array.prototype.slice.apply(arguments, [1]) );
509 }
510
511 function createHbox (attrs) {
512     return createComplexXULElement('hbox', attrs, Array.prototype.slice.apply(arguments, [1]) );
513 }
514
515 function createRow (attrs) {
516     return createComplexXULElement('row', attrs, Array.prototype.slice.apply(arguments, [1]) );
517 }
518
519 function createTextbox (attrs) {
520     return createComplexXULElement('textbox', attrs, Array.prototype.slice.apply(arguments, [1]) );
521 }
522
523 function createMenu (attrs) {
524     return createComplexXULElement('menu', attrs, Array.prototype.slice.apply(arguments, [1]) );
525 }
526
527 function createMenuPopup (attrs) {
528     return createComplexXULElement('menupopup', attrs, Array.prototype.slice.apply(arguments, [1]) );
529 }
530
531 function createPopup (attrs) {
532     return createComplexXULElement('popup', attrs, Array.prototype.slice.apply(arguments, [1]) );
533 }
534
535 function createMenuitem (attrs) {
536     return createComplexXULElement('menuitem', attrs, Array.prototype.slice.apply(arguments, [1]) );
537 }
538
539 function createCheckbox (attrs) {
540     return createComplexXULElement('checkbox', attrs, Array.prototype.slice.apply(arguments, [1]) );
541 }
542
543 // Find the next textbox that we can use for a focus point
544 // For control fields, use the first editable text box
545 // For data fields, focus on the first subfield text box
546 function setFocusToNextTag (row, direction) {
547     var keep_looking = true;
548     while (keep_looking && (direction == 'up' ? row = row.previousSibling : row = row.nextSibling)) {
549         // Is it a datafield?
550         dojo.query('hbox', row).query('hbox').query('textbox').forEach(function(node, index, arr) {
551             node.focus();
552             keep_looking = false;
553         });
554
555         // No, it's a control field; use the first textbox
556         if (keep_looking) {
557             dojo.query('textbox', row).forEach(function(node, index, arr) {
558                 node.focus();
559                 keep_looking = false;
560             });
561         }
562     }
563
564     return true;
565 }
566
567 function set_lock_on_keypress(ev) {
568     try {
569         var tabs = window.parent.parent.document.getElementById('main_tabs');
570
571         if (tabs) {
572             var idx = tabs.selectedIndex;
573             var tab = tabs.childNodes[idx];
574         }
575         //dump('keypress: isChar = ' + ev.isChar + ' char = ' + ev.char + ' charCode = ' + ev.charCode + ' key = ' + ev.key + ' keyCode = ' + ev.keyCode + '\n');
576         if (! /* NOT */(
577                 ev.altKey
578                 || ev.ctrlKey
579                 || ev.metaKey
580                 || ev.shiftKey
581                 || ev.keyCode == ev.DOM_VK_F1
582                 || ev.keyCode == ev.DOM_VK_F2
583                 || ev.keyCode == ev.DOM_VK_F3
584                 || ev.keyCode == ev.DOM_VK_F4
585                 || ev.keyCode == ev.DOM_VK_F5
586                 || ev.keyCode == ev.DOM_VK_F6
587                 || ev.keyCode == ev.DOM_VK_F7
588                 || ev.keyCode == ev.DOM_VK_F8
589                 || ev.keyCode == ev.DOM_VK_F9
590                 || ev.keyCode == ev.DOM_VK_F10
591                 || ev.keyCode == ev.DOM_VK_F11
592                 || ev.keyCode == ev.DOM_VK_F12
593                 || ev.keyCode == ev.DOM_VK_F13
594                 || ev.keyCode == ev.DOM_VK_F14
595                 || ev.keyCode == ev.DOM_VK_F15
596                 || ev.keyCode == ev.DOM_VK_F16
597                 || ev.keyCode == ev.DOM_VK_F17
598                 || ev.keyCode == ev.DOM_VK_F18
599                 || ev.keyCode == ev.DOM_VK_F19
600                 || ev.keyCode == ev.DOM_VK_F20
601                 || ev.keyCode == ev.DOM_VK_F21
602                 || ev.keyCode == ev.DOM_VK_F22
603                 || ev.keyCode == ev.DOM_VK_F23
604                 || ev.keyCode == ev.DOM_VK_F24
605         )) {
606             var params = {};
607             if (tab) {
608                 params.allow_multiple_locks = tab.marc_edit_allow_multiple_locks;
609             }
610             oils_lock_page(params);
611         }
612     } catch(E) {
613         alert(E);
614     }
615 }
616
617 function createMARCTextbox (element,attrs) {
618     var box = createComplexXULElement('textbox', attrs, Array.prototype.slice.apply(arguments, [2]) );
619     box.addEventListener(
620         'keypress',
621         set_lock_on_keypress,
622         false
623     );
624     if ($('symbol-panel')) {
625         addSymbolTrigger(box);
626     }
627     box.onkeypress = function (event) {
628         var root_node;
629         var node = element;
630         while(node = node.parent()) {
631             root_node = node;
632         }
633
634         var row = event.target;
635         while (row.tagName != 'row') row = row.parentNode;
636
637         if (element.nodeKind() == 'attribute') element[0]=box.value;
638         else element.setChildren( box.value );
639
640         if (element.localName() != 'controlfield') {
641             if ((event.charCode == 100 || event.charCode == 105) && event.ctrlKey) { // ctrl+d or ctrl+i
642
643                 var index_sf, target, move_data;
644                 if (element.localName() == 'subfield') {
645                     index_sf = element;
646                     target = event.target.parentNode;
647
648                     var start = event.target.selectionStart;
649                     var end = event.target.selectionEnd - event.target.selectionStart ?
650                             event.target.selectionEnd :
651                             event.target.value.length;
652
653                     move_data = event.target.value.substring(start,end);
654                     event.target.value = event.target.value.substring(0,start) + event.target.value.substring(end);
655                     event.target.setAttribute('size', event.target.value.length + 2);
656     
657                     element.setChildren( event.target.value );
658
659                 } else if (element.localName() == 'code') {
660                     index_sf = element.parent();
661                     target = event.target.parentNode;
662                 } else if (element.localName() == 'tag' || element.localName() == 'ind1' || element.localName() == 'ind2') {
663                     index_sf = element.parent().children()[element.parent().children().length() - 1];
664                     target = event.target.parentNode.lastChild.lastChild;
665                 }
666
667                 var sf = <subfield code="" xmlns="http://www.loc.gov/MARC21/slim">{ move_data }</subfield>;
668
669                 index_sf.parent().insertChildAfter( index_sf, sf );
670
671                 var new_sf = marcSubfield(sf);
672
673                 if (target === target.parentNode.lastChild) {
674                     target.parentNode.appendChild( new_sf );
675                 } else {
676                     target.parentNode.insertBefore( new_sf, target.nextSibling );
677                 }
678
679                 new_sf.firstChild.nextSibling.focus();
680
681                 event.preventDefault();
682                 return false;
683
684             } else if (event.keyCode == 13 || event.keyCode == 77) {
685                 if (event.ctrlKey) { // ctrl+enter
686
687                     var index;
688                     if (element.localName() == 'subfield') index = element.parent();
689                     if (element.localName() == 'code') index = element.parent().parent();
690                     if (element.localName() == 'tag') index = element.parent();
691                     if (element.localName() == 'ind1') index = element.parent();
692                     if (element.localName() == 'ind2') index = element.parent();
693
694                     var df = <datafield tag="" ind1="" ind2="" xmlns="http://www.loc.gov/MARC21/slim"><subfield code="" /></datafield>;
695
696                     if (event.shiftKey) { // ctrl+shift+enter
697                         index.parent().insertChildBefore( index, df );
698                     } else {
699                         index.parent().insertChildAfter( index, df );
700                     }
701
702                     var new_df = marcDatafield(df);
703
704                     if (row.parentNode.lastChild === row) {
705                         row.parentNode.appendChild( new_df );
706                     } else {
707                         if (event.shiftKey) { // ctrl+shift+enter
708                             row.parentNode.insertBefore( new_df, row );
709                         } else {
710                             row.parentNode.insertBefore( new_df, row.nextSibling );
711                         }
712                     }
713
714                     new_df.firstChild.focus();
715
716                     event.preventDefault();
717                     return false;
718
719                 } else if (event.shiftKey) {
720                     if (row.previousSibling.className.match('marcDatafieldRow'))
721                         row.previousSibling.firstChild.focus();
722                 } else {
723                     row.nextSibling.firstChild.focus();
724                 }
725
726             } else if (event.keyCode == 38 || event.keyCode == 40) { // up-arrow or down-arrow
727                 if (event.ctrlKey) { // CTRL key: copy the field
728                     var index;
729                     if (element.localName() == 'subfield') index = element.parent();
730                     if (element.localName() == 'code') index = element.parent().parent();
731                     if (element.localName() == 'tag') index = element.parent();
732                     if (element.localName() == 'ind1') index = element.parent();
733                     if (element.localName() == 'ind2') index = element.parent();
734
735                     var copyField = index.copy();
736
737                     if (event.keyCode == 38) { // ctrl+up-arrow
738                         index.parent().insertChildBefore( index, copyField );
739                     } else {
740                         index.parent().insertChildAfter( index, copyField );
741                     }
742
743                     var new_df = marcDatafield(copyField);
744
745                     if (row.parentNode.lastChild === row) {
746                         row.parentNode.appendChild( new_df );
747                     } else {
748                         if (event.keyCode == 38) { // ctrl+up-arrow
749                             row.parentNode.insertBefore( new_df, row );
750                         } else { // ctrl+down-arrow
751                             row.parentNode.insertBefore( new_df, row.nextSibling );
752                         }
753                     }
754
755                     new_df.firstChild.focus();
756
757                     event.preventDefault();
758
759                     return false;
760                 } else {
761                     if (event.keyCode == 38) {
762                         return setFocusToNextTag(row, 'up');
763                     }
764                     if (event.keyCode == 40) {
765                         return setFocusToNextTag(row, 'down');
766                     }
767                     return false;
768                 }
769
770             } else if (event.keyCode == 46 && event.ctrlKey) { // ctrl+del
771
772                 var index;
773                 if (element.localName() == 'subfield') index = element.parent();
774                 if (element.localName() == 'code') index = element.parent().parent();
775                 if (element.localName() == 'tag') index = element.parent();
776                 if (element.localName() == 'ind1') index = element.parent();
777                 if (element.localName() == 'ind2') index = element.parent();
778
779                 for (var i in index.parent().children()) {
780                     if (index === index.parent().children()[i]) {
781                         delete index.parent().children()[i];
782                         break;
783                     }
784                 }
785
786                 row.previousSibling.firstChild.focus();
787                 row.parentNode.removeChild(row);
788
789                 event.preventDefault();
790                 return false;
791
792             } else if (event.keyCode == 46 && event.shiftKey) { // shift+del
793
794                 var index;
795                 if (element.localName() == 'subfield') index = element;
796                 if (element.localName() == 'code') index = element.parent();
797
798                 if (index) {
799                     for (var i in index.parent().children()) {
800                         if (index === index.parent().children()[i]) {
801                             delete index.parent().children()[i];
802                             break;
803                         }
804                     }
805
806                     if (event.target.parentNode === event.target.parentNode.parentNode.lastChild) {
807                         event.target.parentNode.previousSibling.lastChild.focus();
808                     } else {
809                         event.target.parentNode.nextSibling.firstChild.nextSibling.focus();
810                     }
811
812                     event.target.parentNode.parentNode.removeChild(event.target.parentNode);
813
814                     event.preventDefault();
815                     return false;
816                 }
817             } else if (event.keyCode == 117 && event.ctrlKey) { // ctrl + F6
818                 box = null;
819                 createControlField('006','                                        ');
820                 loadRecord();
821             } else if (event.keyCode == 118 && event.ctrlKey) { // ctrl + F7
822                 box = null;
823                 createControlField('007','                                        ');
824                 loadRecord();
825             } else if (event.keyCode == 119 && event.ctrlKey) { // ctrl + F8
826                 box = null;
827                 createControlField('008', get_new_008());
828                 loadRecord();
829             }
830
831             return true;
832
833         } else { // event on a control field
834             if (event.keyCode == 38) { 
835                 return setFocusToNextTag(row, 'up'); 
836             } else if (event.keyCode == 40) { 
837                 return setFocusToNextTag(row, 'down');
838             }
839         }
840     };
841
842     box.addEventListener(
843         'keypress', 
844         function () {
845             if (element.nodeKind() == 'attribute') element[0]=box.value;
846             else element.setChildren( box.value );
847             return true;
848         },
849         false
850     );
851
852     box.addEventListener(
853         'change', 
854         function () {
855             if (element.nodeKind() == 'attribute') element[0]=box.value;
856             else element.setChildren( box.value );
857             return true;
858         },
859         false
860     );
861
862     box.addEventListener(
863         'keypress', 
864         function () {
865             if (element.nodeKind() == 'attribute') element[0]=box.value;
866             else element.setChildren( box.value );
867             return true;
868         },
869         true
870     );
871
872     // 'input' event catches the box value after the keypress
873     box.addEventListener(
874         'input', 
875         function () {
876             if (element.nodeKind() == 'attribute') element[0]=box.value;
877             else element.setChildren( box.value );
878             return true;
879         },
880         true
881     );
882
883     box.addEventListener(
884         'keyup', 
885         function () {
886             if (element.localName() == 'controlfield')
887                 eval('fillFixedFields();');
888         },
889         true
890     );
891
892     return box;
893 }
894
895 function toggleFFE () {
896     var grid = document.getElementById('leaderGrid');
897     if (grid.hidden) {
898         grid.hidden = false;
899     } else {
900         grid.hidden = true;
901     }
902     return true;
903 }
904
905 function changeFFEditor (type) {
906     var grid = document.getElementById('leaderGrid');
907     grid.setAttribute('type',type);
908     document.getElementById('recordTypeLabel').setAttribute('value',type);
909
910     // Hide FFEditor rows that we don't need for our current type
911     // If all of the labels for a given row do not include our
912     // desired type in their set attribute, we can hide that row
913     dojo.query('rows', grid).query('row').forEach(function(node, index, arr) {
914         if (dojo.query('label[set~=' + type + ']', node).length == 0) {
915             node.hidden = true;
916         }
917     });
918
919     getFFValuesForType(
920         type,
921         function() {
922             updateFFEditorContexts(grid, type);
923         },
924         function() {
925             alert(  /* XXX i18n - the marc editor either isn't tied in to
926                        an overall i18n infrastructure, or it's different
927                        enough from other Evergreen parts that I don't
928                        understand the right way to do i18n here */
929                 "failed to load fixed field values for rec_type '" +
930                 type + "'\n"
931             );
932         }
933     );
934 }
935
936 function getFFValuesForType(type, callback, errback) {
937     if (_fixed_field_values[type]) {
938         callback();
939     } else {
940         dojo.require("openils.Util");
941
942         fieldmapper.standardRequest(
943             ["open-ils.cat",
944                 "open-ils.cat.biblio.fixed_field_values.by_rec_type"], {
945                 "async": true,
946                 "params": [type],
947                 "oncomplete": function(r) {
948                     if (r = openils.Util.readResponse(r)) {
949                         _fixed_field_values[type] = r;
950                         callback();
951                     } else {
952                         errback();
953                     }
954                 },
955                 "onerror": errback
956             }
957         );
958     }
959 }
960
961 function updateFFEditorContexts(grid, type) {
962
963     /* XXX Dojo to navigate a XUL DOM.  Bad form?  We do it elsewhere in this
964      * file, but I think I've heard it scoffed at. */
965
966     var rows_node = dojo.query("rows", grid)[0];
967     dojo.query("row", rows_node).forEach(
968         function(row) {
969             dojo.query("textbox", row).forEach(
970                 function(tb) {
971                     var name = tb.getAttribute("name");
972                     if (_fixed_field_values[type][name]) {
973                         tb.setAttribute(
974                             "context", getFFContextMenu(type, name)
975                         );
976                     } else {
977                         tb.setAttribute("context", "clipboard");
978                     }
979                 }
980             );
981         }
982     );
983 }
984
985 function getFFContextMenu(type, name) {
986     if (!_fixed_field_context_menus[type]) {
987         _fixed_field_context_menus[type] = {};
988     }
989
990     var context_menu_id = "_fixed_field_context_menus_" + type + "_" + name;
991
992     if (!_fixed_field_context_menus[type][name]) {
993         var p = document.getElementsByTagName("popupset")[0];
994         var m = document.createElement("menupopup");
995         m.setAttribute("id", context_menu_id);
996         _fixed_field_values[type][name].forEach(
997             function(v) {
998                 var mi = document.createElement("menuitem");
999                 var funcname = "_ff_anon_" +
1000                     String(_fixed_field_anonymous_func_counter++);
1001
1002                 /* These anon functions linger and take up memory, but due
1003                  * to caching there's a limit on how much, and that limit is
1004                  * a function of the size of the dataset defined in the
1005                  * ccvm/cmfpm tables. */
1006                 var code = v[0];
1007                 var len = v[2];
1008                 var def = v[3];
1009                 var el = document.getElementById(name + "_tb");
1010                 window[funcname] = function() {
1011                     el.value = code;
1012                     while (el.value.length < len) {
1013                         el.value += def;
1014                     }
1015                     updateFixedFields(el);
1016                     oils_lock_page();
1017                 };
1018
1019                 /* In XUL land we can't set an element's
1020                  * attribute like oncommand to a code reference. It has to be
1021                  * an actual string to be eval'd. */
1022                 mi.setAttribute("oncommand", funcname + "()");
1023                 mi.setAttribute("label", v[0] + ": " + v[1]); /* XXX i18n ? */
1024                 m.appendChild(mi);
1025             }
1026         );
1027         _fixed_field_context_menus[type][name] = m;
1028         p.appendChild(m);
1029     }
1030
1031     return context_menu_id;
1032 }
1033
1034 /* This just sets up a special context menu for a 007 data field to use, so
1035  * that users can right-click for a menu and get a choice to launch the
1036  * Physical Characteristics Wizard.
1037  */
1038 function preparePhysCharWizardContext() {
1039     var menu = document.getElementById("physCharWizardContext");
1040     menu.appendChild(document.createElement("menuseparator"));
1041
1042     var clipb_children = document.getElementById("clipboard").childNodes;
1043     for (var i = 0; i < clipb_children.length; i++) /* collection not array */ {
1044         var child = clipb_children[i];
1045         if (child.nodeName == 'menuitem')
1046             menu.appendChild(child.cloneNode(true));
1047     }
1048 }
1049
1050 function launchPhysCharWizard(popup_node) {
1051     try {
1052         new openils.widget.PhysCharWizard({
1053             "node": popup_node,
1054             "onapply": function(v) {
1055                 createControlField("007", v);
1056                 oils_lock_page();
1057                 loadRecord();
1058             }
1059         });
1060     } catch (E) {
1061         alert("Exception raised by openils.widget.PhysCharWizard:\n" + E);
1062     }
1063 }
1064
1065 function fillFixedFields () {
1066     try {
1067             var grid = document.getElementById('leaderGrid');
1068             var marc_rec = new MARC.Record ({ delimiter : '$', marcxml : xml_record.toXMLString() });
1069
1070             var list = [];
1071             var pre_list = grid.getElementsByTagName('label');
1072             for (var i in pre_list) {
1073                 if ( pre_list[i].getAttribute && pre_list[i].getAttribute('set').indexOf(grid.getAttribute('type')) > -1 ) {
1074                     list.push( pre_list[i] );
1075                 }
1076             }
1077
1078             for (var i in list) {
1079                 var name = list[i].getAttribute('name');
1080                 var value = marc_rec.extractFixedField(name, true);
1081
1082                 if (value === null) continue;
1083
1084                 list[i].nextSibling.value = value;
1085             }
1086
1087             return true;
1088     } catch(E) {
1089         alert('FIXME, MARC Editor, fillFixedFields: ' + E);
1090     }
1091 }
1092
1093 function updateFixedFields (element) {
1094     var new_value = element.value;
1095
1096     var marc_rec = new MARC.Record ({ delimiter : '$', marcxml : xml_record.toXMLString() });
1097     marc_rec.setFixedField(element.getAttribute('name'), new_value);
1098
1099     var xml_string = marc_rec.toXmlString();
1100     xml_record = new XML( xml_string );
1101     if (xml_record..record[0]) xml_record = xml_record..record[0];
1102     loadRecord();
1103     // Put the cursor back to the current fixed field
1104     element.select();
1105
1106     return true;
1107 }
1108
1109 function marcLeader (leader) {
1110     var row = createRow(
1111         { class : 'marcLeaderRow',
1112           tag : 'ldr' },
1113         createLabel(
1114             { value : 'LDR',
1115               class : 'marcTag',
1116               tooltiptext : $('catStrings').getString('staff.cat.marcedit.marcTag.LDR.label') } ),
1117         createLabel(
1118             { value : '',
1119               class : 'marcInd1' } ),
1120         createLabel(
1121             { value : '',
1122               class : 'marcInd2' } ),
1123         createLabel(
1124             { value : leader.text(),
1125               class : 'marcLeader' } )
1126     );
1127
1128     return row;
1129 }
1130
1131 function marcControlfield (field) {
1132     tagname = field.@tag.toString().substr(2);
1133     var row;
1134     if (tagname == '1' || tagname == '3' || tagname == '6' || tagname == '7' || tagname == '8') {
1135         row = createRow(
1136             { class : 'marcControlfieldRow',
1137               tag : '_' + tagname },
1138             createLabel(
1139                 { value : field.@tag,
1140                   class : 'marcTag',
1141                   context : 'tags_popup',
1142                   onmouseover : 'getTooltip(this, "tag");',
1143                   tooltipid : 'tag' + field.@tag } ),
1144             createLabel(
1145                 { value : field.@ind1,
1146                   class : 'marcInd1',
1147                   onmouseover : 'getTooltip(this, "ind1");',
1148                   tooltipid : 'tag' + field.@tag + 'ind1val' + field.@ind1 } ),
1149             createLabel(
1150                 { value : field.@ind2,
1151                   class : 'marcInd2',
1152                   onmouseover : 'getTooltip(this, "ind2");',
1153                   tooltipid : 'tag' + field.@tag + 'ind2val' + field.@ind2 } ),
1154             createMARCTextbox(
1155                 field,
1156                 { value : field.text(),
1157                   class : 'plain marcEditableControlfield',
1158                   name : 'CONTROL' + tagname,
1159                   context : tagname == 7 ? 'physCharWizardContext': 'clipboard',
1160                   size : 50,
1161                   maxlength : 50 } )
1162             );
1163     } else {
1164         row = createRow(
1165             { class : 'marcControlfieldRow',
1166               tag : '_' + tagname },
1167             createLabel(
1168                 { value : field.@tag,
1169                   class : 'marcTag',
1170                   onmouseover : 'getTooltip(this, "tag");',
1171                   tooltipid : 'tag' + field.@tag } ),
1172             createLabel(
1173                 { value : field.@ind1,
1174                   class : 'marcInd1',
1175                   onmouseover : 'getTooltip(this, "ind1");',
1176                   tooltipid : 'tag' + field.@tag + 'ind1val' + field.@ind1 } ),
1177             createLabel(
1178                 { value : field.@ind2,
1179                   class : 'marcInd2',
1180                   onmouseover : 'getTooltip(this, "ind2");',
1181                   tooltipid : 'tag' + field.@tag + 'ind2val' + field.@ind2 } ),
1182             createLabel(
1183                 { value : field.text(),
1184                   class : 'marcControlfield' } )
1185         );
1186     }
1187
1188     return row;
1189 }
1190
1191 function stackSubfields(checkbox) {
1192     var list = document.getElementsByAttribute('name','sf_box');
1193
1194     var o = 'vertical';
1195     if (!checkbox.checked) o = 'horizontal';
1196     
1197     for (var i = 0; i < list.length; i++) {
1198         if (list[i]) list[i].setAttribute('orient',o);
1199     }
1200 }
1201
1202 function fastItemAdd_toggle(checkbox) {
1203     var x = document.getElementById('fastItemAdd_textboxes');
1204     if (checkbox.checked) {
1205         x.hidden = false;
1206         document.getElementById('fastItemAdd_callnumber').focus();
1207         document.getElementById('fastItemAdd_callnumber').select();
1208     } else {
1209         x.hidden = true;
1210     }
1211 }
1212
1213 function fastItemAdd_attempt(doc_id) {
1214     try {
1215         if (typeof window.xulG.fast_add_item != 'function') { return; }
1216         if (!document.getElementById('fastItemAdd_checkbox').checked) { return; }
1217         if (!document.getElementById('fastItemAdd_callnumber').value) { return; }
1218         if (!document.getElementById('fastItemAdd_barcode').value) { return; }
1219         window.xulG.fast_add_item( doc_id, document.getElementById('fastItemAdd_callnumber').value, document.getElementById('fastItemAdd_barcode').value );
1220         document.getElementById('fastItemAdd_barcode').value = '';
1221         return true;
1222     } catch(E) {
1223         alert('fastItemAdd_attempt: ' + E);
1224     }
1225 }
1226
1227 function save_attempt(xml_string) {
1228     try {
1229         var tabs = window.parent.parent.document.getElementById('main_tabs');
1230
1231         if (tabs) {
1232             var idx = tabs.selectedIndex;
1233             var tab = tabs.childNodes[idx];
1234         }
1235         var result = window.xulG.save.func( xml_string );
1236         // I'd prefer to pass on_complete on through to fast_item_add,
1237         // but with the way these window scopes get destroyed with
1238         // tab replacement, maybe not a good idea
1239         var replace_on_complete = false;
1240         if (result) {
1241             if (tab) {
1242                 tab.marc_edit_changed = false;
1243             }
1244             oils_unlock_page();
1245             if (result.id) {
1246                 replace_on_complete = fastItemAdd_attempt(result.id);
1247             }
1248         // When fastItemAdd is not used, replace_on_complete is undefined
1249         // When it is used, and successful, replace_on_complete will be set to true 
1250         // then we need it to execute on_complete()
1251             if ((replace_on_complete==undefined || replace_on_complete ) && typeof result.on_complete == 'function') {
1252                 result.on_complete();
1253             }
1254         }
1255     } catch(E) {
1256         alert('save_attempt: ' + E);
1257     }
1258 }
1259
1260 function marcDatafield (field) {
1261     var row = createRow(
1262         { class : 'marcDatafieldRow' },
1263         createMARCTextbox(
1264             field.@tag,
1265             { value : field.@tag,
1266               class : 'plain marcTag',
1267               name : 'marcTag',
1268               context : 'tags_popup',
1269               oninput : 'if (this.value.length == 3) { this.nextSibling.focus(); }',
1270               size : 3,
1271               maxlength : 3,
1272               onmouseover : 'current_focus = this; getTooltip(this, "tag");' } ),
1273         createMARCTextbox(
1274             field.@ind1,
1275             { value : field.@ind1,
1276               class : 'plain marcInd1',
1277               name : 'marcInd1',
1278               oninput : 'if (this.value.length == 1) { this.nextSibling.focus(); }',
1279               size : 1,
1280               maxlength : 1,
1281               onmouseover : 'current_focus = this; getContextMenu(this, "ind1"); getTooltip(this, "ind1");',
1282               oncontextmenu : 'getContextMenu(this, "ind1");' } ),
1283         createMARCTextbox(
1284             field.@ind2,
1285             { value : field.@ind2,
1286               class : 'plain marcInd2',
1287               name : 'marcInd2',
1288               oninput : 'if (this.value.length == 1) { this.nextSibling.firstChild.firstChild.focus(); }',
1289               size : 1,
1290               maxlength : 1,
1291               onmouseover : 'current_focus = this; getContextMenu(this, "ind2"); getTooltip(this, "ind2");',
1292               oncontextmenu : 'getContextMenu(this, "ind2");' } ),
1293         createHbox({ name : 'sf_box' })
1294     );
1295
1296     if (!current_focus && field.@tag == '') current_focus = row.childNodes[0];
1297     if (!current_focus && field.@ind1 == '') current_focus = row.childNodes[1];
1298     if (!current_focus && field.@ind2 == '') current_focus = row.childNodes[2];
1299
1300     var sf_box = row.lastChild;
1301     if (document.getElementById('stackSubfields').checked)
1302         sf_box.setAttribute('orient','vertical');
1303
1304     sf_box.addEventListener(
1305         'click',
1306         function (e) {
1307             if (sf_box === e.target) {
1308                 sf_box.lastChild.lastChild.focus();
1309             } else if (e.target.parentNode === sf_box) {
1310                 e.target.lastChild.focus();
1311             }
1312         },
1313         false
1314     );
1315
1316
1317     for (var i in field.subfield) {
1318         var sf = field.subfield[i];
1319         sf_box.appendChild(
1320             marcSubfield(sf)
1321         );
1322
1323         dojo.query('.marcSubfield', sf_box).forEach(wrap_long_fields);
1324
1325         if (sf.@code == '' && (!current_focus || current_focus.className.match(/Ind/)))
1326             current_focus = sf_box.lastChild.childNodes[1];
1327     }
1328
1329     return row;
1330 }
1331
1332 function marcSubfield (sf) {            
1333     return createHbox(
1334         { class : 'marcSubfieldBox' },
1335         createLabel(
1336             { value : "\u2021",
1337               class : 'plain marcSubfieldDelimiter',
1338               onmouseover : 'getTooltip(this.nextSibling, "subfield");',
1339               oncontextmenu : 'getContextMenu(this.nextSibling, "subfield");',
1340                 //onclick : 'this.nextSibling.focus();',
1341                 onfocus : 'this.nextSibling.focus();',
1342               size : 2 } ),
1343         createMARCTextbox(
1344             sf.@code,
1345             { value : sf.@code,
1346               class : 'plain marcSubfieldCode',
1347               align: 'start',
1348               name : 'marcSubfieldCode',
1349               onmouseover : 'current_focus = this; getContextMenu(this, "subfield"); getTooltip(this, "subfield");',
1350               oncontextmenu : 'getContextMenu(this, "subfield");',
1351               oninput : 'if (this.value.length == 1) { this.nextSibling.focus(); }',
1352               size : 2,
1353               maxlength : 1 } ),
1354         createMARCTextbox(
1355             sf,
1356             { value : sf.text(),
1357               name : sf.parent().@tag + ':' + sf.@code,
1358               class : 'plain marcSubfield', 
1359               align: 'start',
1360               onmouseover : 'getTooltip(this, "subfield");',
1361               contextmenu : function (event) { getAuthorityContextMenu(event.target, sf) },
1362               size : new String(sf.text()).length + 2,
1363               oninput : "this.setAttribute('size', this.value.length + 2);"
1364             } )
1365     );
1366 }
1367
1368 function loadRecord() {
1369     try {
1370             var tabs = window.parent.parent.document.getElementById('main_tabs');
1371
1372             if (tabs) {
1373                 var idx = tabs.selectedIndex;
1374                 var tab = tabs.childNodes[idx];
1375                 if (tab) {
1376                     tab.marc_edit_changed = false;
1377                     tab.marc_edit_allow_multiple_locks = true;
1378                 }
1379             }
1380
1381             var grid_rows = document.getElementById('recGrid').lastChild;
1382
1383             while (grid_rows.firstChild) grid_rows.removeChild(grid_rows.firstChild);
1384
1385             grid_rows.appendChild( marcLeader( xml_record.leader ) );
1386
1387             for (var i in xml_record.controlfield) {
1388                 grid_rows.appendChild( marcControlfield( xml_record.controlfield[i] ) );
1389             }
1390
1391             for (var i in xml_record.datafield) {
1392                 grid_rows.appendChild( marcDatafield( xml_record.datafield[i] ) );
1393             }
1394
1395             grid_rows.getElementsByAttribute('class','marcDatafieldRow')[0].firstChild.focus();
1396
1397             var marc_rec = new MARC.Record ({ delimiter : '$', marcxml : xml_record.toXMLString() });
1398             changeFFEditor(marc_rec.recordType());
1399             fillFixedFields();
1400     } catch(E) {
1401         alert('FIXME, MARC Editor, loadRecord: ' + E);
1402     }
1403 }
1404
1405
1406 function genToolTips () {
1407     for (var i in bib_data.field) {
1408         var f = bib_data.field[i];
1409     
1410         tag_menu.appendChild(
1411             createMenuitem(
1412                 { label : f.@tag,
1413                   oncommand : 
1414                       'current_focus.value = "' + f.@tag + '";' +
1415                     'var e = document.createEvent("MutationEvents");' +
1416                     'e.initMutationEvent("change",1,1,null,0,0,0,0);' +
1417                     'current_focus.inputField.dispatchEvent(e);',
1418                   disabled : f.@tag < '010' ? "true" : "false",
1419                   tooltiptext : f.description }
1420             )
1421         );
1422     
1423         var i1_popup = createMenuPopup({position : 'after_start', id : 't' + f.@tag + 'i1' });
1424         context_menus.appendChild( i1_popup );
1425     
1426         var i2_popup = createMenuPopup({position : 'after_start', id : 't' + f.@tag + 'i2' });
1427         context_menus.appendChild( i2_popup );
1428     
1429         var sf_popup = createMenuPopup({position : 'after_start', id : 't' + f.@tag + 'sf' });
1430         context_menus.appendChild( sf_popup );
1431     
1432         tooltip_hash['tag' + f.@tag] = f.description;
1433         for (var j in f.indicator) {
1434             var ind = f.indicator[j];
1435             tooltip_hash['tag' + f.@tag + 'ind' + ind.@position + 'val' + ind.@value] = ind.description;
1436     
1437             if (ind.@position == 1) {
1438                 i1_popup.appendChild(
1439                     createMenuitem(
1440                         { label : ind.@value,
1441                           oncommand : 
1442                               'current_focus.value = "' + ind.@value + '";' +
1443                             'var e = document.createEvent("MutationEvents");' +
1444                             'e.initMutationEvent("change",1,1,null,0,0,0,0);' +
1445                             'current_focus.inputField.dispatchEvent(e);',
1446                           tooltiptext : ind.description }
1447                     )
1448                 );
1449             }
1450     
1451             if (ind.@position == 2) {
1452                 i2_popup.appendChild(
1453                     createMenuitem(
1454                         { label : ind.@value,
1455                           oncommand : 
1456                               'current_focus.value = "' + ind.@value + '";' +
1457                             'var e = document.createEvent("MutationEvents");' +
1458                             'e.initMutationEvent("change",1,1,null,0,0,0,0);' +
1459                             'current_focus.inputField.dispatchEvent(e);',
1460                           tooltiptext : ind.description }
1461                     )
1462                 );
1463             }
1464         }
1465     
1466         for (var j in f.subfield) {
1467             var sf = f.subfield[j];
1468             tooltip_hash['tag' + f.@tag + 'sf' + sf.@code] = sf.description;
1469     
1470             sf_popup.appendChild(
1471                 createMenuitem(
1472                     { label : sf.@code,
1473                       oncommand : 
1474                           'current_focus.value = "' + sf.@code + '";' +
1475                         'var e = document.createEvent("MutationEvents");' +
1476                         'e.initMutationEvent("change",1,1,null,0,0,0,0);' +
1477                         'current_focus.inputField.dispatchEvent(e);',
1478                       tooltiptext : sf.description
1479                     }
1480                 )
1481             );
1482         }
1483     }
1484 }
1485
1486 function getTooltip (target, type) {
1487
1488     var tt = '';
1489     if (type == 'subfield')
1490         tt = 'tag' + target.parentNode.parentNode.parentNode.firstChild.value + 'sf' + target.parentNode.childNodes[1].value;
1491
1492     if (type == 'ind1')
1493         tt = 'tag' + target.parentNode.firstChild.value + 'ind1val' + target.value;
1494
1495     if (type == 'ind2')
1496         tt = 'tag' + target.parentNode.firstChild.value + 'ind2val' + target.value;
1497
1498     if (type == 'tag')
1499         tt = 'tag' + target.parentNode.firstChild.value;
1500
1501     if (!document.getElementById( tt )) {
1502         p.appendChild(
1503             createTooltip(
1504                 { id : tt,
1505                   flex : "1",
1506                   orient : 'vertical',
1507                   onpopupshown : 'this.width = this.firstChild.boxObject.width + 10; this.height = this.firstChild.boxObject.height + 10;',
1508                   class : 'tooltip' },
1509                 createDescription({}, document.createTextNode( tooltip_hash[tt] ) )
1510             )
1511         );
1512     }
1513
1514     target.tooltip = tt;
1515     return true;
1516 }
1517
1518 function getContextMenu (target, type) {
1519
1520     var tt = '';
1521     if (type == 'subfield')
1522         tt = 't' + target.parentNode.parentNode.parentNode.firstChild.value + 'sf';
1523
1524     if (type == 'ind1')
1525         tt = 't' + target.parentNode.firstChild.value + 'i1';
1526
1527     if (type == 'ind2')
1528         tt = 't' + target.parentNode.firstChild.value + 'i2';
1529
1530     target.setAttribute('context', tt);
1531     return true;
1532 }
1533
1534 var control_map = {
1535     100 : {
1536         'a' : { 100 : 'a' },
1537         'd' : { 100 : 'd' },
1538         'e' : { 100 : 'e' },
1539         'q' : { 100 : 'q' }
1540     },
1541     110 : {
1542         'a' : { 110 : 'a' },
1543         'd' : { 110 : 'd' }
1544     },
1545     111 : {
1546         'a' : { 111 : 'a' },
1547         'd' : { 111 : 'd' }
1548     },
1549     130 : {
1550         'a' : { 130 : 'a' },
1551         'd' : { 130 : 'd' }
1552     },
1553     240 : {
1554         'a' : { 130 : 'a' },
1555         'd' : { 130 : 'd' }
1556     },
1557     400 : {
1558         'a' : { 100 : 'a' },
1559         'd' : { 100 : 'd' }
1560     },
1561     410 : {
1562         'a' : { 110 : 'a' },
1563         'd' : { 110 : 'd' }
1564     },
1565     411 : {
1566         'a' : { 111 : 'a' },
1567         'd' : { 111 : 'd' }
1568     },
1569     440 : {
1570         'a' : { 130 : 'a' },
1571         'n' : { 130 : 'n' },
1572         'p' : { 130 : 'p' }
1573     },
1574     700 : {
1575         'a' : { 100 : 'a' },
1576         'd' : { 100 : 'd' },
1577         'q' : { 100 : 'q' },
1578         't' : { 100 : 't' }
1579     },
1580     710 : {
1581         'a' : { 110 : 'a' },
1582         'd' : { 110 : 'd' }
1583     },
1584     711 : {
1585         'a' : { 111 : 'a' },
1586         'c' : { 111 : 'c' },
1587         'd' : { 111 : 'd' }
1588     },
1589     730 : {
1590         'a' : { 130 : 'a' },
1591         'd' : { 130 : 'd' }
1592     },
1593     800 : {
1594         'a' : { 100 : 'a' },
1595         'd' : { 100 : 'd' }
1596     },
1597     810 : {
1598         'a' : { 110 : 'a' },
1599         'd' : { 110 : 'd' }
1600     },
1601     811 : {
1602         'a' : { 111 : 'a' },
1603         'd' : { 111 : 'd' }
1604     },
1605     830 : {
1606         'a' : { 130 : 'a' },
1607         'd' : { 130 : 'd' }
1608     },
1609     600 : {
1610         'a' : { 100 : 'a' },
1611         'd' : { 100 : 'd' },
1612         'q' : { 100 : 'q' },
1613         't' : { 100 : 't' },
1614         'v' : { 180 : 'v',
1615             100 : 'v',
1616             181 : 'v',
1617             182 : 'v',
1618             185 : 'v'
1619         },
1620         'x' : { 180 : 'x',
1621             100 : 'x',
1622             181 : 'x',
1623             182 : 'x',
1624             185 : 'x'
1625         },
1626         'y' : { 180 : 'y',
1627             100 : 'y',
1628             181 : 'y',
1629             182 : 'y',
1630             185 : 'y'
1631         },
1632         'z' : { 180 : 'z',
1633             100 : 'z',
1634             181 : 'z',
1635             182 : 'z',
1636             185 : 'z'
1637         }
1638     },
1639     610 : {
1640         'a' : { 110 : 'a' },
1641         'd' : { 110 : 'd' },
1642         't' : { 110 : 't' },
1643         'v' : { 180 : 'v',
1644             110 : 'v',
1645             181 : 'v',
1646             182 : 'v',
1647             185 : 'v'
1648         },
1649         'x' : { 180 : 'x',
1650             110 : 'x',
1651             181 : 'x',
1652             182 : 'x',
1653             185 : 'x'
1654         },
1655         'y' : { 180 : 'y',
1656             110 : 'y',
1657             181 : 'y',
1658             182 : 'y',
1659             185 : 'y'
1660         },
1661         'z' : { 180 : 'z',
1662             110 : 'z',
1663             181 : 'z',
1664             182 : 'z',
1665             185 : 'z'
1666         }
1667     },
1668     611 : {
1669         'a' : { 111 : 'a' },
1670         'd' : { 111 : 'd' },
1671         't' : { 111 : 't' },
1672         'v' : { 180 : 'v',
1673             111 : 'v',
1674             181 : 'v',
1675             182 : 'v',
1676             185 : 'v'
1677         },
1678         'x' : { 180 : 'x',
1679             111 : 'x',
1680             181 : 'x',
1681             182 : 'x',
1682             185 : 'x'
1683         },
1684         'y' : { 180 : 'y',
1685             111 : 'y',
1686             181 : 'y',
1687             182 : 'y',
1688             185 : 'y'
1689         },
1690         'z' : { 180 : 'z',
1691             111 : 'z',
1692             181 : 'z',
1693             182 : 'z',
1694             185 : 'z'
1695         }
1696     },
1697     630 : {
1698         'a' : { 130 : 'a' },
1699         'd' : { 130 : 'd' }
1700     },
1701     648 : {
1702         'a' : { 148 : 'a' },
1703         'v' : { 148 : 'v' },
1704         'x' : { 148 : 'x' },
1705         'y' : { 148 : 'y' },
1706         'z' : { 148 : 'z' }
1707     },
1708     650 : {
1709         'a' : { 150 : 'a' },
1710         'b' : { 150 : 'b' },
1711         'v' : { 180 : 'v',
1712             150 : 'v',
1713             181 : 'v',
1714             182 : 'v',
1715             185 : 'v'
1716         },
1717         'x' : { 180 : 'x',
1718             150 : 'x',
1719             181 : 'x',
1720             182 : 'x',
1721             185 : 'x'
1722         },
1723         'y' : { 180 : 'y',
1724             150 : 'y',
1725             181 : 'y',
1726             182 : 'y',
1727             185 : 'y'
1728         },
1729         'z' : { 180 : 'z',
1730             150 : 'z',
1731             181 : 'z',
1732             182 : 'z',
1733             185 : 'z'
1734         }
1735     },
1736     651 : {
1737         'a' : { 151 : 'a' },
1738         'v' : { 180 : 'v',
1739             151 : 'v',
1740             181 : 'v',
1741             182 : 'v',
1742             185 : 'v'
1743         },
1744         'x' : { 180 : 'x',
1745             151 : 'x',
1746             181 : 'x',
1747             182 : 'x',
1748             185 : 'x'
1749         },
1750         'y' : { 180 : 'y',
1751             151 : 'y',
1752             181 : 'y',
1753             182 : 'y',
1754             185 : 'y'
1755         },
1756         'z' : { 180 : 'z',
1757             151 : 'z',
1758             181 : 'z',
1759             182 : 'z',
1760             185 : 'z'
1761         }
1762     },
1763     655 : {
1764         'a' : { 155 : 'a' },
1765         'v' : { 180 : 'v',
1766             155 : 'v',
1767             181 : 'v',
1768             182 : 'v',
1769             185 : 'v'
1770         },
1771         'x' : { 180 : 'x',
1772             155 : 'x',
1773             181 : 'x',
1774             182 : 'x',
1775             185 : 'x'
1776         },
1777         'y' : { 180 : 'y',
1778             155 : 'y',
1779             181 : 'y',
1780             182 : 'y',
1781             185 : 'y'
1782         },
1783         'z' : { 180 : 'z',
1784             155 : 'z',
1785             181 : 'z',
1786             182 : 'z',
1787             185 : 'z'
1788         }
1789     }
1790 };
1791
1792 function getAuthorityContextMenu (target, sf) {
1793     var menu_id = sf.parent().@tag + ':' + sf.@code + '-authority-context-' + sf;
1794
1795     var page = 0;
1796     var old = dojo.byId( menu_id );
1797     if (old) {
1798         page = auth_pages[menu_id];
1799         old.parentNode.removeChild(old);
1800     } else {
1801         auth_pages[menu_id] = 0;
1802     }
1803
1804     var sf_popup = createMenuPopup({ id : menu_id, flex : 1 });
1805
1806     sf_popup.addEventListener("popuphiding", function(event) {
1807         if (show_auth_menu) {
1808             show_auth_menu = false;
1809             getAuthorityContextMenu(target, sf);
1810             dojo.byId(menu_id).openPopup();
1811         }  
1812     }, false);
1813
1814     context_menus.appendChild( sf_popup );
1815
1816     var found_acs = [];
1817     dojo.forEach( acs.controlSetList(), function (acs_id) {
1818         if (acs.controlSet(acs_id).control_map[sf.parent().@tag]) found_acs.push(acs_id);
1819     });
1820
1821     if (!found_acs.length) {
1822         sf_popup.appendChild(createLabel( { value : $('catStrings').getString('staff.cat.marcedit.not_authority_field.label') } ) );
1823         target.setAttribute('context', 'clipboard');
1824         return false;
1825     }
1826
1827     if (sf.toString().replace(/\s*/, '')) {
1828         return browseAuthority(sf_popup, menu_id, target, sf, 20, page);
1829     }
1830
1831     return true;
1832 }
1833
1834 /* Apply the complete 1xx */
1835 function applyFullAuthority ( target, ui_sf, e4x_sf ) {
1836     var new_vals = dojo.query('*[tag^="1"]', target);
1837     return applyAuthority( target, ui_sf, e4x_sf, new_vals );
1838 }
1839
1840 function applySelectedAuthority ( target, ui_sf, e4x_sf ) {
1841     var new_vals = target.getElementsByAttribute('checked','true');
1842     return applyAuthority( target, ui_sf, e4x_sf, new_vals );
1843 }
1844
1845 function applyAuthority ( target, ui_sf, e4x_sf, new_vals ) {
1846     var field = e4x_sf.parent();
1847
1848     for (var i = 0; i < new_vals.length; i++) {
1849
1850         var sf_list = field.subfield;
1851         for (var j in sf_list) {
1852
1853             if (sf_list[j].@code == new_vals[i].getAttribute('subfield')) {
1854                 sf_list[j] = new_vals[i].getAttribute('value');
1855                 new_vals[i].setAttribute('subfield','');
1856                 break;
1857             }
1858         }
1859     }
1860
1861     for (var i = 0; i < new_vals.length; i++) {
1862
1863         /* indicators for the authority datafield are carried over in the main entry linking subfield */
1864         if (new_vals[i].getAttribute('subfield') == '0') {
1865             field.@ind1 = new_vals[i].getAttribute('ind1');
1866             field.@ind2 = new_vals[i].getAttribute('ind2');
1867         }
1868
1869         if (!new_vals[i].getAttribute('subfield')) continue;
1870
1871         var val = new_vals[i].getAttribute('value');
1872
1873         var sf = <subfield code="" xmlns="http://www.loc.gov/MARC21/slim">{val}</subfield>;
1874         sf.@code = new_vals[i].getAttribute('subfield');
1875
1876         field.insertChildAfter(field.subfield[field.subfield.length() - 1], sf);
1877     }
1878
1879     var row = marcDatafield( field );
1880
1881     var node = ui_sf;
1882     while (node.nodeName != 'row') {
1883         node = node.parentNode;
1884     }
1885
1886     node.parentNode.replaceChild( row, node );
1887     return true;
1888 }
1889
1890 function validateAuthority (button) {
1891     var grid = document.getElementById('recGrid');
1892     var label = button.getAttribute('label');
1893
1894     //loop over rows
1895     var rows = grid.lastChild.childNodes;
1896     for (var i = 0; i < rows.length; i++) {
1897         var row = rows[i];
1898         var tag = row.firstChild;
1899
1900         var done = false;
1901         dojo.forEach(acs.controlSetList(), function (acs_id) {
1902             if (done) return;
1903             var control_map = acs.controlSet(acs_id).control_map;
1904     
1905             if (!control_map[tag.value]) return;
1906             button.setAttribute('label', label + ' - ' + tag.value);
1907     
1908             var ind1 = tag.nextSibling;
1909             var ind2 = ind1.nextSibling;
1910             var subfields = ind2.nextSibling.childNodes;
1911     
1912             var sf_list = [];
1913             for (var j = 0; j < subfields.length; j++) {
1914                 var sf = subfields[j];
1915                 sf_list.push( [ sf.childNodes[1].value, sf.childNodes[2].value ] );
1916             }
1917
1918             var matches = acs.findMatchingAuthorities(
1919                 new MARC.Field({
1920                     'tag'       : tag.value,
1921                     'subfields' : sf_list
1922                 })
1923             );
1924
1925             // matches = [ { "$csetId" : [ ... ] } ]
1926
1927             var found = false;
1928             if (matches[0]) { // probably set
1929                 for (var cset in matches[0]) {
1930                     var arr = matches[0][cset];
1931                     if (arr.length) {
1932                         // protect against errant empty string values
1933                         if (arr.length == 1 && arr[0] == '')
1934                             continue;
1935                         found = true;
1936                         break;
1937                     }
1938                 }
1939             }
1940
1941     
1942             // XXX If adt, etc should be validated separately from vxz, etc then move this up into the above for loop
1943             for (var j = 0; j < subfields.length; j++) {
1944                 var sf = subfields[j];
1945                 if (!found) {
1946                     dojo.removeClass(sf.childNodes[2], 'marcValidated');
1947                     dojo.addClass(sf.childNodes[2], 'marcUnvalidated');
1948                 } else {
1949                     dojo.removeClass(sf.childNodes[2], 'marcUnvalidated');
1950                     dojo.addClass(sf.childNodes[2], 'marcValidated');
1951                 }
1952             }
1953
1954             if (found) done = true;
1955         });
1956     }
1957
1958     button.setAttribute('label', label);
1959
1960     return true;
1961 }
1962
1963
1964 /*
1965 function validateBibField (tags, searches) {
1966     var url = "/gateway?input_format=json&format=xml&service=open-ils.search&method=open-ils.search.authority.validate.tag";
1967     url += '&param="tags"&param=' + js2JSON(tags);
1968     url += '&param="searches"&param=' + js2JSON(searches);
1969
1970
1971     var req = new XMLHttpRequest();
1972     req.open('GET',url,false);
1973     req.send(null);
1974
1975     return req;
1976
1977 }
1978 */
1979
1980 function searchAuthority (term, tag, sf, limit) {
1981     var url = "/gateway?input_format=json&format=xml&service=open-ils.search&method=open-ils.search.authority.fts";
1982     url += '&param="term"&param="' + term + '"';
1983     url += '&param="limit"&param=' + limit;
1984     url += '&param="tag"&param=' + tag;
1985     url += '&param="subfield"&param="' + sf + '"';
1986
1987
1988     var req = new XMLHttpRequest();
1989     req.open('GET',url,false);
1990     req.send(null);
1991
1992     return req;
1993
1994 }
1995
1996 /* TODO new authority browse support for context sets, and use that here */
1997 function browseAuthority (sf_popup, menu_id, target, sf, limit, page) {
1998     dojo.require('dojox.xml.parser');
1999
2000     // map tag + subfield to the appropriate authority browse axis:
2001     // currently authority.author, authority.subject, authority.title, authority.topic
2002     // based on mappings in OpenILS::Application::SuperCat, though Authority Control
2003     // Sets will change that
2004
2005     var axis_list = acs.bibFieldBrowseAxes( sf.parent().@tag.toString() );
2006
2007     // No matching tag means no authorities to search - shortcut
2008     if (axis_list.length == 0) {
2009         target.setAttribute('context', 'clipboard');
2010         return false;
2011     }
2012
2013     var type = 'authority.' + axis_list[0]; // Just take the first for now
2014                                             // TODO support multiple axes ... loop?
2015     if (!limit) {
2016         limit = 10;
2017     }
2018
2019     if (!page) {
2020         page = 0;
2021     }
2022
2023     var sf_string = '';
2024     var sf_list = sf.parent().subfield;
2025     for ( var i in sf_list) {
2026         sf_string += sf_list[i].toString() + ' ';
2027         if (sf_list[i] === sf) break;
2028     }
2029
2030     var url = '/opac/extras/browse/marcxml/'
2031         + type + '.refs'
2032         + '/1' // OU - currently unscoped
2033         + '/' + sf_string
2034         + '/' + page
2035         + '/' + limit
2036     ;
2037
2038     // would be good to carve this out into a separate function
2039     dojo.xhrGet({"url":url, "sync": true, "preventCache": true, "handleAs":"xml", "load": function(records) {
2040         var create_menu = createMenu({ label: $('catStrings').getString('staff.cat.marcedit.create_authority.label')});
2041
2042         var cm_popup = create_menu.appendChild(
2043             createMenuPopup()
2044         );
2045
2046         cm_popup.appendChild(
2047             createMenuitem({ label : $('catStrings').getString('staff.cat.marcedit.create_authority_now.label'),
2048                 command : function() { 
2049                     // Call middle-layer function to create and save the new authority
2050                     var source_f = summarizeField(sf);
2051                     var new_auth = fieldmapper.standardRequest(
2052                         ["open-ils.cat", "open-ils.cat.authority.record.create_from_bib"],
2053                         [source_f, xulG.marc_control_number_identifier, ses()]
2054                     );
2055                     if (new_auth && new_auth.id()) {
2056                         addNewAuthorityID(new_auth, sf, target);
2057                     }
2058                 }
2059             })
2060         );
2061
2062         cm_popup.appendChild(
2063             createMenuitem({ label : $('catStrings').getString('staff.cat.marcedit.create_authority_edit.label'),
2064                 command : function() { 
2065                     // Generate the new authority by calling the new middle-layer
2066                     // function (a non-saving variant), then display in another
2067                     // MARC editor
2068                     var source_f = summarizeField(sf);
2069                     var authtoken = ses();
2070                     dojo.require('openils.PermaCrud');
2071                     var pcrud = new openils.PermaCrud({"authtoken": authtoken});
2072                     var rec = fieldmapper.standardRequest(
2073                         ["open-ils.cat", "open-ils.cat.authority.record.create_from_bib.readonly"],
2074                         { "params": [source_f, xulG.marc_control_number_identifier] }
2075                     );
2076                     loadMarcEditor(pcrud, rec, target, sf);
2077                 }
2078             })
2079         );
2080
2081         sf_popup.appendChild(create_menu);
2082         sf_popup.appendChild( createComplexXULElement( 'menuseparator' ) );
2083
2084         // append "Previous page" results browser
2085         sf_popup.appendChild(
2086             createMenuitem({ label : $('catStrings').getString('staff.cat.marcedit.previous_page.label'),
2087                 command : function(event) { 
2088                     auth_pages[menu_id] -= 1;
2089                     show_auth_menu = true;
2090                 }
2091             })
2092         );
2093         sf_popup.appendChild( createComplexXULElement( 'menuseparator' ) );
2094
2095         dojo.query('record', records).forEach(function(record) {
2096             var main_text = '';
2097             var see_from = [];
2098             var see_also = [];
2099             var auth_id = dojox.xml.parser.textContent(dojo.query('datafield[tag="901"]', record).query('subfield[code="c"]')[0]);
2100             var auth_org = '';
2101             if (dojo.query('controlfield[tag="003"]', record).length > 0) {
2102                 auth_org = dojox.xml.parser.textContent(dojo.query('controlfield[tag="003"]', record)[0]);
2103             }
2104
2105             // Grab the fields with tags beginning with 1 (main entries) and iterate through the subfields
2106             dojo.query('datafield[tag^="1"]', record).forEach(function(field) {
2107                 dojo.query('subfield', field).forEach(function(subfield) {
2108                     if (main_text) {
2109                         main_text += ' / ';
2110                     }
2111                     main_text += dojox.xml.parser.textContent(subfield);
2112                 });
2113             });
2114
2115             // Grab the fields with tags beginning with 4 (see from entries) and iterate through the subfields
2116             dojo.query('datafield[tag^="4"]', record).forEach(function(field) {
2117                 var see_text = '';
2118                 dojo.query('subfield', field).forEach(function(subfield) {
2119                     if (see_text) {
2120                         see_text += ' / ';
2121                     }
2122                     see_text += dojox.xml.parser.textContent(subfield);
2123                 });
2124                 see_from.push($('catStrings').getFormattedString('staff.cat.marcedit.authority_see_from', [see_text]));
2125             });
2126
2127             // Grab the fields with tags beginning with 5 (see also entries) and iterate through the subfields
2128             dojo.query('datafield[tag^="5"]', record).forEach(function(field) {
2129                 var see_text = '';
2130                 dojo.query('subfield', field).forEach(function(subfield) {
2131                     if (see_text) {
2132                         see_text += ' / ';
2133                     }
2134                     see_text += dojox.xml.parser.textContent(subfield);
2135                 });
2136                 see_also.push($('catStrings').getFormattedString('staff.cat.marcedit.authority_see_also', [see_text]));
2137             });
2138
2139             buildAuthorityPopup(main_text, record, auth_org, auth_id, sf_popup, target, sf);
2140
2141             dojo.forEach(see_from, function(entry_text) {
2142                 buildAuthorityPopup(entry_text, record, auth_org, auth_id, sf_popup, target, sf, "font-style: italic; margin-left: 2em;");
2143             });
2144
2145             // To-do: instead of launching the standard selector menu, invoke
2146             // a new authority search using the 5XX entry text
2147             dojo.forEach(see_also, function(entry_text) {
2148                 buildAuthorityPopup(entry_text, record, auth_org, auth_id, sf_popup, target, sf, "font-style: italic; margin-left: 2em;");
2149             });
2150
2151         });
2152
2153         if (sf_popup.childNodes.length == 0) {
2154             sf_popup.appendChild(createLabel( { value : $('catStrings').getString('staff.cat.marcedit.no_authority_match.label') } ) );
2155         } else {
2156             // append "Next page" results browser
2157             sf_popup.appendChild( createComplexXULElement( 'menuseparator' ) );
2158             sf_popup.appendChild(
2159                 createMenuitem({ label : $('catStrings').getString('staff.cat.marcedit.next_page.label'),
2160                     command : function(event) { 
2161                         auth_pages[menu_id] += 1;
2162                         show_auth_menu = true;
2163                     }
2164                 })
2165             );
2166         }
2167
2168         target.setAttribute('context', menu_id);
2169         return true;
2170     }});
2171
2172 }
2173
2174 function buildAuthorityPopup (entry_text, record, auth_org, auth_id, sf_popup, target, sf, style) {
2175     var grid = dojo.query('[name="authority-marc-template"]')[0].cloneNode(true);
2176     grid.setAttribute('name','-none-');
2177     grid.setAttribute('style','overflow:scroll');
2178
2179     var submenu = createMenu( { "label": entry_text } );
2180
2181     var popup = createMenuPopup({ "flex": "1" });
2182     if (style) {
2183         submenu.setAttribute('style', style);
2184         popup.setAttribute('style', 'font-style: normal; margin-left: 0em;');
2185     }
2186     submenu.appendChild(popup);
2187
2188     dojo.query('datafield[tag^="1"]', record).forEach(function(field) {
2189         buildAuthorityPopupSelector(field, grid, auth_org, auth_id);
2190     });
2191     dojo.query('datafield[tag^="4"]', record).forEach(function(field) {
2192         buildAuthorityPopupSelector(field, grid, auth_org, auth_id);
2193     });
2194     dojo.query('datafield[tag^="5"]', record).forEach(function(field) {
2195         buildAuthorityPopupSelector(field, grid, auth_org, auth_id);
2196     });
2197
2198     grid.hidden = false;
2199     popup.appendChild( grid );
2200
2201     popup.appendChild(
2202         createMenuitem(
2203             { label : $('catStrings').getString('staff.cat.marcedit.apply_selected.label'),
2204               command : function (event) {
2205                     applySelectedAuthority(event.target.previousSibling, target, sf);
2206                     return true;
2207               }
2208             }
2209         )
2210     );
2211
2212     popup.appendChild( createComplexXULElement( 'menuseparator' ) );
2213
2214     popup.appendChild(
2215         createMenuitem(
2216             { label : $('catStrings').getString('staff.cat.marcedit.apply_full.label'),
2217               command : function (event) {
2218                     applyFullAuthority(event.target.previousSibling.previousSibling.previousSibling, target, sf);
2219                     return true;
2220               }
2221             }
2222         )
2223     );
2224
2225     sf_popup.appendChild( submenu );
2226 }
2227
2228 function buildAuthorityPopupSelector (field, grid, auth_org, auth_id) {
2229     var row = createRow(
2230         { },
2231         createLabel( { "value" : dojo.attr(field, 'tag') } ),
2232         createLabel( { "value" : dojo.attr(field, 'ind1') } ),
2233         createLabel( { "value" : dojo.attr(field, 'ind2') } )
2234     );
2235
2236     var sf_box = createHbox();
2237     dojo.query('subfield', field).forEach(function(subfield) {
2238         sf_box.appendChild(
2239             createCheckbox(
2240                 { "label"    : '\u2021' + dojo.attr(subfield, 'code') + ' ' + dojox.xml.parser.textContent(subfield),
2241                   "subfield" : dojo.attr(subfield, 'code'),
2242                   "tag"      : dojo.attr(field, 'tag'),
2243                   "value"    : dojox.xml.parser.textContent(subfield)
2244                 }
2245             )
2246         );
2247         row.appendChild(sf_box);
2248     });
2249
2250     // Append the authority linking subfield only for main entries
2251     if (dojo.attr(field, 'tag').charAt(0) == '1') {
2252         sf_box.appendChild(
2253             createCheckbox(
2254                 { "label"    : '\u2021' + '0' + ' (' + auth_org + ')' + auth_id,
2255                   "subfield" : '0',
2256                   "tag"      : dojo.attr(field, 'tag'),
2257                   "ind1"     : dojo.attr(field, 'ind1'),
2258                   "ind2"     : dojo.attr(field, 'ind2'),
2259                   "value"    : '(' + auth_org + ')' + auth_id
2260                 }
2261             )
2262         );
2263     }
2264     row.appendChild(sf_box);
2265
2266     grid.lastChild.appendChild(row);
2267 }
2268
2269 function summarizeField(sf) {
2270     var source_f= {
2271         "tag": '',
2272         "ind1": '',
2273         "ind2": '',
2274         "subfields": []
2275     };
2276
2277     source_f.tag = sf.parent().@tag.toString();
2278     source_f.ind1 = sf.parent().@ind1.toString();
2279     source_f.ind2 = sf.parent().@ind2.toString();
2280
2281     var found_acs = [];
2282     dojo.forEach( acs.controlSetList(), function (acs_id) {
2283         if (acs.controlSet(acs_id).control_map[sf.parent().@tag]) found_acs.push(acs_id);
2284     });
2285
2286     var cmap;
2287     if (!found_acs.length) {
2288         return false;
2289     } else {
2290         cmap = acs.controlSet(found_acs[0]).control_map;
2291     }
2292
2293     for (var i = 0; i < sf.parent().subfield.length(); i++) {
2294         var sf_iter = sf.parent().subfield[i];
2295
2296         /* Filter out subfields that are not controlled for this tag */
2297         if (!cmap[source_f.tag][sf_iter.@code.toString()]) {
2298             continue;
2299         }
2300
2301         source_f.subfields.push([sf_iter.@code.toString(), sf_iter.toString()]);
2302     }
2303
2304     return source_f;
2305 }
2306
2307 function buildBibSourceList (authtoken, recId) {
2308     /* TODO: Work out how to set the bib source of the bre that does not yet
2309      * exist - this is specifically in the case of Z39.50 imports. Right now
2310      * we just avoid populating and showing the config.bib_source list
2311      */
2312     if (!recId) {
2313         return false;
2314     }
2315
2316     var bib = xulG.record.bre;
2317
2318     dojo.require('openils.PermaCrud');
2319
2320     // cbsList = the XUL menulist that contains the available bib sources 
2321     var cbsList = dojo.byId('bib-source-list');
2322
2323     // bibSources = an array containing all of the bib source objects
2324     var bibSources = new openils.PermaCrud({"authtoken": authtoken}).retrieveAll('cbs');
2325
2326     // A tad ugly, but gives us the index of the bib source ID in cbsList
2327     var x = 0;
2328     var cbsListArr = [];
2329     dojo.forEach(bibSources, function (item) {
2330         cbsList.appendItem(item.source(), item.id());
2331         cbsListArr[item.id()] = x;
2332         x++;
2333     });
2334
2335     // Show the current value of the bib source for this record
2336     cbsList.selectedIndex = cbsListArr[bib.source()];
2337
2338     // Display the bib source selection widget
2339     dojo.byId('bib-source-list-caption').hidden = false;
2340     dojo.byId('bib-source-list').hidden = false;
2341     dojo.byId('bib-source-list-button').disabled = true;
2342     dojo.byId('bib-source-list-button').hidden = false;
2343 }
2344
2345 // Fired when the "Update Source" button is clicked
2346 // Updates the value of the bib source for the current record
2347 function updateBibSource() {
2348     var authtoken = ses();
2349     var cbs = dojo.byId('bib-source-list').selectedItem.value;
2350     var recId = xulG.record.id;
2351     var pcrud = new openils.PermaCrud({"authtoken": authtoken});
2352     var bib = pcrud.retrieve('bre', recId);
2353     if (bib.source() != cbs) {
2354         bib.source(cbs);
2355         bib.ischanged = true;
2356         pcrud.update(bib);
2357     }
2358 }
2359
2360 function onBibSourceSelect() {
2361     var cbs = dojo.byId('bib-source-list').selectedItem.value;
2362     var bib = xulG.record.bre;
2363     if (bib.source() != cbs) {
2364         dojo.byId('bib-source-list-button').disabled = false;   
2365     } else {
2366         dojo.byId('bib-source-list-button').disabled = true;   
2367     }
2368 }
2369
2370 function addNewAuthorityID(authority, sf, target) {
2371     var id_sf = <subfield code="0" xmlns="http://www.loc.gov/MARC21/slim">({xulG.marc_control_number_identifier}){authority.id()}</subfield>;
2372     sf.parent().appendChild(id_sf);
2373     var new_sf = marcSubfield(id_sf);
2374
2375     var node = target;
2376     while (dojo.attr(node, 'name') != 'sf_box') {
2377         node = node.parentNode;
2378     }
2379     node.appendChild( new_sf );
2380
2381     alert($('catStrings').getString('staff.cat.marcedit.create_authority_success.label'));
2382 }
2383
2384 function loadMarcEditor(pcrud, marcxml, target, sf) {
2385     /*
2386        To run in Firefox directly, must set signed.applets.codebase_principal_support
2387        to true in about:config
2388      */
2389     win = window.open('/xul/server/cat/marcedit.xul', '_blank', 'chrome'); // XXX version?
2390
2391     // Match marc2are.pl last_xact_id format, roughly
2392     var now = new Date;
2393     var xact_id = 'IMPORT-' + Date.parse(now);
2394     
2395     win.xulG = {
2396         "record": {"marc": marcxml, "rtype": "are"},
2397         "save": {
2398             "label": $('catStrings').getString('staff.cat.marcedit.save.label'),
2399             "func": function(xmlString) {
2400                 var rec = new are();
2401                 rec.marc(xmlString);
2402                 rec.last_xact_id(xact_id);
2403                 rec.isnew(true);
2404                 pcrud.create(rec, {
2405                     "oncomplete": function (r, objs) {
2406                         var new_rec = objs[0];
2407                         if (!new_rec) {
2408                             return '';
2409                         }
2410
2411                         addNewAuthorityID(new_rec, sf, target);
2412
2413                         win.close();
2414                     }
2415                 });
2416             }
2417         }
2418     };
2419 }
2420
2421