Read file

[leeamiin]

Hi,

i need help with bellow file format, i work for telecom company and i'm the developer,
what i need help with is to read file with bellow format, as you can see the file has { and , as separation delimiter.

each line of bellow data is a cell together are one row

value CallEventRecord ::= moCallRecord :
{ recordType moCallRecord,
servedIMSI ‘64001260000010F1’H,
servedIMEI ‘6400779400978000’H,
servedMSISDN ‘91683109710010F1’H,
calledNumber ‘8163505411’H,
translatedNumber ‘A163505411’H,
recordingEntity ‘916831091000F1’H,
mscIncomingTKGP tkgpNumber : 1200,
mscOutgoingTKGP tkgpNumber : 1,
location
{
locationAreaCode ‘0001’H,
cellId ‘0001’H
},
basicService teleservice : ‘11’H,
transparencyIndicator nonTransparent,
msClassmark ‘200081’H,
seizureTime ‘0511251826522D080000’H,
answerTime ‘0511251826582D080000’H,
releaseTime ‘0511251827182D080000’H,
callDuration 20,
radioChanUsed fullRate,
causeForTerm normalRelease,
diagnostics manufacturerSpecificCause: 16,
callReference 67108908,
recordExtensions
{
{ identifier { 1 3 12 2 1006 53 2 5 0 },
information MOCallRecordExtensionType :
{ bSCIdOfFirstBSC 2061
}
}
},
speechVersionUsed ‘01’H,
systemType gERAN
}

expacted result is,

moCallRecord,moCallRecord,64001260000010F1,6400779 400978000, etc ..

i'm using
1. OS=Windows
2. Development platform=Visual studio 201o
3. Code =VB.NET

i hope you could help or Guide to read the data in row and column style,
if you need more clarification let me know.

Thank you.