--- nsdl/lib/perl/Apache/GATEWAY/ToLONCAPA.pm	2002/05/07 15:58:14	1.1
+++ nsdl/lib/perl/Apache/GATEWAY/ToLONCAPA.pm	2002/05/19 17:35:24	1.2
@@ -39,7 +39,7 @@ package Apache::GATEWAY::ToLONCAPA;
 use strict; # enforce handling of variables, references and subroutines
 
 # ============================================================ MODULE VARIABLES
-my $VERSION = sprintf("%d.%02d", q$Revision: 1.1 $ =~ /(\d+)\.(\d+)/);
+my $VERSION = sprintf("%d.%02d", q$Revision: 1.2 $ =~ /(\d+)\.(\d+)/);
 
 # ================================================================= SUBROUTINES
 
@@ -57,8 +57,17 @@ sub view_NSDLnetwork_results {
 
 # ----------------------------------- GATEWAY->view_NSDLnetwork_metadata_record
 sub view_NSDLnetwork_metadata_record {
-# Not yet implemented
-# Need to specifically characterize INPUT arguments and OUTPUT data
+# Not yet fully implemented
+    my ($id)=@_;
+    unless (-e '/home/gateway/'.$id) {
+	die('Cannot open /home/gateway/'.$id."\n");
+    }
+    my $tr=new XML::Xalan::Transformer(); # or something
+    # set up xsl
+    # set up xml
+    # process
+    undef($tr);
+    return ($ref);
 }
 
 # ---------------------------------------- GATEWAY->access_NSDLnetwork_resource