diff --git a/borrwraper.pl b/borrwraper.pl
index 141a741..f025564 100755
--- a/borrwraper.pl
+++ b/borrwraper.pl
@@ -11,7 +11,8 @@ use C4::Circulation::Borrower;
 my %env = (
   branchcode => $ARGV[0], usercode => $ARGV[1], proccode => "lgon", borrowernumber => "",
   logintime  => "", lasttime => "", tempuser => "", debug => "9",
-  telnet => $ARGV[2], queue => $ARGV[3], printtype => $ARGV[4], brdata => $ARGV[5]
+  telnet => $ARGV[2], queue => $ARGV[3], printtype => $ARGV[4], brdata => $ARGV[5],
+  bcard=>$ARGV[6]  
       );
 my ($env) = \%env;                                                                  
   startint();
diff --git a/issuewrapper.pl b/issuewrapper.pl
index 705dcc7..876125b 100755
--- a/issuewrapper.pl
+++ b/issuewrapper.pl
@@ -4,9 +4,10 @@
 
 $done = "Issues";                                                                
 my $i=0;
+my $bcard;
 while ($done eq "Issues") {                                                      
-  my @args=('./borrwraper.pl',@ARGV);
-  eval{system(@args)};
+  my @args=('./borrwraper.pl',@ARGV,$bcard);
+  eval{$bcard=system(@args)};
   $exit_value  = $? >> 8;
   if ($exit_value){
     $done=$exit_value;