[open-ils-commits] r8032 - branches/rel_1_2/Open-ILS/xul/staff_client/chrome/content/cat

[svn at svn.open-ils.org]

Author: phasefx
Date: 2007-11-07 14:57:56 -0500 (Wed, 07 Nov 2007)
New Revision: 8032

Modified:
   branches/rel_1_2/Open-ILS/xul/staff_client/chrome/content/cat/opac.xul
Log:
Delete Record action for embedded opac

Modified: branches/rel_1_2/Open-ILS/xul/staff_client/chrome/content/cat/opac.xul
===================================================================
--- branches/rel_1_2/Open-ILS/xul/staff_client/chrome/content/cat/opac.xul	2007-11-07 15:27:03 UTC (rev 8031)
+++ branches/rel_1_2/Open-ILS/xul/staff_client/chrome/content/cat/opac.xul	2007-11-07 19:57:56 UTC (rev 8032)
@@ -264,6 +264,17 @@
 			g.data.stash('marked_record');
 		}
 		
+		function delete_record() {
+			if (g.error.yns_alert('Are you sure you want to delete title record #' + docid + ' from the catalog?','Delete Record','Delete','Cancel',null,'Check here to confirm this action.') == 0) {
+				var robj = g.network.simple_request('FM_BRE_DELETE',[ses(),docid]);
+				if (typeof robj.ilsevent != 'undefined') {
+					alert('Error deleting Record #' + docid + ' : ' + robj.textcode + ' : ' + robj.desc + '\n');
+				} else {
+					alert('Record deleted.'); refresh_display(docid,true);
+				}
+			}
+		}
+
 		function refresh_display(id,reset) {
 			try { 
 				while(top_pane.node.lastChild) top_pane.node.removeChild( top_pane.node.lastChild );
@@ -329,6 +340,7 @@
 				<menuseparator/>
 				<menuitem label="Add to Bucket" accesskey="B" id="add_bucket" oncommand="add_to_bucket();"/>
 				<menuitem label="Mark for Overlay" accesskey="M" id="mark_for_overlay" oncommand="mark_for_overlay();"/>
+				<menuitem label="Delete Record" accesskey="D" id="delete_record" oncommand="delete_record();"/>
 				<menuseparator/>
 				<menuitem label="Duplicate in New Tab" id="bib_in_new_tab" oncommand="bib_in_new_tab();"/>
 				<menuitem label="Remove this Frame" id="remove_me" oncommand="remove_me();"/>