B0500690 ParseTextString skip the NULL column/field

writing a simple UBE to read the txt file ( with ; as delimiter ).  But some of the column/field ( separated by ;  like CSV file ) may or may not NULL. The B0500690 skip field if the field is NULL.

005    Fetch Next Line from Flat File

           PO szImportFilename_AFTLPATH -> BF szFlatFileName

           VA rpt_iGenericLong_GENLNG <> BF idFilePtr

           VA rpt_szFileInputString_PRSTR <- BF szFlatFileRecord

           "1024" -> BF mnRecordLength

0006    If VA rpt_iGenericLong_GENLNG is not equal to <Null>

0007       Parse Text String

              VA rpt_szFileInputString_PRSTR -> BF szInputText

              VA rpt_szWorkString1_DS40 <- BF szOutputObjectSegment

               2 -> BF mnSegmentNumber

              ';' -> BF cDelimiter