Sir I face some problem in my report.I have created lici policy number wise ledger in group "LICI PREMIUM" Which is belongs to group capital account.I created udf in those lici ledger and getting values from those ledger in my report. all fields r working perfectly except the field "MypayDate" and "Licpayby".In this fields I want to show policy pament date and from which bank account that particular policy paid by. Pls sir anybody help me. Here is my code. ;;TDL Developed by Sattam Chakraborty [#Part: MST LED Explode Capital] Add:Line:AtEnd:Agent,AssuredPerson,SumAssured,dateofcomm,dateofmatu,Premium,modeof pay,Duedate [Line:Agent] Field:Long Prompt,Agent Local:Field:Long Prompt:Set as:"Agent Name" Invisible: $Parent!="LICI PREMIUM" [Line:AssuredPerson] Field:Long Prompt,AssuredPerson Local:Field:Long Prompt:Set as:"Policy Holder Name" Invisible: $Parent!="LICI PREMIUM" [Line:SumAssured] Field:Long Prompt,SumAssured Local:Field:Long Prompt:Set as:"Sum Assured" Invisible: $Parent!="LICI PREMIUM" [Line:dateofcomm] Field:Long Prompt,dateofcomm Local:Field:Long Prompt:Set as:"Date of Commence" Invisible: $Parent!="LICI PREMIUM" [Line:dateofmatu] Field:Long Prompt,dateofmatu Local:Field:Long Prompt:Set as:"Date of Maturity" Invisible: $Parent!="LICI PREMIUM" [Lineremium] Field:Long Prompt,Premium Local:Field:Long Prompt:Set as:"Premium Amount" Invisible: $Parent!="LICI PREMIUM" [Line:modeofpay] Field:Long Prompt,modeofpay Local:Field:Long Prompt:Set as:"Mode of Payment" Invisible: $Parent!="LICI PREMIUM" [Lineuedate] Field:Long Prompt,Duedate Local:Field:Long Prompt:Set as:"Due Time of Payment" Invisible: $Parent!="LICI PREMIUM" [Field:Agent] Use:Name Field Storage : Agent [Field:AssuredPerson] Use:Name Field Storage : AssuredPerson [Field:SumAssured] Use:Amount Field Storage :SumAssured Width:10 [Field:dateofcomm] Use:Uni Date Field Storage : dateofcomm Width:10 [Field:dateofmatu] Use:Uni Date Field Storage : dateofmatu Width:10 [Fieldremium] Use:Amount Field Storage remium Width:10 [Field:modeofpay] Use:Name Field Storage : modeofpay [Fielduedate] Use:Name Field Storage : Duedatelic [System : UDF] Agent :String : 2001 AssuredPerson : String : 2002 SumAssured : Amount : 2001 dateofcomm: Date: 2001 dateofmatu : Date : 2002 Premium : Amount : 2002 modeofpay : String : 2003 Duedatelic : String : 2004 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; [#Menu:Gate Wayof Tally] Add:Item:LICI Details Reportisplay:LICI Details Report [Report : LICI Details Report] ;Use : DSP Template Variable : SVFromDate, SVToDate Set : SVfromDate : ##SVDate Set : SVToDate : ##SVCurrentDate Form : LICI Details Report [Form : LICI Details Report] Parts : DSp Company Name,DSp Company Address ;Use : DSP Template Height : 100% Screen Width : 100% Screen BackGround : "dark sea green" Space Top : If $$InPrintMode Then 0.5 Else 0 inches Button : PrintButton,F2 ChangePeriod Part :LICI Details Report Tit, LICI Details Report Part [Part : LICI Details Report Tit] Space Bottom : 0.1 inch Line : LICI Details Report Tit Line,LICI Details ReportDate [Line : LICI Details Report Tit Line] Local : Field : Default : Color : "Black" Field : LICI Details Report Tit Field [Field : LICI Details Report Tit Field] Use : Name Field Set as : "LICI DETAILS REPORT" Align : Center Full Width : Yes Style : Large Bold [Line : LICI Details ReportDate] Space Top: 1% page Field : LICI Details ReportFromdt,TooooField,LICI Details ReportTodt [Field : LICI Details ReportFromdt] Use : Date Field Set as : ##SVfromDate Width : 45% Screen Align : Center Style : Normal [Field : TooooField] Use : Name Field Set as : "To" Width : 4% Screen Align : Center Style : Normal [Field : LICI Details ReportTodt] Use : Date Field Set as : ##SVToDate Width : 45% Screen Align : Center Style : Normal [Part : LICI Details Report Part] Line : LICI Details ReportcolumnTitles,LICI Details ReportInfo Repeat : LICI Details ReportInfo : SKC1collection Scroll : Both Common Border : Yes Bottom Line : LICI Details ReportTotals Total : Premiumamt [Line : LICI Details ReportcolumnTitles] Border : Column Titles Fields : SNo1, Policynam, Policiholdnam,Agentnam, Sumass,Datecom,Datemat, Premiumamt,Modepay,Myduedate Right Field:MypayDate,Licpayby Local : Field : SNo1 : Set as : "SNo" Local : Field : Policynam : Set as : "Policy Number" Local : Field : Policiholdnam : Set as : "Policy Holder Name" Local : Field : Agentnam : Set as : "Agent's Name" Local : Field : Sumass : Set as : "Sum Assured" Local : Field : Datecom : Set as : "Date of Commence" Local : Field : Datemat : Set as : "Maturity Date" Local : Field : Premiumamt : Set as : "Premium" Local : Field : Modepay : Set as : "Term" Local : Field : Myduedate : Set as : "Due Date" Local : Field : MypayDate : Set as : "Payment Dt" Local : Field : Licpayby : Set as : "Pay By" Local : Field : Default : Type : String Local : Field : Default : Style : Normal Bold Local : Field : Default : Align : Center [Line : LICI Details ReportInfo] Space Bottom :0.1 Inch Fields : SNo1, Policynam, Policiholdnam,Agentnam, Sumass,Datecom,Datemat, Premiumamt,Modepay,Myduedate Right Field:MypayDate,Licpayby Border : Thin Bottom [Line: LICI Details ReportTotals] Use : LICI Details ReportcolumnTitles Local : Field : SNo1 : Set as: "" Local : Field : Policynam : Set as: "" Local : Field : Policiholdnam : Set as: "" Local : Field : Agentnam : Set as: "" Local : Field : Sumass : Set as: "" Local : Field : Datecom : Set as: "" Local : Field : Datemat : Set as: "Grand Total" Local : Field : Premiumamt : Set as: $$Totalremiumamt Local : Field : Modepay : Set as: "" Local : Field : Myduedate : Set as: "" Local : Field : MypayDate : Set as: "" Local : Field : Licpayby : Set as: "" Local : Field : Default : Color : "Red" [Field : SNo1] Use : Number Field Set as : $$Line Width : 3% Screen Style : Normal Align : Center Border : Thin Left [Field olicynam] Use : Name Field Set as : $Name Width : 15% Screen Style : Normal Border : Thin Left Option : Alter on Enter Alter : Ledger Variable: Ledger Name Display : Ledger Vouchers [Field oliciholdnam] Use : Name Field Set as : $AssuredPerson Width : 7% Screen Style : Normal Border : Thin Left [Field : Agentnam ] Use : Name Field Set as : $Agent Width : 7% Screen Style : Normal Border : Thin Left Right [Field :Sumass] Use : Amount Field Set as : $SumAssured Width : 8% Screen Style : Normal Bold Border : Thin Left Align : Left [Field atecom ] Use : Uni Date Field Set as : $dateofcomm Width : 9% Screen Style : Normal Border : Thin Left Align : Left [Field : Datemat] Use : Uni Date Field Set as : $dateofmatu Width : 8% Screen Style : Normal Border : Thin Left [Field : Premiumamt ] Use : Amount Field Set as : $Premium Width : 6% Screen Style : Normal Bold Border : Thin Left [Field :Modepay] Use : Name Field Set as : $modeofpay Width : 6% Screen Style : Normal Border : Thin Left [Field :Myduedate] Use : Name Field Set as : $Duedatelic Width : 8% Screen Style : Normal Border : Thin Left [Field :MypayDate] Use : Uni Date Field Set as : $Date Width : 8% Screen Style : Normal Border : Thin Left [Field : Licpayby ] Use : Name Field Set as : $LedgerName Width : 15% Screen Style : Normal Border : Thin Left Right [Collection : SKC1collection] Collection:SKC2collection,Licvchs [Collection:Licvchs] Type : Vouchers : group Childof : "LICI PREMIUM" Filter : Rctvchs Fetch : Ledger, Date, BankName [Collection:SKC2collection] Type : Ledger Child Of : "LICI PREMIUM" ;Filter : SKC1Filter Belongs To : Yes [System : Formula] ;SKC1Filter : ? Rctvchs : $$IsPayment:$VoucherTypeName ;; EOF ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;TDL Developed by Sattam Chakraborty [#Part: MST LED Explode Capital] Add:Line:AtEnd:Agent,AssuredPerson,SumAssured,dateofcomm,dateofmatu,Premium,modeofpay,Duedate [Line:Agent] Field:Long Prompt,Agent Local:Field:Long Prompt:Set as:"Agent Name" Invisible: $Parent!="LICI PREMIUM" [Line:AssuredPerson] Field:Long Prompt,AssuredPerson Local:Field:Long Prompt:Set as:"Policy Holder Name" Invisible: $Parent!="LICI PREMIUM" [Line:SumAssured] Field:Long Prompt,SumAssured Local:Field:Long Prompt:Set as:"Sum Assured" Invisible: $Parent!="LICI PREMIUM" [Line:dateofcomm] Field:Long Prompt,dateofcomm Local:Field:Long Prompt:Set as:"Date of Commence" Invisible: $Parent!="LICI PREMIUM" [Line:dateofmatu] Field:Long Prompt,dateofmatu Local:Field:Long Prompt:Set as:"Date of Maturity" Invisible: $Parent!="LICI PREMIUM" [Lineremium] Field:Long Prompt,Premium Local:Field:Long Prompt:Set as:"Premium Amount" Invisible: $Parent!="LICI PREMIUM" [Line:modeofpay] Field:Long Prompt,modeofpay Local:Field:Long Prompt:Set as:"Mode of Payment" Invisible: $Parent!="LICI PREMIUM" [Lineuedate] Field:Long Prompt,Duedate Local:Field:Long Prompt:Set as:"Due Time of Payment" Invisible: $Parent!="LICI PREMIUM" [Field:Agent] Use:Name Field Storage : Agent [Field:AssuredPerson] Use:Name Field Storage : AssuredPerson [Field:SumAssured] Use:Amount Field Storage :SumAssured Width:10 [Field:dateofcomm] Use:Uni Date Field Storage : dateofcomm Width:10 [Field:dateofmatu] Use:Uni Date Field Storage : dateofmatu Width:10 [Fieldremium] Use:Amount Field Storage remium Width:10 [Field:modeofpay] Use:Name Field Storage : modeofpay [Fielduedate] Use:Name Field Storage : Duedatelic [System : UDF] Agent :String : 2001 AssuredPerson : String : 2002 SumAssured : Amount : 2001 dateofcomm: Date: 2001 dateofmatu : Date : 2002 Premium : Amount : 2002 modeofpay : String : 2003 Duedatelic : String : 2004 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; [#Menu:Gate Wayof Tally] Add : Item : L.I.C.I.Basic Information : Display : L.I.C.I.Basic Info Add : Item : Blank Add : Item : L.I.C.I.Payment Information : Display : L.I.C.I.Payment Info Add : Item : Blank ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; [Report : L.I.C.I.Basic Info] ;Use : DSP Template Variable : SVFromDate, SVToDate Set : SVfromDate : ##SVDate Set : SVToDate : ##SVCurrentDate Form : L.I.C.I.Basic Info [Form : L.I.C.I.Basic Info] Parts : DSp Company Name,DSp Company Address ;Use : DSP Template Height : 100% Screen Width : 100% Screen BackGround : "pink" Space Top : If $$InPrintMode Then 0.5 Else 0 inches Button : PrintButton,ExportButton,F2 ChangePeriod,FilterButton Part : PolicyInformation Tit, PolicyInformationpart [Part : PolicyInformation Tit] Space Bottom : 0.1 inch Line : PolicyInformation Tit Line,PolicyInformationDate [Line : PolicyInformation Tit Line] Local : Field : Default : Color : "Black" Field : PolicyInformation Tit Field [Field : PolicyInformation Tit Field] Use : Name Field Set as : "LICI BASIC INFORMATION REPORT" Align : Center Full Width : Yes Style : Large Bold [Line : PolicyInformationDate] Space Top: 1% page Field : LICI Details ReportFromdt,TooooField,LICI Details ReportTodt [Field : LICI Details ReportFromdt] Use : Date Field Set as : ##SVfromDate Width : 45% Screen Align : Center Style : Normal [Field : TooooField] Use : Name Field Set as : "To" Width : 4% Screen Align : Center Style : Normal [Field : LICI Details ReportTodt] Use : Date Field Set as : ##SVToDate Width : 45% Screen Align : Center Style : Normal [PartolicyInformationpart] Line : LICI Details ReportcolumnTitles,LICI Details ReportInfo Repeat : LICI Details ReportInfo : SKC1collection Scroll : Both Common Border : Yes Bottom Line : LICI Details ReportTotals Total : Premiumamt [Line : LICI Details ReportcolumnTitles] Border : Column Titles Fields : SNo1, Policynam, Policiholdnam,Agentnam, Sumass,Datecom,Datemat, Premiumamt,Modepay,Myduedate Local : Field : SNo1 : Set as : "SNo" Local : Field : Policynam : Set as : "Policy Number" Local : Field : Policiholdnam : Set as : "Policy Holder Name" Local : Field : Agentnam : Set as : "Agent's Name" Local : Field : Sumass : Set as : "Sum Assured" Local : Field : Datecom : Set as : "Date of Commence" Local : Field : Datemat : Set as : "Maturity Date" Local : Field : Premiumamt : Set as : "Premium" Local : Field : Modepay : Set as : "Term" Local : Field : Myduedate : Set as : "Due Date" Local : Field : Default : Type : String Local : Field : Default : Style : Normal Bold Local : Field : Default : Align : Center [Line : LICI Details ReportInfo] Space Bottom :0.1 Inch Fields : SNo1, Policynam, Policiholdnam,Agentnam, Sumass,Datecom,Datemat, Premiumamt,Modepay,Myduedate Border : Thin Bottom [Line: LICI Details ReportTotals] Use : LICI Details ReportcolumnTitles Local : Field : SNo1 : Set as: "" Local : Field : Policynam : Set as: "" Local : Field : Policiholdnam : Set as: "" Local : Field : Agentnam : Set as: "" Local : Field : Sumass : Set as: "" Local : Field : Datecom : Set as: "" Local : Field : Datemat : Set as: "Grand Total" Local : Field : Premiumamt : Set as: $$Totalremiumamt Local : Field : Modepay : Set as: "" Local : Field : Myduedate : Set as: "" Local : Field : Default : Color : "Red" [Field : SNo1] Use : Number Field Set as : $$Line Width : 4% Screen Style : Normal Align : Center Border : Thin Left [Field olicynam] Use : Name Field Set as : $Name Width : 21% Screen Style : Normal Border : Thin Left Option : Alter on Enter Alter : Ledger Variable: Ledger Name Display : Ledger Vouchers [Field oliciholdnam] Use : Name Field Set as : $AssuredPerson Width : 10% Screen Style : Normal Border : Thin Left [Field : Agentnam ] Use : Name Field Set as : $Agent Width : 10% Screen Style : Normal Border : Thin Left Right [Field :Sumass] Use : Amount Field Set as : $SumAssured Width : 10% Screen Style : Normal Bold Border : Thin Left Align : Left [Field atecom ] Use : Uni Date Field Set as : $dateofcomm Width : 10% Screen Style : Normal Border : Thin Left Align : Left [Field : Datemat] Use : Uni Date Field Set as : $dateofmatu Width : 10% Screen Style : Normal Border : Thin Left [Field : Premiumamt ] Use : Amount Field Set as : $Premium Width : 7% Screen Style : Normal Bold Border : Thin Left [Field :Modepay] Use : Name Field Set as : $modeofpay Width : 8% Screen Style : Normal Border : Thin Left [Field :Myduedate] Use : Name Field Set as : $Duedatelic Width : 10% Screen Style : Normal Border : Thin Left Right ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; [Report : L.I.C.I.Payment Info] ;Use : DSP Template Variable : SVFromDate, SVToDate Set : SVfromDate : ##SVDate Set : SVToDate : ##SVCurrentDate Form : L.I.C.I.Payment Info [Form : L.I.C.I.Payment Info] Parts : DSp Company Name,DSp Company Address ;Use : DSP Template Height : 100% Screen Width : 100% Screen BackGround : "Sky Blue" Space Top : If $$InPrintMode Then 0.5 Else 0 inches Button : PrintButton,F2 ChangePeriod,FilterButton Part : paymentinfo Tit, paymentinfopart [Part : paymentinfo Tit] Space Bottom : 0.1 inch Line : paymentinfo Tit Line,PolicyInformationDate [Line : paymentinfo Tit Line] Local : Field : Default : Color : "Black" Field : paymentinfo Tit Field [Field : paymentinfo Tit Field] Use : Name Field Set as : "LICI PAYMENT INFORMATION REPORT" Align : Center Full Width : Yes Style : Large Bold [Partaymentinfopart] Line : paymentinfopartcolumnTitles,paymentinfopart Repeat : paymentinfopart: Licvchs Scroll : Both Common Border : Yes Bottom Line : paymentinfopartTotals Total : LicpayAmt [Line : paymentinfopartcolumnTitles] Border : Column Titles Fields:SNo1, Policynam1,MypayDate,Licpaymode,Lic chqno,LicpayAmt,Licpayby,Licnarr Local : Field : SNo1 : Set as : "SNo" Local : Field : Policynam1 : Set as : "Policy Number" Local : Field : MypayDate : Set as : "Payment Date" Local : Field : Licpaymode : Set as : "Cash/Bank" Local : Field : Lic chqno : Set as : "Cheque No" Local : Field : LicpayAmt : Set as : "Amount" Local : Field : Licpayby : Set as : "Payment By Account" Local : Field : Licnarr : Set as : "Particulars" Local : Field : Default : Type : String Local : Field : Default : Style : Normal Bold Local : Field : Default : Align : Center [Line : paymentinfopart] Space Bottom :0.1 Inch Fields:SNo1, Policynam1,MypayDate,Licpaymode,Lic chqno,LicpayAmt,Licpayby,Licnarr Border : Thin Bottom [Line: paymentinfopartTotals] Use : paymentinfopartcolumnTitles Local : Field : SNo1 : Set as : "" Local : Field : Policynam1 : Set as : "" Local : Field : MypayDate : Set as : "" Local : Field : Licpaymode : Set as : "" Local : Field : Lic chqno : Set as : "Total Premium Paid" Local : Field : LicpayAmt : Set as : $$Total:LicpayAmt Local : Field : Licpayby : Set as : "" Local : Field : Licnarr : Set as : "" Local : Field : Default : Color : "Red" [Field : Policynam1 ] Use : Name Field Set as : $LedgerName Width : 15% Screen Style : Normal Border : Thin Left Right Option : Alter on Enter Alter : Ledger Variable: Ledger Name Display : Ledger Vouchers [Field :MypayDate] Use : Uni Date Field Set as : $Date Width : 7% Screen Style : Normal Border : Thin Left [Field : Licpaymode ] Use : Name Field Set as : $VoucherTypeName Width : 10% Screen Style : Normal Border : Thin Left [Field : Lic chqno ] Use : Name Field Set as : $Voucher Number Width : 10% Screen Style : Normal Border : Thin Left Align:Centre [Field : LicpayAmt] Use : Amount Field Set as : $Amount Width : 7% Screen Style : Normal Bold Border : Thin Left [Field : Licpayby ] Use : Name Field Set as : $BankName Width : 16% Screen Style : Normal Border : Thin Left [Field : Licnarr ] Use : Name Field Set as : $Narration Width : 31% Screen Style : Normal Border : Thin Left Right ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; [Collection:Licvchs] Type : Vouchers : group Childof : "LICI PREMIUM" Belongs To : Yes Fetch : Narration, Ledger, Date, DueDateOfPymt, Amount,BankName [Collection:SKC1collection] Type : Ledger Child Of : "LICI PREMIUM" Belongs To : Yes ;; EOF ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1) Create a Group LICI PREMIUM Under Capital Account. 2) Create Ledger with name and policy number under this group LICI PREMIUM 3) At last fill the required field when create ledger in ledger master. Then You will see the report
Dear Sattamji, It is working under the capital account. How should it be used under Investments head. Kindly reply
Just Change [#Part: MST LED Explode Capital] TO this.............. [#Part: MST LED Details] Just remember...Sub Group under Investments should be named ----- "LICI Premium".....
Dear Amit Kamdar, Under LICI Premium sub-group in Investment Group, I have number of Sub Groups. I have changed from [#Part: MST LED Explode Capital] TO this.............. [#Part: MST LED Details] but the already created ledgers not showing the LIC details to alter. Please help.
Hi...do you mind if I re-work your code to make it a better one.... Hi, I suggest you do not have any sub-group under LICI Premium..... you can change the group name to something else, if you so fancy....just change the new group name in the TDL file. After changing the ledgers to this group....go to ledger alterations and feed in the relevant details. then it will show.
[System : Formula] GroupHead : "Insurance Policies" ... Here you can have any name you wish to have......... Insert above two lines after [#Part: MST LED Details] Then Change all .... "Invisible....." lines with this ---->>> Invisible : $Parent! = @@GroupHead Then it will be DYNAMIC ......
FULL Workable Code..... Both reports combined into one...... from one report, you can go to other report. Use this attached file. Ignore all earlier codes posted..... Happy Tallying.....
Dear Amit Kamdar, Congratulations Sir. This is code I am looking for several years. You have done a great job. In your amazing new code, policies under the sub- group under Insurance Policies main group, default details are not asking for. But, if I alter into "Insurance Policies" head, then the details are asking. Please help to rectify this problem. Thanks in advance.
Dear Amit Kamdar, Congratulations Sir. This is code I am looking for several years. You have done a great job. In your amazing new code, policies under the sub- group under Insurance Policies main group, default details are not asking for. But, if I alter into "Insurance Policies" head, then the details are asking. Please help to rectify this problem. Thanks in advance.