--- nsdl/lib/perl/Apache/GATEWAY/ToNSDL.pm	2002/05/07 15:22:56	1.1
+++ nsdl/lib/perl/Apache/GATEWAY/ToNSDL.pm	2002/05/29 01:02:36	1.4
@@ -37,9 +37,10 @@ package Apache::GATEWAY::ToNSDL;
 
 # ================================================================ DEPENDENCIES
 use strict; # enforce handling of variables, references and subroutines
+use Apache::GATEWAY::FromLONCAPA;
 
 # ============================================================ MODULE VARIABLES
-my $VERSION = sprintf("%d.%02d", q$Revision: 1.1 $ =~ /(\d+)\.(\d+)/);
+my $VERSION = sprintf("%d.%02d", q$Revision: 1.4 $ =~ /(\d+)\.(\d+)/);
 
 # ================================================================= SUBROUTINES
 
@@ -51,8 +52,20 @@ sub view_LONCAPAnetwork_results {
 
 # -------------------------------- GATEWAY->view_LONCAPAnetwork_metadata_record
 sub view_LONCAPAnetwork_metadata_record {
-# Not yet implemented
-# Need to specifically characterize INPUT arguments and OUTPUT data
+    my ($eref)=@_;
+    my $id="requestnumber"; # needs to be a requestnumber
+  return
+ Apache::GATEWAY::FromLONCAPA::view_LONCAPAnetwork_metadata_record($eref,$id);
+    unless (-e '/home/gateway/'.$id) {
+	die('Cannot open /home/gateway/'.$id."\n");
+    }
+    my $tr=new XML::Xalan::Transformer(); # or something
+    my $ref;
+    # set up xsl
+    # set up xml
+    # process
+    undef($tr);
+    return ($ref);
 }
 
 # ------------------------------------- GATEWAY->access_LONCAPAnetwork_resource
@@ -147,7 +160,7 @@ output argument(s) will typically only b
 
 =over 4
 
-=item B<Apache::NSDL::view_LONCAPAnetwork_results>
+=item B<Apache::GATEWAY::ToNSDL::view_LONCAPAnetwork_results>
 
 =over 4
 
@@ -174,7 +187,7 @@ n/a
 
 =back
 
-=item B<Apache::GATEWAY::view_LONCAPAnetwork_metadata_record>
+=item B<Apache::GATEWAY::ToNSDL::view_LONCAPAnetwork_metadata_record>
 
 =over 4
 
@@ -199,7 +212,7 @@ n/a
 
 =back
 
-=item B<Apache::GATEWAY::access_LONCAPAnetwork_resource>
+=item B<Apache::GATEWAY::ToNSDL::access_LONCAPAnetwork_resource>
 
 =over 4
 
@@ -224,7 +237,7 @@ n/a
 
 =back
 
-=item B<Apache::GATEWAY::search_against_LONCAPAnetwork>
+=item B<Apache::GATEWAY::ToNSDL::search_against_LONCAPAnetwork>
 
 =over 4