Anil

I want help in converting the code below in visual basic to visual foxpro.


Dim LD As TLedger
Dim TM As New TMasters
Dim TC As New TLCore

If TC.IsTallyRunning(sServer) = True Then
LD.Name_ = "My New Ledger"
LD.Parent_ = "Sundry Creditors"
LD.ExciseLedgerClassification_ = "Default"
LD.IsBillwiseOn_ = "Yes"
LD.IsCostCentresOn_ = "No"
LD.IsInterestOn_ = "No"
LD.AllowInMobile_ = "No"
LD.IsCondensed_ = "No"
LD.AffectsStock_ = "No"
LD.ForPayroll_ = "No"
LD.InterestOnBillwise_ = "No"
LD.OverrideInterest_ = "No"
LD.OverrideAdvInterest_ = "No"
LD.UseForVAT_ = "No"
LD.IgnoreTDSExempt_ = "No"
LD.IsTCSApplicable_ = "No"
LD.IsTDSApplicable_ = "No"
LD.IsFBTApplicable_ = "No"
LD.IsGSTApplicable_ = "No"
s = TM.XLedger_90(sCurrentCompany, LD, "Alter")
Else
MsgBox "Please check whether Tally is running."
End If