How... Grand Total of Sub Total of multiple Lines

Dear Experts
i have sub totals values
i want calculate Grand Total of that Sub totals.

please help on this topic.
Thanks & Regards
kapil

 

Is there some one Expert ?

 

Please reply

 

Thanks Masters,
my code are given below for your kind consideration.
and what i do in report is that i explode the cost centre with vouchers and subtotal that vouchers, now i want grant total of that cost centre's subtotal.

i hope when there is subtotal function facility available then there will be grand total also.
Regards,
Kapil

Code:

[Part:         K012PartDataCC]
Line:         K012PartDataCCLine,
Repeat:         K012PartDataCCLine:     K012CostCentreColl
BottomLine:     K012PartDataTotalLine
total:        K012FieldAmount1
Total:        K012FieldAmount2
total:        K012FieldAmount3
Scroll:         vertical
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding


[Line:         K012PartDataCCLine]
Field:         K012FieldSNo, K012FieldCode, K012FieldCCBudgetLine, K012FieldCCBudgetLine1, K012FieldCCProjectName,
Right Field:    K012FieldVchType, K012FieldVchVNo, K012FieldAmount1, K012FieldAmount2, K012FieldAmount3
;Remove if:      (if ##K012BValue then $$IsEmpty:$CCAmount else "")
removeif:    $$IsExploded
Space Top:         0.4
Explode:     K012PartExplodeVouchers:     if $$IsEmpty:#ShortNameField then NO else ($$KeyExplode or ##ExplodeFlag)
key:            RemoveLine, Restore Line, Restore AllLines
local:        field:    Default:                FORMAT:        "Bracketed:ForNegative,NoZero"
local:        field:    Default:                Style:        TinyBold
local:        field:    K012FieldSNo:            color:        Black
local:        field:    K012FieldCode:            color:        Blue
local:        field:    K012FieldVchVNo:        info:        ""
Border:         K012ThickBottom

[Part:         K012PartExplodeVouchers]
Line:         K012PartExplodeVouchersLine
Repeat:         K012PartExplodeVouchersLine:         K012CCVoucherLoopColl
Scroll:         vertical
BottomLine:     K012PartDataSubTotalLine
total:        K012FieldCCVchAmount
total:        K012FieldAmount1
total:        K012FieldAmount3
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[Line:         K012PartExplodeVouchersLine]
Field:         K012FieldSNo, K012FieldVchDate, K012FieldVchCCName, K012FieldVchLN, K012FieldCCProjectName,
RightField:     K012FieldVchType, K012FieldVchVNo, K012FieldAmount1, K012FieldCCVchAmount,  K012FieldAmount3, VID
Remove if:     #K012FieldVchCCName != #K012FieldCCBudgetLine
;Key:            VchAlter
local:        field:        Default:                FORMAT:        "Bracketed:ForNegative,NoZero"
local:        field:        Default:                Style:        Tiny
local:        field:        K012FieldSNo:            color:        StoneWashRed
local:        field:        K012FieldSNo:            indent:        1
local:        field:        K012FieldCCProjectName:    setas:        ""
border:        K012ColumnTitlesBottom
Space Top:     0.02
Option:         AlterOnEnter:     $$IsVoucher

[Line:         K012PartDataSubTotalLine]
Field:         K012FieldSNo, K012FieldVchDate, K012FieldVchCCName, K012FieldVchLN, K012FieldCCProjectName
Right Field:    K012FieldVchType, K012FieldVchVNo, K012FieldAmount1, K012FieldCCVchAmount, K012FieldAmount3
BORDER:        Totals
Local:         Field:     Default:                 FORMAT:        "Bracketed:ForNegative,NoZero"
Local:         Field:     Default:                 color:        Blue
Local:         Field:     Default:                 style:        TinyBold
Local:         Field:     K012FieldSNo:            Info:        ""
Local:         Field:     K012FieldVchDate:        info:         "Sub Total"
Local:         Field:     K012FieldVchCCName:    info:         ""
Local:         Field:     K012FieldVchLN:        setas:         ""
Local:         Field:     K012FieldCCProjectName:    info:        ""
Local:         Field:     K012FieldVchType:        info:         ""
Local:         Field:     K012FieldVchVNo:        info:         ""
local:        field:    K012FieldAmount1:        Setas:        $$AsCrAmt:@@CCBAmt
Local:         Field:     K012FieldCCVchAmount:     SetAs:         $$SubTotal:K012FieldCCVchAmount
local:        field:    K012FieldAmount3:        setas:        $$AsCrAmt:$$NettAmount:#K012FieldAmount1:#K012FieldCCVchAmount


[Line:         K012PartDataTotalLine]
Field:         K012FieldSNo, K012FieldVchDate, K012FieldVchCCName, K012FieldVchLN, K012FieldCCProjectName
Right Field:    K012FieldVchType, K012FieldVchVNo, K012FieldAmount1, K012FieldAmount2, K012FieldAmount3
BORDER:        Totals
Local:         Field:     Default:                 FORMAT:        "Bracketed:ForNegative,NoZero"
Local:         Field:     Default:                 color:        Blue
Local:         Field:     Default:                 style:        TinyBold
Local:         Field:     K012FieldSNo:            Info:        ""
Local:         Field:     K012FieldVchDate:        info:         "Grand Total"
Local:         Field:     K012FieldVchCCName:    info:         ""
Local:         Field:     K012FieldVchLN:        info:         ""
Local:         Field:     K012FieldCCProjectName:    info:        ""
Local:         Field:     K012FieldVchType:        info:         ""
Local:         Field:     K012FieldVchVNo:        info:         ""
local:        field:    K012FieldAmount1:        Setas:        ""
Local:         Field:     K012FieldAmount2:         setas:         ""
local:        field:    K012FieldAmount3:        setas:        ""

[Field:         K012FieldCCVchAmount]
Use:             Amount Field
format:        "DrCr"
Set as:         $$AsDrAmt:$VchCCAmount
Style:        Tiny
color:        StoneWashRed


[Field:         K012FieldAmount1]
Use:             Amount Field
format:        "DrCr"
invisible:    if ##K012BValue then yes else no


[Field:         K012FieldAmount2]
Use:             Amount Field
format:        "DrCr"


[Field:         K012FieldAmount3]
Use:             Amount Field
format:        "DrCr"
invisible:    if ##K012BValue then yes else no

[Button:     K012BValue]
Title:         if ##K012BValue then "View B/V" else "Remove B/V"
Key:         Alt + 2
Action:         Set:     K012BValue:     not ##K012BValue
[Variable:     K012BValue]
Type:         Logical
Persistent:     no
[System:     Variable]
K012BValue:     YES

[System:     Formula]
VTFil1            : $VoucherTypeName not Contains "Memorandum"
VTFil2            : $VoucherTypeName not Contains "DELHI- BUDGET"
VTFil3            : NOT $IsCancelled AND NOT $IsDeleted  and not $IsOptional
Smp CC Filter:     $Name = #K012FieldCCBudgetLine
CCNFilter:     $CCPR Contains ##CostCentreName
CCFTFAPR:    Not $$NumChildren>0
CCFA:         IF $Depth=2 THEN $Name ELSE $Parent:CostCentre:@@CCPR
CCPR:         IF $Depth=3 THEN $Name ELSE $Parent:CostCentre:@@CCBL
CCBL:         IF $Depth=4 THEN $Name ELSE $Parent:CostCentre:@@CCSBL
CCSBL:         IF $Depth=5 THEN $Name ELSE $Parent:CostCentre:@@CCSSBL
CCSSBL:         IF $Depth=6 THEN $Name ELSE ""
IsBudVCH:    $VoucherTypeName contains "DELHI- BUDGET"
LocSearchKey:    $Name
CCBAmt:        $$ReportObject:$$CollectionFieldByKey:$CCVAmount:@@LocSearchKey:K012CollectionBA
CCASearchKey:    $CostCentreName
CCAAmt:        $$ReportObject:$$CollectionFieldByKey:$VchCCAmount:@@CCASearchKey:K012LCCollection
CodeName:    $$StringFindAndReplace:$Name:"-":""

[Collection:    K012CollectionBudgetVoucher]
Type:         Voucher
filter:        IsBudVCH
fetch:        MasterID, Date, VoucherNumber, VoucherTypeName,
ParmVar:     SVFromDate:     Date:     $StartingFrom:Company:##SVCurrentCompany
ParmVar:     SVToDate:     Date:     $LastVoucherDate:Company:##SVCurrentCompany

[Collection:    K012CollectionBA]
Source Collection:     K012CollectionBudgetVoucher
Walk:                 AllLedgerEntries, CostCentreAllocations
By:                     Name:        $Name:CostCentre:$Name
searchkey:            $Name
AGGRcompute:        CCVAmount:    Sum:        $Amount

[Collection:     K012CCVoucherLoopColl]
Collection:     K012LCCollection:     K012CompanyColl
Sort:         @@Default:             $$Date:$Date

[Collection:     K012VchOfCostCentre]
Type        : Vouchers : CostCentre
Child of    : ##CostCentreName
Belongs To    : Yes   
filter:        VTFil1, VTFil2, VTFil3
Fetch:         MasterID, Date, LedgerName, VoucherTypeName, VoucherNumber, Amount,

[Collection:     K012LCCollection]
Source Collection    :     K012VchOfCostCentre
Walk         :     AllLedgerEntries, CostCentreAllocations
by            :    Date                :    $Date
By             :     LedgerName        :    $LedgerName    
By             :     CostCentreName    :    $Name:CostCentre:$Name
by            :    Amount            :    $Amount
Compute           :     Date                      : $Date
compute        :    MasterID            : $MasterID
Compute           :     VoucherTypeName    : $VoucherTypeName
Compute           :     VoucherNumber     : $VoucherNumber
Compute           :     Narration             : $().Narration
compute        :    LedNarration        : $CostCentreAllocations.Narration
Compute        :     CCName            : $Name:CostCentre:$Name
AGGRCompute:    VchCCAmount        : SUM:    $Amount
Compute        :     CPName            : $$LoopCollObj:$Name
searchkey    :    $CostCentreName

[Collection:    K012CompanyColl]
type:        Company
Fetch:        Name

[Collection:     K012CostCentreColl]
Type:         Cost Centre
Filter:         CCNFilter, CCFTFAPR
Fetch:         Name, Depth, MasterID, DebitTotals, CreditTotals
compute:    CCAmount:    $$NettAmount:$DebitTotals:$CreditTotals
sort:        Default:        $$Name, $Depth

 

Sir, but k012fieldamount1, k012fieldamount2, k012fieldamount3 does not have any value. Exploded line have subtotal only. I want that's grand total.

 

But it calculates only 1 company cost center.
Can I calculate all loaded companies cost center total.

 

another hint please
trying not find out.
Regards
Kapil

 

Dear Amit ji,
i got a way....
i create resultant collection through looping company.
and aggrcompute of $$netamountebitTotals-CreditTotals.
i get the all loaded companies CostCentre Values.

I conclude The Only way to solution is try try try.
Thanks & Regards,
Kapil

 

Dear Experts,
Need help in below code of cost centre voucher report.
when i remove line of cost centre name it impact it's exploded part's voucher line also remove.
like if i remove 6 no cost centre line number it remove 6 no voucher line number also.
i hope some solution.
Regards,
Kapil

Code:
[Report: K011Report]
option: K011ReportK011: @@IsK011TDLModuleOn
[!Report: K011ReportK011]
Title: $$LocaleString:"SC Cost Centre Voucher Report"
Use: DSP Template
Form: K011Form
Variables: SVCurrentCompany, CostCentreName, SVFromDate, SVToDate,
Variables: IsDayBook, IsLedgerReport, IsCCReport
Set : IsCCReport : Yes
Set : Is Day Book : Yes
set: SVFromDate: $BookFrom:Company:##SVCurrentCompany
set: SVToDate: $$Min@FinYrEnding:$EndingAt:Company:##SVCurrentCompany
Filtered: Yes
Export: Yes
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[Form: K011Form]
Parts: K011PartTitle1, K011PartTitle2, K011PartDataCC
Button: BlankButton1, ExplodeFlag, F2ChangePeriod, ChangeCompany
Button: BlankButton2, K011CostCentre,
BUTTON: BlankButton3, K011BValue, BlankButton5, K011BCode
BUTTON: BlankButton4,RemoveLine, Restore Line, Restore AllLines
width: 100% page
height: 100% page
Page Break: DSP ClPageBreak, K011OpPageBreak
Space Top: if $$InPrintMode then ##SVSpaceTop else 0.05 inches
Space Bottom: if $$InPrintMode then 0.5 else 0 inches
Space Left: if $$InPrintMode AND $$InPixelMode then 0.5 else 0 inches
Space Right: if $$InPrintMode AND $$InPixelMode then 0.25 else 0 inches
;Background: AmberYellow
;Background: LightCyan
;Background: lemonchiffon
;Background: SkyBlueLighter
;Background: Alice Blue
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[Part: K011OpPageBreak]
Parts: K011PartTitle1, DSP ScaleFactor, K011PartTitle2
Vertical: Yes
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[Part: K011PartTitle1]
line: K011PartTitle1Line5, K011PartTitle1Line6, K011PartTitle1Line1, K011PartTitle1Line2, K011PartTitle1Line3, K011PartTitle1Line4
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[line: K011PartTitle1Line5]
Field: SimplePrompt,
local: field: SimplePrompt: info: @@CmpMailName
local: field: SimplePrompt: style: LargeBold
local: field: SimplePrompt: width: 70
local: field: SimplePrompt: color: Black
local: field: SimplePrompt: cell: 4
local: field: SimplePrompt: align: left
local: field: SimplePrompt: Invisible: NOT ($$InPrintMode OR $$InExportMode )
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[line: K011PartTitle1Line6]
Field: NameField
local: field: NameField: info: $$LocaleString:"SC Cost Centre Voucher Report"
local: field: NameField: Style: LargeBold
local: field: NameField: width: 70
local: field: NameField: color: Black
local: field: NameField: cell: 4
local: field: NameField: align: left
local: field: NameField: border: Thin Bottom
local: field: NameField: Invisible: NOT ($$InPrintMode OR $$InExportMode )
Space Bottom: if $$InPrintMode then 0.5 else 0
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[line: K011PartTitle1Line1]
Field: SimplePrompt, NameField
local: field: SimplePrompt: SET AS: "Fund Type :"
local: field: SimplePrompt: style: TinyBold
local: field: SimplePrompt: width: 15
local: field: SimplePrompt: color: Blue
local: field: SimplePrompt: cell: 2
local: field: NameField: Set as: $Parent:CostCentre:#SimpleField
local: field: NameField: Style: TinyBold
local: field: NameField: width: 15
local: field: NameField: color: red
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[line: K011PartTitle1Line2]
Field: SimplePrompt, SimpleField
local: field: SimplePrompt: SET AS: "Fund Agency :"
local: field: SimplePrompt: style: TinyBold
local: field: SimplePrompt: width: 15
local: field: SimplePrompt: color: Blue
local: field: SimplePrompt: cell: 2
local: field: SimpleField: Set as: $Parent:CostCentre:##CostCentreName
local: field: SimpleField: Style: TinyBold
local: field: SimpleField: width: 35
local: field: SimpleField: color: red
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[line: K011PartTitle1Line3]
Field: SimplePrompt, ShortNameField
local: field: SimplePrompt: SET AS: "Project :"
local: field: SimplePrompt: Style: TinyBold
local: field: SimplePrompt: width: 15
local: field: SimplePrompt: color: Blue
local: field: SimplePrompt: cell: 2
local: field: ShortNameField: Set as: ##CostCentreName
local: field: ShortNameField: STYLE: TinyBold
local: field: ShortNameField: width: 35
local: field: ShortNameField: color: red
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[line: K011PartTitle1Line4]
Field : SimplePrompt, ShortNameField
Space Bottom: if $$InPrintMode then 0.5 else 0.5
local: field: SimplePrompt: SET AS: "Period :"
local: field: SimplePrompt: Style: TinyBold
local: field: SimplePrompt: width: 15
local: field: SimplePrompt: color: Blue
local: field: SimplePrompt: cell: 2
local: field: ShortNameField: Set as: @@DSPDateStr
local: field: ShortNameField: STYLE: TinyBold
local: field: ShortNameField: width: 35
local: field: ShortNameField: color: Black
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[Part: K011PartTitle2]
Line: K011PartTitle2Line1, K011PartTitle2Line2
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[Line: K011PartTitle2Line1]
Field: K011FieldSNo, K011FieldVchDate, K011FieldVchCCName, K011FieldVchLN, K011FieldCCProjectName
RightField: K011FieldVchType, K011FieldVchVNo, K011FieldCCBudAmount, K011FieldCCActAmount, K011FieldCCVarAmount
Border: K011ColumnTitlesTop
Local: Field: Default: color: Black
Local: Field: Default: Align: Left
Local: Field: Default: Lines: 1
Local: Field: Default: style: TinyBold
Local: Field: K011FieldSNo: info: $$LocaleString:"SNo"
Local: Field: K011FieldVchDate: info: if ##K011BCode then "Date" else "Code"
Local: Field: K011FieldVchDate: width: if $$InPrintMode then 7 else 10
Local: Field: K011FieldVchCCName: info: ""
Local: Field: K011FieldVchLN: info: "Budget Line / Ledger / Narration"
Local: Field: K011FieldCCProjectName: info: ""
Local: Field: K011FieldVchType: info: "Vch Type"
Local: Field: K011FieldVchVNo: info: "Vch No"
local: field: K011FieldCCBudAmount: info: "Budget"
local: field: K011FieldCCBudAmount: Align: Center
local: field: K011FieldCCBudAmount: Border: K011ColumnTitlesBottom
Local: Field: K011FieldCCActAmount: info: "Actual"
Local: Field: K011FieldCCActAmount: Align: Center
Local: Field: K011FieldCCActAmount: Border: K011ColumnTitlesBottom
local: field: K011FieldCCVarAmount: info: "Varriance"
local: field: K011FieldCCVarAmount: Align: Center
local: field: K011FieldCCVarAmount: Border: K011ColumnTitlesBottom
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[Line: K011PartTitle2Line2]
use: K011PartTitle2Line1
Border: K011ColumnTitlesBottom
Local: Field: Default: color: Blue
Local: Field: Default: Align: Left
Local: Field: Default: Lines: 1
Local: Field: Default: style: TinyBold
Local: Field: K011FieldSNo: info: ""
Local: Field: K011FieldVchDate: info: if ##K011BCode then "" else "Date"
Local: Field: K011FieldVchCCName: info: ""
Local: Field: K011FieldVchLN: info: ""
Local: Field: K011FieldCCProjectName: info: ""
Local: Field: K011FieldVchType: info: ""
Local: Field: K011FieldVchVNo: info: ""
local: field: K011FieldCCBudAmount: info: "Amount"
local: field: K011FieldCCBudAmount: Align: Center
Local: Field: K011FieldCCActAmount: info: "Amount"
Local: Field: K011FieldCCActAmount: Align: Center
local: field: K011FieldCCVarAmount: info: "Amount"
local: field: K011FieldCCVarAmount: Align: Center
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding


[Part: K011PartDataCC]
Line: K011PartDataCCLine,
Repeat: K011PartDataCCLine: K011CostCentreRepeatColl
BottomLine: K011PartDataTotalLine
total: K011FieldCCBudAmount
Total: K011FieldCCActAmount
total: K011FieldCCVarAmount
Scroll: vertical
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding


[Line: K011PartDataCCLine]
Field: K011FieldSNo, K011FieldCode, K011FieldCCBudgetLine, K011FieldCCBudgetLine1, K011FieldCCProjectName,
Right Field: K011FieldCCBudAmount, K011FieldCCActAmount, K011FieldCCVarAmount
;Remove if: (if ##K011BValue then $$IsEmpty:$CCAmount else "")
removeif: $$IsExploded
Space Top: 0.6
Option: ExplodeOnEnter
option: DisplayOnEnter ;; this line option will not initiate the alter
Explode: K011PartExplodeVouchers: if $$IsEmpty:#ShortNameField then NO else ($$KeyExplode or ##ExplodeFlag)
local: field: Default: FORMAT: "Bracketed:ForNegative,NoZero"
local: field: Default: Style: TinyBold
local: field: K011FieldSNo: color: Black
local: field: K011FieldCode: color: Blue
Border: K011ThickBottom

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding


[Border: K011ThickBottom]
bottom: thick, Bold
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding


[Field: K011FieldSNo]
Use : NumberField
SET AS: $$Line
width: if $$InPrintMode then 4 else 4
Align: left
Style: if $Depth=4 Then "Tiny Bold Italic" else if $Depth=5 then "Tiny Italic" else "Tiny Bold"
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[Field: K011FieldCode]
Use: Name Field
setas: if $$IsEmpty:$$StringWord:1@K011CodeName = no then $$StringWord:1@K011CodeName else ""
width: if $$InPrintMode then 7 else 10
color: if $Depth=4 then "Black" else if $Depth=5 then "Blue" else "StoneWashRed"
invisible: if ##K011BCode then yes else no
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[Field: K011FieldCCBudgetLine]
Use: Name Field
;Display: CCVouchers
width: if $$InPrintMode then 40 else if ##K011BValue then 75 else 65
color: StoneWashRed
Align: LEFT
Set as: $Name
invisible: yes
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[Field: K011FieldCCBudgetLine1]
;display: CCVouchers
delete: Alter
Use: Name Field
Use: DSPAccNameTmpl
setas: $$StringRemWord:1:$Name
width: if $$InPrintMode then 40 else if ##K011BValue then 75 else 65
color: StoneWashRed
Align: LEFT

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[field: K011FieldCCProjectName]
use: NameField
WIDTH: 20
Setas: @@K011CCPR
INVISIBLE: YES
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[Field: K011FieldCCBudAmount]
Use: Amount Field
format: "DrCr"
Set as: $$AsCrAmt@K011CCBAmt
Style: Tiny
invisible: if ##K011BValue then yes else no
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[field: K011FieldCCActAmount]
use: AmountField
format: "DrCr"
color: Blue
Setas: $$AsDrAmt:$CCAmount
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[Field: K011FieldCCVarAmount]
Use: Amount Field
format: "DrCr"
Set as: $$AsCrAmt:$$NettAmount:#K011FieldCCBudAmount:#K011FieldCCActAmount
Style: Tiny
invisible: if ##K011BValue then yes else no
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[Part: K011PartExplodeVouchers]
Line: K011PartExplodeVouchersLine
Repeat: K011PartExplodeVouchersLine: K011CCVoucherLoopColl
Scroll: vertical
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[Line: K011PartExplodeVouchersLine]
Field: K011FieldSNo, K011FieldVchDate, K011FieldVchCCName, K011FieldVchLN, K011FieldCCProjectName, K011FieldCMPName, VID
RightField: K011FieldVchType, K011FieldVchVNo, K011FieldAmount1, K011FieldCCVchAmount, K011FieldAmount3,
Remove if: #K011FieldVchCCName != #K011FieldCCBudgetLine
local: field: Default: FORMAT: "Bracketed:ForNegative,NoZero"
local: field: Default: Style: Tiny
local: field: K011FieldSNo: color: StoneWashRed
local: field: K011FieldSNo: indent: 1
local: field: K011FieldCCProjectName: setas: ""
;border: K011ColumnTitlesBottom
Space Top: 0.02
Key: VchAlter
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding
[Line: K011PartDataTotalLine]
Field: K011FieldSNo, K011FieldVchDate, K011FieldVchCCName, K011FieldVchLN, K011FieldCCProjectName
Right Field: K011FieldVchType, K011FieldVchVNo, K011FieldAmount1, K011FieldAmount2, K011FieldAmount3
BORDER: Totals
Local: Field: Default: FORMAT: "Bracketed:ForNegative,NoZero"
Local: Field: Default: color: Blue
Local: Field: Default: style: TinyBold
Local: Field: K011FieldSNo: Info: ""
Local: Field: K011FieldVchDate: info: ""
Local: Field: K011FieldVchCCName: info: ""
Local: Field: K011FieldVchLN: info: "Grand Total"
Local: Field: K011FieldCCProjectName: info: ""
Local: Field: K011FieldVchType: info: ""
Local: Field: K011FieldVchVNo: info: ""
local: field: K011FieldAmount1: Setas: $$Total:K011FieldCCBudAmount
Local: Field: K011FieldAmount2: setas: $$Total:K011FieldCCActAmount
local: field: K011FieldAmount3: setas: $$Total:K011FieldCCVarAmount
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding


[Field: K011FieldVchDate]
;Use: ShortDateField
use: UniDateField
Set as: $Date
Style: Tiny
width: if $$InPrintMode then 8 else 10

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding


[Field: K011FieldVchCCName]
Use: ShortNameField
Set as: $CCName
width: 20
color: blue
Invisible: Yes
Style: Tiny
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[Field: K011FieldVchLN]
Use: NameField
Style: Tiny
line: 0
Align: left
width: if $$InPrintMode then 40 else if ##K011BValue then 75 else 65
Set as: $LedgerName + (if $$IsEmpty:$LedNarration then "" else " || LNarr:")+ $LedNarration + (if $$IsEmpty:$Narration then "" else " || CNarr:") +$Narration
color: Blue
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[FIELD: K011FieldCMPName]
use: Namefield
setas: $CPName
width: 8
;Alter: Voucher
;Variable: SVCurrentCompany
;Modifies: SVCurrentCompany
invisible: yes
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[Field: K011FieldVchType]
Use: ShortNameField
Set as: $VoucherTypeName
Width: 14
Style: Tiny
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[Field: K011FieldVchVNo]
Use: VoucherNumberField
Set as: $VoucherNumber
Width: 13
Style: Tiny
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding


[Field: K011FieldCCVchAmount]
Use: Amount Field
format: "DrCr"
Set as: $$AsDrAmt:$VchCCAmount
Style: Tiny
color: StoneWashRed
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[Field: K011FieldAmount1]
Use: Amount Field
format: "DrCr"
invisible: if ##K011BValue then yes else no
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[Field: K011FieldAmount2]
Use: Amount Field
format: "DrCr"
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[Field: K011FieldAmount3]
Use: Amount Field
format: "DrCr"
invisible: if ##K011BValue then yes else no
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[#Field: VID]
Use: Name Field
Setas: $$SPrintf:"ID:%s":$MasterID
Invisible: Yes
[#Key: VchAlter]
Key: Enter
Action: Call : AltVoucher:#VID
Scope: Current

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding


[Key: K011CostCentre]
Title: "Cost Centre"
key: Alt+1
Action: Modify Variables : Cost Centre Name
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[Button: K011BValue]
Title: if ##K011BValue then "With Budget" else "Without Budget"
Key: Alt + 2
Action: Set: K011BValue: not ##K011BValue
[Button: K011BCode]
Title: if ##K011BCode then "With Code" else "Without Code"
Key: Alt + 6
Action: Set: K011BCode: not ##K011BCode
[Variable: K011BValue]
Type: Logical
Persistent: no
[Variable: K011BCode]
Type: Logical
Persistent: no
[System: Variable]
K011BValue: YES
K011BCode: yes
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding


[Border: K011TopThickBottomThin]
Top: Thick
Bottom: Thin
[Border: K011LeftThickThin]
Left: Thick
[Border: K011ColumnTitlesTop]
Top: Thick, Full Length
[Border: K011ColumnTitlesBottom]
Bottom: Thin, Full Length
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding


;[#Object: Voucher]
;VchCCAmt: $$CollAmtTotal:AllLedgerEntries:$LedCCAmt
;[#Object: LedgerEntry]
;LedCCAmt: $$CollAmtTotal:CategoryAllocations:$CCatCCAmt
;[#Object: Category Allocations]
;CCatCCAmt: $$FilterAmtTotal:CostCentreAllocations:K011Smp CC Filter:$Amount
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding

[System: Formula]
K011VTFil1: $VoucherTypeName not Contains "Memorandum"
K011VTFil2: $VoucherTypeName not Contains "DELHI- BUDGET"
K011VTFil3: NOT $IsCancelled AND NOT $IsDeleted and not $IsOptional
K011Smp CC Filter: $Name = #K011FieldCCBudgetLine
K011CCNFilter: $K011CCPR Contains ##CostCentreName
K011CCFTFAPR: Not $$NumChildren>0
K011CCFA: IF $Depth=2 THEN $Name ELSE $Parent:CostCentre@K011CCPR
K011CCPR: IF $Depth=3 THEN $Name ELSE $Parent:CostCentre@K011CCBL
K011CCBL: IF $Depth=4 THEN $Name ELSE $Parent:CostCentre@K011CCSBL
K011CCSBL: IF $Depth=5 THEN $Name ELSE $Parent:CostCentre@K011CCSSBL
K011CCSSBL: IF $Depth=6 THEN $Name ELSE ""
K011IsBudVCH: $VoucherTypeName contains "DELHI- BUDGET"
K011LocSearchKey: $Name
K011CCBAmt: $$ReportObject:$$CollectionFieldByKey:$CCVAmount@K011LocSearchKey:K011CollectionBA
K011CodeName: $$StringFindAndReplace:$Name:"-":""
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding
;[Collection: K011CompanyColl]
;type: Company
;Fetch: Name
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding
[Collection: K011CCVoucherLoopColl] ;; Resultant Collection
Collection: K011LCCollection;: K011CompanyColl
Sort: @@Default: $$Date:$Date, $VoucherNumber
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding
[Collection: K011VchOfCostCentre]
Type: Vouchers : CostCentre
Child of: ##CostCentreName
Belongs To: Yes
filter: K011VTFil1, K011VTFil2, K011VTFil3
Fetch: MasterID, Date, LedgerName, VoucherTypeName, VoucherNumber, Amount

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding
[Collection: K011LCCollection]
Source Collection: K011VchOfCostCentre
Walk : AllLedgerEntries, CostCentreAllocations
By : Date : $Date
By : LedgerName : $LedgerName
By : CostCentreName : $Name:CostCentre:$Name
by : Amount : $Amount
Compute : Date : $Date
compute : MasterID : $MasterID
Compute : VoucherTypeName : $VoucherTypeName
Compute : VoucherNumber : $VoucherNumber
Compute : Narration : $().Narration
compute : LedNarration : $CostCentreAllocations.Narration
Compute : CCName : $Name:CostCentre:$Name
Compute : VchCCAmount : $Amount
Compute : CPName : $$LoopCollObj:$Name

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding
[Collection: K011CostCentreRepeatColl] ;; Resultant Collection
sourceCollection: K011CostCentreLoopColl
by: Name: $Name
aggrcompute: CCAmount: sum: $$NettAmount:$DebitTotals:$CreditTotals
sort: Default: $$Name, $Depth
[Collection: K011CostCentreLoopColl]
Collection: K011CostCentreColl;: K011CompanyColl
sort: Default: $$Name, $Depth
[Collection: K011CostCentreColl]
Type: Cost Centre
Filter: K011CCNFilter, K011CCFTFAPR
Fetch: Name, Depth, MasterID, DebitTotals, CreditTotals
sort: Default: $$Name, $Depth
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding
[Collection: K011CollectionBudgetVoucher]
Type: Voucher
filter: K011IsBudVCH
fetch: MasterID, Date, VoucherNumber, VoucherTypeName,
ParmVar: SVFromDate: Date: $StartingFrom:Company:##SVCurrentCompany
ParmVar: SVToDate: Date: $LastVoucherDate:Company:##SVCurrentCompany
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;End of Coding
[Collection: K011CollectionBA] ;; Resultant Collection
Source Collection: K011CollectionBudgetVoucher
Walk: AllLedgerEntries, CostCentreAllocations
By: Name: $Name:CostCentre:$Name
searchkey: $Name
AGGRcompute: CCVAmount: Sum: $Amount
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;