Convert To Cobol

[Neil_Willby]

Hi,

Can any one advise how to convert the following code to Visual Cobol, thanks.

(Please see attached file for the full code)

Private FmdToVerify As List(Of Fmd) = New List(Of Fmd)

 vResult = Comparison.Identify(result3.Data, 0, getFmdToVerify, 21474, 5)

Public ReadOnly Property getFmdToVerify() As List(Of Fmd)
Get
Return FmdToVerify
End Get

End Property

[Neil_Willby]

Specifically I need to know how to convert this section?

Public ReadOnly Property getFmdToVerify() As List(Of Fmd)

Get

   Return FmdToVerify

End Get

So this line of code works:-

vResult = Comparison.Identify(result3.Data, 0, getFmdToVerify, 21474, 5)

I have already converted this line:-

Private FmdToVerify As List(Of Fmd) = New List(Of Fmd)

to

01 FmdToVerify type System.Collections.Generic.List[type DPUruNet.Fmd].

And this line:-

vResult = Comparison.Identify(result3.Data, 0, getFmdToVerify, 21474, 5)

to

set vResult = type DPUruNet.Comparison::Identify(result3::Data, 0, getFmdToVerify, 21474, 5)

But I dont know how to convert "getFmdToVerify" bit.

Is there any one that can assist pls.

[lanter-edv_ch · Accepted solution]

Can you try this:

      property-id getFmdToVerify type System.Collections.Generic.List[type DPUruNet.Fmd].

      getter.

          set property-value to FmdToVerify

      end property.

Freundliche Grüsse

Werner Lanter

[Neil_Willby]

Thanks Werner thats worked a treat.

Could you pls advise how to terminate a background thread and also close the form so it doesnt error?

Ive used

                  invoke ws-nThread::Abort()

                  invoke self::Close()

But I get an IDE error:-

"Cross-thread operation not valid: Control 'frmVerify' accessed from a thread other than the thread it was created on."