Select Code to Download

Select or download this

16-12-2005 14:51: INFO: DATADUMPER: Displaying sent message queue
$VAR1 = 'INFO-3-send';
...
          '54' => '1'
        };

Select or download this

      my $sc = scalar(%messagerecbin);
      &writelog(1,"Message rec bin = $sc ");
      foreach my $file (keys %messagerecbin) {
           if($debug){&writelog(1,"DEBUG: sqlloader_rt: receive Messag
+ebin{$file} message: Loading sql below.");}
   }

Select or download this

16-12-2005 14:51: Message rec bin = 2/8
16-12-2005 14:51: DEBUG: sqlloader_rt: receive Messagebin{INFO-3-send}
+ message: Loading sql below.
...
16-12-2005 14:51: DEBUG: sqlloader_rt: receive Messagebin{RT-2-send} m
+essage: Loading sql below.
16-12-2005 14:51: DEBUG: sqlloader_rt: receive Messagebin{FGH-1-send} 
+message: Loading sql below.