Skip to main content

C# code to parse an x9.37 file

The following C# code will parse an X937 file (Image Cash Letter) and get the amounts of each check

// BigEndianBitConverter class taken from http://www.yoda.arachsys.com/csharp/miscutil/

        // ConvertEBCDICtoASCII method taken from http://kseesharp.blogspot.com/2007/12/convert-ebcdic-to-ascii.html

        static void Main(string[] args)

        {

            var input = new BinaryReader(new FileStream("YourICLFile.icl",FileMode.Open));

            byte[] amount_bytes, record_type_bytes;

            byte[] record_lenght_bytes = input.ReadBytes(4);

            var converter = new BigEndianBitConverter();

            int record_lenght = converter.ToInt32(record_lenght_bytes,0);

            string record_type, amount_str;

 

            //Totals

            long check_items= 0, total_amount = 0;

            try

            {

 

                while (true)

                {

                    //Get record type

                    record_type_bytes = input.ReadBytes(2);

                    record_type = ConvertEBCDICtoASCII(record_type_bytes);

                    if (record_type == "99") //file control (end of file)

                        break;

 

                    if (record_type == "25") //check detail

                    {

                        check_items++;

                        input.ReadBytes(45); //move the stream's position to the field containing the amount of the check

                        amount_bytes = input.ReadBytes(10);

                        amount_str = ConvertEBCDICtoASCII(amount_bytes);

                        Console.Out.WriteLine(check_items);

                        Console.Out.WriteLine("$ " + amount_str);

                        total_amount += long.Parse(amount_str);

                        input.ReadBytes(record_lenght - (2 + 45 + 10)); //move the stream's position to the next record

                    }

                    else

                    {

                        input.ReadBytes(record_lenght - 2); //move the stream's position to the next record

                    }

                   

 

                    //Get next record's size

                    record_lenght_bytes = input.ReadBytes(4);

                    record_lenght = converter.ToInt32(record_lenght_bytes, 0);

                }

            }

            catch (EndOfStreamException end)

            {

 

            }

            finally

            {

                input.Close();

            }

 

            Console.Out.WriteLine("Number of items: " + check_items);

            Console.Out.WriteLine("$ " + ((decimal)total_amount / (decimal)100));

            Console.ReadLine();

        }

Please note that the code above is for demonstration purposes, you can optimize the reading of the file by using File.OpenRead.

Comments

Anonymous said…
Hi, thank you for your post. Can you tell me how you got past the fact that the ConvertEBCDICtoASCII function requires a string argument, you are passing "record_type_bytes" which is of 'byte[]' type.
Thanks again
Juan Pablo said…
Just change the strEBCDICString parameter to be byte[]. Then change the lines of the method to use the array instead of a string. E.g.: instead of Convert.ToChar(strEBCDICString.Substring(i, 1)) you should be able to do something like this: (char)strEBCDICString[i].
Anonymous said…
Hi I want help on this. Anybody here to help

Popular posts from this blog

Powershell script for converting JPG to TIFF

The following Powershell script will convert a batch of JPEG files to TIFF format: #This Code is released under MIT license [System.Reflection.Assembly]::LoadWithPartialName("System.Drawing") $files_folder = 'C:\path-where-your-jpg-files-are\' $pdfs = get-childitem $files_folder -recurse | where {$_.Extension -match "jpg"} foreach($pdf in $pdfs) { $picture = [System.Drawing.Bitmap]::FromFile( $pdf.FullName ) $tiff = $pdf.FullName.replace('.PDF','').replace('.pdf','').replace('.jpg','').replace('.JPG','') + '.tiff' $picture.Save($tiff) }

Power Automate: SFTP action "Test connection failed"

When I added an SFTP create file action to my Power Automate flow ( https://flow.microsoft.com ) , I got the following error in the action step, within the designer: "Test connection failed" To troubleshoot the Power Automate connection, I had to: go the Power Automate portal then "Data"->"Connections"  the sftp connection was there, I clicked on the ellipsis, and entered the connection info It turns out, that screen provides more details about the connection error. In my case, it was complaining that "SSH host key finger-print xxx format is not supported. It must be in 'MD5' format". I had provided the sha fingerprint that WinScp shows. Instead, I needed to use the MD5 version of the fingerprint. To get that, I had to run in command line (I was in a folder that had openssh in it): ssh -o FingerprintHash=md5 mysftpsite.com To get the fingerprint in MD5 format. I took the string (without the "MD5:" part of the string) and put

Alert if file missing using Powershell

The following Powershell script can be used to send an email alert when a file is missing from a folder or it is the same file from a previous check: $path_mask = "yourfile_*.txt" $previous_file_store = "lastfileread.txt" $script_name = "File Check" ###### Functions ########## Function EMailLog($subject, $message) {    $emailTo = "juanito@yourserver.com"    $emailFrom = "alert@yourserver.com"    $smtpserver="smtp.yourserver.com"       $smtp=new-object Net.Mail.SmtpClient($smtpServer)    $smtp.Send($emailFrom, $emailTo, $subject, $message) } Try {    #get files that match the mask    $curr_file = dir $path_mask |  select name    if ($curr_file.count -gt 0)    {        #file found        #check if the file is different from the previous file read        $previous_file = Get-Content $previous_file_store        $curr_file_name = $curr_file.Item(0).Name        if ($