INCOME SUMMARY MONTH WISE OF FULL YEAR

Dear All,
Here is the code through which you can see full year Indirect and Direct income which is effect only payment, receipt, sales and purchase vouchers only.

 

NICE.if any possible for group wise report?

 

Yes under working

 

Hey Harbansh if possible please correct the code under transportation details.

 

sorry i din get you. please explain correctly.

 

I want to add one column in reporting form, like unloading quantity. But i don't want to enter value of unloading quantity at the time of entry of invoice. I want to put unloading quantity from reporting form , like Form C register in Tally.


Gateway of Tally----->Display------>Transporter Name


[#Part: MSTLED Initial]
[#Line: MST Parent]



[#Part: MST LED Explode Sundry]
Add: Line: At End: Transbank1,Transbank2,Transbank3,Transbank4 ;,Transbank5


[Line:Transbank1]
Field: short name field, Transporterbank
Local: Field: short name field : Set as: "Bank Name:"
Local: Field:short name field : Skip: Yes
Local: Field: short name field : Style: small
Local: Field: short name field : Alignrompt
Invisible: $Parent!="Truck Track"


[Line:Transbank2]
Field: short name field, Transporterbank1
Local: Field: short name field : Set as: "Bank A/C No.:"
Local: Field:short name field : Skip: Yes
Local: Field: short name field : Style: small
Local: Field: short name field : Alignrompt
Invisible: $Parent!="Truck Track"
[Line:Transbank3]
Field: short name field,Transporterbank2
Local: Field: short name field : Set as: "Branch No.:"
Local: Field:short name field : Skip: Yes
Local: Field: short name field : Style: small
Local: Field: short name field : Alignrompt
Invisible: $Parent!="Truck Track"
[Line:Transbank4]
Field: short name field, Transporterbank3
Local: Field: short name field : Set as: "RTGS No.:"
Local: Field:short name field : Skip: Yes
Local: Field: short name field : Style: small
Local: Field: short name field : Alignrompt
Invisible: $Parent!="Truck Track"

[Line:Transbank5]
Field: short name field, Transporterbank4
Local: Field: short name field : Set as: "Truck No.:"
Local: Field:short name field : Skip: Yes
Local: Field: short name field : Style: small
Local: Field: short name field : Alignrompt
Invisible: $Parent!="Truck Track"


[Field:Transporterbank]
Use: name field
Storage: TransBankName
Set Always: Yes


[Field:Transporterbank1]
Use: name field
Storage: TransBankac
Set Always: Yes


[Field:Transporterbank2]
Use: name field
Storage: TransBankBranch
Set Always: Yes


[Field:Transporterbank3]
Use: name field
Storage: TransBankRtgs
Set Always: Yes

[Field: Transporterbank4]
Use: name field
Sub Form: TransporterTruckNo

[Report:TransporterTruckNo]
Form: TransporterTruckNo
[Form: TransporterTruckNo]
Part: TransporterTruckNo
Width: 15% Page
Height: 30% Page


[Part: TransporterTruckNo]
Line:TransporterTruckNo1,TransporterTruckNo2
Repeat: TransporterTruckNo2:TransporterTruckNo
Scroll: Vertical
Break On: $$IsEmpty:$TransTruckNo

[Line:TransporterTruckNo1]
Field: Name field
Local: Field: name field : Set as: "Truck Number"
Local: Field: name field : Align: Center
Local : Field: name field : Skip: Yes
Border: Flush Totals

[Line:TransporterTruckNo2]
Field: TransPTruckno

[Field: TransPTruckno]
Use: name field
Storage: TransTruckNo
Set Always: Yes

[System: udf]
TransBankName : String: 200
TransBankac : String: 201
TransBankBranch:String:202
TransBankRtgs : String: 203
EiTransTruckNo : String: 206
TransWeight : Quantity: 207
Transfrom : String: 208
Transto : String: 209
TransAmt: Amount: 210
TransYesno : Logical: 211
ServicetaxPaidby : String: 212
TransRate : Number: 213
Trasnunit : String: 214

[System: udf]
TransporterTruckNo:Aggregate:204
TransTruckNo:String:205

[Collection: TruckNocollect]
Title:$$LocaleString:"Truck No List"
Type:TransporterTruckNo:Ledger
Child Of:$EntryBrokarage
Format: $TransTruckNo,20

[Collection: TruckNocollectall]
Use: TruckNocollect
Title:$$LocaleString:"Truck No List"
;Type: Ledger ;;TruckNocollectall
Report: TransporterTruckNo
Variable: TransporterTruckNo

[Variable: TransporterTruckNo]
Table: TruckNocollectall

[#Part: DBLLINE Narration]

add : option : opbrokarage : ($$IsSales:##SVVoucherType or $$IsPurchase:##SVVoucherType) and @@Aspendemo1

[!Part : opbrokarage ]
Add : line : before :VCH NarrPrompt :Linebrkgs

[Line : Linebrkgs]
Field:name field,EiTransYesno,Transsub

Local: Field: name field : Set as:"Transporter Details ?"
Local: Field: name field : Skip: Yes

[Field: EiTransYesno]
Use: logical field
Storage: TransYesno
Set Always: Yes

[Field: Transsub]
Use: name field
Width: 1 inch
Sub Form: EivishalTrasn
Inactive: Not $TransYesno
Set Always: Yes


[Report: EivishalTrasn]
Form: EivishalTrasn

[Form: EivishalTrasn]
Part: EivishalTrasn
Width: 80% page

[Part: EivishalTrasn]
Line:EivishalTrasn,EivishalTrasn1,EivishalTrasn2,EivishalTrasn3

[Line: EivishalTrasn]
Field: name field
Local: Field: name field: Set as:"Transport Details"
Local: Field: name field : Skip: Yes
Local: Field: name field : Full Width: Yes
Local: Field: name field : Align : Centre

[Line: EivishalTrasn1]
field : Short prompt, name field, Fromtile, Transtot,short name field,EitransrateT, TransamtT ;;EitransUnitT,
local : field : short prompt : set as : "Transporter Name "
local : field : short prompt : width : 1.5 inch
local : field : short prompt elete: Align

local : field : entbrokarage : set always : yes
local : field : name field : set as : "Truck No "
Local: Field: name field : Width: 1.2 inch
local : field : short name field : set as : "Weight "
local : field : short name field : skip : yes
local : field : short name field : width : 1 inch

local : field : name field : skip : yes
Local: Field: default : Style: small bold
Border: Flush totals

[Line: EivishalTrasn2]
field : entbrokarage, brokarageper, TransFrom, Transto,commAmt,Eitransrate, Transamt ;;EitransUnit,
Local: Field: default : Style: small bold

[Line: EivishalTrasn3]
Field: name field,Servicetaxpaidby,short name field,despatchmoden,medium prompt,billty
Local: Field: name field : Set as: "Party Name:"
Local: Field: name field : Skip: Yes
Local: Field: name field : Width: 1.5 inch
Local: Field: short name field : Set as: "Despatch Mode:"
Local: Field: medium prompt: Set as:"Consignment No.:"
Local: Field: short name field : Skip: Yes
Local: Field: short name field : Width: 1.2 inch
Border: thin top

[Field: Servicetaxpaidby]
Use: name field
Storage: ServicetaxPaidby
Set Always: Yes

[Field: despatchmoden]
Use: name field
Storageespatchmode1
Set Always: Yes
Table: Despatchmode
Show Table: Always

[Field: billty]
Use: name field
Storage: Billtyno
Set Always: Yes

[Collection: Despatchmode]
Title: $$LocaleString:"Despatch Mode"
List Name: $$LocaleString:"Ex-Delivery "
List Name: $$LocaleString:"FOR-Delivery"

[Field : eitrack1]
use : name field
style : normal
width : .65 inch
skip : yes

[Field : eitrack2]
use : name field
style : normal
width : .5 inch
storage : TruckNo1
set always : yes

[Field : eitrack3]
use : name field
style : normal
width : .75 inch
skip : yes
[Field : eitrack4]
use : name field
style : normal
width : .65 inch
storage : Accountno1
set always : yes

[Field : eitrack5]
use : name field
style : normal
width : .95 inch
skip : yes

[Field : eitrack6]
use : name field
style : normal
width : .65 inch
storage : RTGSNEFT
set always : yes

[Field : entbrokarage]
Use : name field
style : normal
Table : transportname ;brokarageparty
Show Table : Always
width : 1.5 inch
storage : EntryBrokarage
set always : yes

[Collection: transportname]
Title: $$LocaleString:"Transporter Name"
Type: Ledger

Child Of:"Transporter"

[Field : brokarageper]
Use : Name field
style : normal
;Table: TruckNocollect
Width: 1.2 inch
storage : EiTransTruckNo
;set as :$prtycommision:ledger:#entbrokarage
Show Table: Always
set always : yes
; Keys : Create PortMr, Alter PortMr
; Table : Scenario12Mr,notapplicable

[Field : commAmt]
use : Qty Primary field
Set as: $$CollQtyTotal:InventoryEntries:$Billedqty
storage : TransWeight
Width: 1 inch
; format : "no zero,no comma"
set always : yes

[Field: Fromtile]
Use: short name field
Width: 1.5 inch
Set as: "Item Name "
Skip: Yes
Style: small

[Field:TransFrom]
Use: name field
Width: 1.5 inch
Set as:"."
Storage: Transfrom
Set Always: Yes

[Field: Transtot]
Use: short name field
Width: 1.5 inch
Set as: "From/To "
Skip: Yes
Style: small

[Field: Transto]
Use: name field
Width: 1.5 inch
Set as: "."
Storage: Transto
Set Always: Yes

[Field: TransamtT]
Use: short name field
Width: 1 inch
Set as: "Amount "
Skip: Yes
Style: small

[Field: EitransUnitT]
Use: name field
Width: .5 inch
Style: small bold
Set as: "Unit"
Skip: Yes

[Field: EitransUnit]
Use: name field
Width: .5 inch
Style: small bold
Storage: Trasnunit
Set Always: Yes

[Field: EitransrateT]
Use: name field
Width: .85 inch
Style: small bold
Set as: "Rate"
Skip: Yes

[Field: Eitransrate]
Use: number field
Width: .85 inch
Style: small bold
Format:"Nozero,decimal:2"
Storage: TransRate
Set Always: Yes


[Field: Transamt]
Use: Amount field
Set as: $TransRate* $$Number:$TransWeight
Storage: TransAmt
Set Always: Yes
Format:"Nozero,decimal:2"
Width: 1 inch

[System: formula]
invamtM : $$CollAmtTotal:InventoryEntries:$Amount

[collection : brokarageparty]
Type: Ledger
Child Of:"Truck track"
Collection : Not Applicable
;add : filter : filterbrok
Align : Right
FullHeight : No
Title : "List Of Transporter"

[system : formula]
filterbrok : $IsBrokarage
[system : udf]
IsBrokarage : logical : 2
;; IscreatBrokarage : logical : 4
prtycommision : number : 6
EntryBrokarage : string : 100
brokper : number : 10
commAmt : number : 20
TruckNo1 : string : 27
Accountno1 : string : 45
RTGSNEFT :string : 26
Despatchmode1 : String: 30
Billtyno : String: 32


[system : formula]
Aspendemo1 : yes ;;$$MachineDate < $$Date:"30/7/14"

;;******************************************Reports***************************************************
[#Menu: Display Menu]
Add: Option: vishal@Aspendemo1


[!Menu:vishal]
add : Key Item :before@locQuit: @@locStatementsofAgent : S : Menu : Transporter Details :$$IsAccountingOn:$$CurrentCompany


[system : formula]
locStatementsofAgent : $$LocaleString:"Transporter Details"
locAgent :$$LocaleString:"Truck No. Wise"
locAgent2 :$$LocaleString:"Transporter Report for Sales"
;salestrasnports : $$LocaleString:"Transporter Detais For Sales"
Purchasetrasnports :$$LocaleString:"Transporter Detais For Purchase"
locAgent3 : $$LocaleString:"Transporter Report for Purchase"
[Menu :Transporter Details]
;Indent: @@salestrasnports
; Key Item : @@locAgent2 : W : Display collection :Scollection
Key Item : @@locAgent2 : s : Display :vishalsal

Key Item : @@locAgent3 : s : Display :vishalpur

; Key Item : @@locAgent : A : Display Collection : Chassiscollection ;;; : NOT $$IsEmpty:$$SelectedCmps


; Indent: @@Purchasetrasnports

; Key Item : @@locAgent2 : W : Display collection :Scollectionpur
; Key Item : @@locAgent3 : s : Display :vishalpur
; Key Item : @@locAgent : A : Display Collection : Chassiscollectionpur ;;; : NOT $$IsEmpty:$$SelectedCmps


[#Menu: Gateway of Tally]
;; add : item : before : @@locQuit :Agent Commission : Display collection :Scollection ;;Agent Commission

[Collection:Scollection]
use : List of Ledgers ;;List of Ledgers
Variable : Ledger Name
Report : Transporter Details
Trigger : myLedger Analysis Name
Filter : IsPartyAccount
Fetch : Name

[Collection: Scollectionpur]
use : List of Ledgers ;;List of Ledgers
Variable : Ledger Name
Report : Transporter Detailspur
Trigger : myLedger Analysis Name
Filter : IsPartyAccount
Fetch : Name

[Report: myLedger Analysis Name] ;; Auto Report

Use : Ledger Name
Local : Field : Ledger Name : Delete: Table
Local : Field : Ledger Name : Table : brokarageparty


[Report: myLedger Analysis Name2] ;; Auto Report

Use : Ledger Name
Local : Field : Ledger Name : Delete: Table
Local : Field : Ledger Name : Table : TruckNocollectall

[Report :Transporter Details]
Use : Dsp template
Form : BrokarForm


[Report :Transporter Detailstruck]
Use : Dsp template
Form : BrokarFormTruck

[Report :Transporter Detailspur]
Use : Dsp template
Form : BrokarFormpur

[Report :Transporter Detailspurtrk]
Use : Dsp template
Form : BrokarFormpurTrk

[Report :vishalsal]
Use : Dsp template
Form : all BrokarForm
Add: Variable: SelectedHisab
Set:SelectedHisab : $$SysName:NotApplicable
Title: $$LocaleString:"Transporter Details"

[Report: vishalpur]
Use : Dsp template
Form : all PurBrokarForm
Add: Variable: SelectedHisab
Set:SelectedHisab : $$SysName:NotApplicable
Title: $$LocaleString:"Transporter Details"

;;*****************************************

[Button:Invoice Btn]
Key:Alt+I
Action:Execute:Invoice Rpt
Title:Find Invoice

[Report:Invoice Rpt]
Form:Invoice Frm
Title:Find Invoice
Filter:$vouchernumber

[Form:Invoice Frm]
Part:Invoice Prt
Add : On : Form Accept : yes :Message Box

[Part:Invoice Prt]
Line:Invoice Ln

[Line:Invoice Ln]
Field:Medium Prompt, Invoice Fld
Local:Field:Medium Prompt:Set as:"Invoice No"

[Field:Invoice Fld]
Use:Name Field
Width:50
Border:Thin Box

[Collection:Cleared]
Type : Bills
Cleared:Yes

[Collection:UnCleard]
Type:Bills
Cleared:No

[Collection:InvoiceBill]
Collections:Cleared, Uncleard


[Button: Hisab Filtering]
Title: $$LocaleString:"Transporter"
Key : Alt + S
Action : Execute :Hisab Configure ;;Agent Commission

[Button: Hisab Filtering2]
Title: $$LocaleString:"Truck No."
Key : Alt + T
Action : Execute :Hisab Configure2 ;;Agent Commission

[Report: Hisab Configure]

Auto : Yes
Title : $$LocaleString:"Configuration"
;Local : Collection : CST DFormType : Delete : Filter : CSTBeforeApr07

[Report: Hisab Configure2]

Auto : Yes
Title : $$LocaleString:"Configuration"
;Local : Collection : CST DFormType : Delete : Filter : CSTBeforeApr07


[Form: Hisab Configure]

No confirm : Yes
Full width : No
Full height : No
Background : @@SV_CMPCONFIG
Parts : DSP Configure, hisabConfig
Local : Style : Default : Height : @@SmallSize
Local : Line : Form SubTitle : SpaceBottom : 0.5


[Form: Hisab Configure2]

No confirm : Yes
Full width : No
Full height : No
Background : @@SV_CMPCONFIG
Parts : DSP Configure, hisabConfig2
Local : Style : Default : Height : @@SmallSize
Local : Line : Form SubTitle : SpaceBottom : 0.5


[Part: hisabConfig]

Lines : filterhisab
Space Top : 0.5
[Part: hisabConfig2]

Lines : filterhisab2
Space Top : 0.5


[Line: filterhisab]

Field : Medium Prompt, Name Field
Local : Field : Medium Prompt : Set as : $$LocaleString:"Show Vouchers of :"
Local : Field : Name Field : Table : transportname, Not Applicable ;;Scenario12Eng,

Local : Field : Name Field : Show Table: Always
Local : Field : Name Field : Variable : SelectedHisab
Local : Field : Name Field : Modifies : SelectedHisab : Yes


[Line: filterhisab2]

Field : Medium Prompt, Name Field
Local : Field : Medium Prompt : Set as : $$LocaleString:"Show Vouchers of :"
;Local : Field : Name Field : Table : transportname, Not Applicable ;;Scenario12Eng,

;Local : Field : Name Field : Show Table: Always
Local : Field : Name Field : Variable : SelectedHisab
Local : Field : Name Field : Modifies : SelectedHisab : Yes

[Variable: SelectedHisab]

Type : String


[System: Variable]


SelectedHisab : ""

[System: formula]
SelectedHisab : If $$IsSysNameEqual:NotApplicable:##SelectedHisab or $$IsEmpty:##SelectedHisab Then Yes Else ($EntryBrokarage = ##SelectedHisab or $EiTransTruckNo contains ##SelectedHisab) ;;$$IsSysNameEqual:NotApplicable:##SelectedHisab or


;;*******************************************

[Form :BrokarForm]
Use : Dsp template
Height : 100% Page
Width : 100% Page
Parts : DSP AccTitles,Prttitle,prtBrokarDetails
bottom parts : prtbottom
Page Break : DSP ClPageBreak, myDSPOpPageBreak

[Form: BrokarFormTruck]
Use : Dsp template
Height : 100% Page
Width : 100% Page
Parts : DSP AccTitles,Prttitle,prtBrokarDetailstruck
bottom parts : prtbottom
Page Break : DSP ClPageBreak, myDSPOpPageBreak

[Form :BrokarFormpur]
Use : Dsp template
Height : 100% Page
Width : 100% Page
Parts : DSP AccTitles,Prttitle,prtBrokarDetailspur
bottom parts : prtbottom
Page Break : DSP ClPageBreak, myDSPOpPageBreak

[Form: BrokarFormpurTrk]
Use : Dsp template
Height : 100% Page
Width : 100% Page
Parts : DSP AccTitles,Prttitle,prtBrokarDetailspurtrk
bottom parts : prtbottom
Page Break : DSP ClPageBreak, myDSPOpPageBreak

[Form :all BrokarForm]
Use : Dsp template
Height : 100% Page
Width : 100% Page
Parts : DSP AccTitles,AllPrttitle,allprtBrokarDetails
bottom parts : prtbottom
Deleteage Break
addage Break : DSP ClPageBreak, myDSPOpPageBreak
Add: Button:Hisab Filtering
add : Button:Hisab Filtering2

[Form: all PurBrokarForm]
Use : Dsp template
Height : 100% Page
Width : 100% Page
Parts : DSP AccTitles,AllPrttitle,allprtBrokarDetailspur
bottom parts : prtbottom
Delete: Page Break
add : Page Break : DSP ClPageBreak, myDSPOpPageBreak
Add: Button:Hisab Filtering
add : Button: Hisab Filtering2


[Part : myDSPOpPageBreak]
parts SP AccTitles,AllPrttitle
vertical : yes


[Part : Prttitle]
Line : AgentNamefld,lntitle
[Part :AllPrttitle]
Line : alllntitle
[Line : AgentNamefld]
field :Short name field,AgentNamefld
local : field : short name field : set as : "Transporter Name:"
[field :AgentNamefld]
use : name field
set as : #LedgerName
fullwidth : yes
[Line : lntitle]
fields : Fvchno,Fvchdate ,Fbrokar ,Fvchref,FBrokerper,Servicetaxby,consigno
Right fields :Servicedespatc, Finvtot,Transunit,Transrate,Fbrokaramt
local : field : default : type : string
local : field : default : style : normal bold
; local : field : default : align : centre
local : field : Fvchno : setas : "Voucher No."
local : field : Fvchref : set as : "Item Name"
local : field : Fvchdate : set as : "Date"
local : field : Fbrokar : set as : "Truck No."
local : field : FBrokerper : set as : "From/To"
Local: Field: Servicetaxby : Set as: "Party Name"
Local: Field: consigno : Set as: "Consign No."
Local: Field:Servicedespatc: Set as:"despstch mode"
local : field : Finvtot : set as : "Weight"
Local: Field: Transunit : Set as: "Unit"
Local: Field: Transrate : Set as: "Rate"
local : field : Fbrokaramt : set as : "Amount"
Border : Totals

[Line : alllntitle]
fields : Fvchno,Fvchdate,ReTransportnm,Fbrokar ,Fvchref,FBrokerper,Servicetaxby,consigno
Right fields : Servicedespatc,Finvtot,Transunit,Transrate,Fbrokaramt
local : field : default : type : string
local : field : default : style : normal bold
; local : field : default : align : centre
local : field : Fvchno : set as : "Voucher No."
local : field : Fvchref : set as : "Item Name"
local : field : Fvchdate : set as : "Date"
Local: Field: ReTransportnm : Set as: "Transporter Name"
local : field : Fbrokar : set as : "Truck No."
local : field : FBrokerper : set as : "From/To"
Local: Field: Servicetaxby : Set as: "Party name"
Local: Field: consigno : Set as: "Consign No."
Local: Field: Servicedespatc : Set as: "Despatch Mode"
local : field : Finvtot : set as : "Weight"
Local: Field: Transunit : Set as: "Unit"
Local: Field: Transrate : Set as: "Rate"
local : field : Fbrokaramt : set as : "Amount"
Border : Totals



[Part : prtBrokarDetails]
Line : Brokarbodyln
repeat :Brokarbodyln : VchBrokarCollct
scroll : vertical
Total : Finvtot, Fbrokaramt

[Part : prtBrokarDetailstruck]
Line : BrokarbodylnTrack
repeat :BrokarbodylnTrack : VchBrokarCollct
scroll : vertical
Total : Finvtot, Fbrokaramt

[Part : prtBrokarDetailspur]
Line : Brokarbodyln
repeat :Brokarbodyln : VchBrokarCollctpur
scroll : vertical
Total : Finvtot, Fbrokaramt


[Part: prtBrokarDetailspurtrk]
Line : BrokarbodylnTrk
repeat :BrokarbodylnTrk : VchBrokarCollctpur
scroll : vertical
Total : Finvtot, Fbrokaramt

[Part :allprtBrokarDetails]
Line : AllBrokarbodyln
repeat :AllBrokarbodyln : salesVchBrokarCollct
scroll : vertical
Total : Finvtot, Fbrokaramt


[Part: allprtBrokarDetailspur]
Line : AllBrokarbodyln
repeat :AllBrokarbodyln : VchBrokarCollctpur
scroll : vertical
Total : Finvtot, Fbrokaramt

[Line : Brokarbodyln]
fields : Fvchno,Fvchdate ,Fbrokar ,Fvchref,FBrokerper,Servicetaxby,consigno
Right fields : Servicedespatc,Finvtot,Transunit,Transrate,Fbrokaramt
local : field : Fvchno : set as : $VoucherNumber
local : field : Fvchref : set as : $Transfrom
local : field : Fvchdate : set as : $Date
local : field : Fbrokar : set as : $EiTransTruckNo
local : field : FBrokerper : set as :$Transto
Local: Field: Servicetaxby : Set as: $ledgername
Local: Field: consigno : Set as:$Billtyno
Local: Field: Servicedespatc : Set as:$Despatchmode1
Local : field : Finvtot : set as : $TransWeight
Local: Field: Transunit : Set as:$Trasnunit
Local: Field: Transrate : Set as:$TransRate
Local : field : Fbrokaramt : set as :$TransAmt
Option : AlterOnEnter : $$IsVoucher
;;empty : $$Isempty:$EntryBrokarage
empty : #LedgerName != $EntryBrokarage ;;$Partyledgername
Billtyno
;;Trasnunit,TransRate,ServicetaxPaidby,TransAmt,Transto,Transfrom,TransWeight,EiTransTruckNo

[Line : BrokarbodylnTrack]
fields : Fvchno,Fvchdate ,Fbrokar ,Fvchref,FBrokerper,Servicetaxby,consigno
Right fields :Servicedespatc, Finvtot,Transunit,Transrate,Fbrokaramt
local : field : Fvchno : set as : $VoucherNumber
local : field : Fvchref : set as : $Transfrom
local : field : Fvchdate : set as : $Date
local : field : Fbrokar : set as : $EiTransTruckNo
local : field : FBrokerper : set as :$Transto
Local: Field: Servicetaxby : Set as: $ledgername
Local: Field: consigno : Set as:$Billtyno
Local: Field: Servicedespatc : Set as:$Despatchmode1
Local : field : Finvtot : set as : $TransWeight
Local: Field: Transunit : Set as:$Trasnunit
Local: Field: Transrate : Set as:$TransRate
Local : field : Fbrokaramt : set as :$TransAmt
Option : AlterOnEnter : $$IsVoucher
;;empty : $$Isempty:$EntryBrokarage

empty : ##SScenario12MR1!=$EiTransTruckNo
;;Trasnunit,TransRate,ServicetaxPaidby,TransAmt,Transto,Transfrom,TransWeight,EiTransTruckNo

[Line : BrokarbodylnTrk]
fields : Fvchno,Fvchdate ,Fbrokar ,Fvchref,FBrokerper,Servicetaxby,consigno
Right fields : Servicedespatc,Finvtot,Transunit,Transrate,Fbrokaramt
local : field : Fvchno : set as : $VoucherNumber
local : field : Fvchref : set as : $Transfrom
local : field : Fvchdate : set as : $Date
local : field : Fbrokar : set as : $EiTransTruckNo
local : field : FBrokerper : set as :$Transto
Local: Field: Servicetaxby : Set as: $ledgername
Local: Field: consigno : Set as:$Billtyno
Local: Field: Servicedespatc : Set as:$Despatchmode1
Local : field : Finvtot : set as : $TransWeight
Local: Field: Transunit : Set as:$Trasnunit
Local: Field: Transrate : Set as:$TransRate
Local : field : Fbrokaramt : set as :$TransAmt
Option : AlterOnEnter : $$IsVoucher
;;empty : $$Isempty:$EntryBrokarage

empty : ##SScenario12MR1!=$EiTransTruckNo


[Line : allBrokarbodyln]
fields : Fvchno,Fvchdate ,ReTransportnm,Fbrokar ,Fvchref,FBrokerper,Servicetaxby,consigno
Right fields : Servicedespatc,Finvtot,Transunit,Transrate,Fbrokaramt
local : field : Fvchno : set as : $VoucherNumber
local : field : Fvchref : set as : $stockItemName
local : field : Fvchdate : set as : $Date
Local: Field: ReTransportnm : Set as: $EntryBrokarage
local : field : Fbrokar : set as : $EiTransTruckNo
local : field : FBrokerper : set as :$Transto
Local: Field: Servicetaxby : Set as: $ledgername
Local: Field: consigno : Set as:$Billtyno
Local: Field: Servicedespatc : Set as:$Despatchmode1
Local : field : Finvtot : set as : $TransWeight
Local: Field: Transunit : Set as:$Trasnunit
Local: Field: Transrate : Set as:$TransRate
Local : field : Fbrokaramt : set as :$TransAmt
Option : AlterOnEnter : $$IsVoucher
empty : $$Isempty:$EntryBrokarage

;


[Part : prtbottom]

Line :broktot

[Line : broktot]
fields : Fvchno,Fvchref,Fvchdate, Fbrokar
Right fields : FBrokerper,totFinvtot,totFbrokaramt
local : field : Fvchno : set as : "Total"
local : field : Fvchref : set as : ""
local : field : Fvchdate : set as : ""
local : field : Fbrokar : set as : ""
local : field : FBrokerper : set as :""
Local : field : totFinvtot : set as : $$Total:Finvtot
Local : field : totFbrokaramt : set as :$$Total:Fbrokaramt
border : Totals



[Collection : VchBrokarCollct]
Type : Voucher ;;s:Ledger
child of : $EntryBrokarage
Fetch : EntryBrokarage,Amount,Trasnunit,TransRate,ServicetaxPaidby,TransAmt,Transto,Transfrom,TransWeight,EiTransTruckNo,Despatchmode1,Billtyno
Filter: onlysalesvch

[Collection : VchBrokarCollctpur]
Type : Voucher ;;s:Ledger
child of : $EntryBrokarage
Fetch :EntryBrokarage, Amount,Trasnunit,TransRate,ServicetaxPaidby,TransAmt,Transto,Transfrom,TransWeight,EiTransTruckNo,Despatchmode1,Billtyno

Filter: onlyPurvch
filter : SelectedHisab

[Collection:salesVchBrokarCollct]
Type : Voucher ;;s:Ledger
child of : $EntryBrokarage
Fetch : EntryBrokarage,Amount,Trasnunit,TransRate,ServicetaxPaidby,TransAmt,Transto,Transfrom,TransWeight,EiTransTruckNo,Despatchmode1,Billtyno

Filter: onlysalesvch
filter : SelectedHisab

[System: formula]
onlysalesvch : $$IsSales:$vouchertypename
onlyPurvch : $$IsPurchase:$vouchertypename

[Field :Fvchref]
use : name field
width : 1.2 inch
style : normal

[Field : Fvchdate]
use : short date field
width : .85 inch
style : normal
align : left

[Field :Fvchno]
Use : Name field
style : Normal
width : .85 Inch

[Field : Fbrokar]
Use : name field
style : Normal
Width : 1.2 Inch

[Field : FBrokerper]
Use : name field
style : normal
width : 1.2 inch
align : Left
Format : "No zero,no comma,percentage"

[Field : Finvtot]
Use : number field
width : .8 inch
Alter : Voucher
Format:"Nozero,Nocomma,decimal:2"

[Field: Transunit]
Use: name field
Width: .6 inch
Style: small
[Field: Servicetaxby]
Use: name field
Width: .8 inch
Style: small


[Field: consigno]
Use: name field
Width: .8 inch
Style: small

[Field: Servicedespatc]
Use: name field
Width: .9 inch
Style: small
;9831788962

[Field: ReTransportnm]
Use: name field
Width: 1.2 inch
Style: small


[Field: Transrate]
Use: number field
Width: .8 inch
Align: Left
Format:"Nozero,decimal:2"


[Field : Fbrokaramt]
use : Number field
width : .8 inch
align : right
format : "no zero,decimal:2"


[Field : totFinvtot]
Use : Amount field
width : 1.5 inch
Alter : Voucher


[Field : totFbrokaramt]
use : Number field
width : 1.5 inch
align : right
format : "no zero,decimal:2"


[#Part: MST LED Explode Sundry]
;add : line : after: LED AffectsStock :Enable Brokarage1,Enable Brokarage3 ;;Enable Brokarage2,


[Line :Enable Brokarage1]
Field : Long Prompt,Isbrokarage
local : field :Long Prompt : set as : "Using as Brokarage ?"
/*[Line : Enable Brokarage2]
field : Long prompt,creatBrokarage
local : field : long prompt : set as : "Brokarage Name :"
local : field :Long prompt : indent :2
local : field : Long prompt:inactive : $IsBrokarage
*/
[Line : Enable Brokarage3]
field : Long prompt,commfield
local : field : long prompt : set as : "Commision :"
local : field :Long prompt : indent :2
local : field : Long prompt:inactive : Not $IsBrokarage


[Field : Isbrokarage]
use : logical field
storage :IsBrokarage
Set as: If $$IsEmpty:$$Value then "No" else $$Value
set always : yes

[Field :commfield]
use : number field
style : normal
width : .5 inch
align : right
storage : prtycommision
format : "nozero,nocomma,percentage"
Inactive : Not $IsBrokarage

;;**************************************************************************************************************
[Collection:Chassiscollection]
use : Scenario12Mr ;;List of Ledgers
; Use : Alias Collection
Variable : SScenario12MR1 ;;Ledger Name

Report : Transporter Detailstruck ;;Agent Commission
Trigger : SScenario12MR1 ;;myLedger Analysis Name
; Filter : IsPartyAccount
Fetch : budge2testMr ;;Name

[Collection: Chassiscollectionpur]
use : Scenario12Mr ;;List of Ledgers
; Use : Alias Collection
Variable : SScenario12MR1 ;;Ledger Name

Report : Transporter Detailspurtrk ;;Agent Commission
Trigger : SScenario12MR1 ;;myLedger Analysis Name
; Filter : IsPartyAccount
Fetch : budge2testMr

[Collection: VehicleCollection]
use : Scenario12Vh ;;List of Ledgers
; Use : Alias Collection
Variable : SScenario12Vh1 ;;Ledger Name

Report : DRCRLEDGER REPORTVh ;;Agent Commission
Trigger : SScenario12Vh1 ;;myLedger Analysis Name
; Filter : IsPartyAccount
Fetch : budge2testVh


[Collection: EngineCollection]
use : Scenario12eng ;;List of Ledgers
; Use : Alias Collection
Variable : SScenario12Eng1 ;;Ledger Name

Report : DRCRLEDGER REPORTEng ;;Agent Commission
Trigger : SScenario12Eng1 ;;myLedger Analysis Name
; Filter : IsPartyAccount
Fetch : budge2testEng


[Variable: SScenario12MR1]

[Variable: SScenario12Vh1]

[Variable: SScenario12Eng1]

[Report:SScenario12MR1] ;;Auto Report

Use : mCollection Variable
Local : Line : mCollection Variable : Field : DSP Get Godown Name1
Local : Field: mMV Title : Info : $$Sprintf@NameOfGdwn@GdwnTitle

;[Line: DSPGodownName]

; Fields : DSPGetGodownName1
;Local : Field : Medium Prompt : Info : $$Sprintf@NameOfGdwn@GdwnTitle


[Report:SScenario12Vh1] ;;Auto Report

Use : VhCollection Variable
Local : Line : VhCollection Variable : Field : DSP Get Godown Namevh
Local : Field: mMV Title : Info : $$Sprintf@NameOfGdwn@GdwnTitle

;[Line: DSPGodownName]

; Fields : DSPGetGodownName1
;Local : Field : Medium Prompt : Info : $$Sprintf@NameOfGdwn@GdwnTitle


[Report:SScenario12Eng1] ;;Auto Report

Use : EngCollection Variable
Local : Line : EngCollection Variable : Field : DSP Get Godown NameEng
Local : Field: mMV Title : Info : $$Sprintf@NameOfGdwn@GdwnTitle

;[Line: DSPGodownName]

; Fields : DSPGetGodownName1
;Local : Field : Medium Prompt : Info : $$Sprintf@NameOfGdwn@GdwnTitle

[Field: DSP Get Godown Name1]

Use : Name Field
Table :Scenario12Mr
Show Table : Always
; Key : Scenario12Mr
; Set as : if ##DSPGodownName = "" then $$SysNamerimary else ##DSPGodownName
Modifies : SScenario12MR1
CommonTable : No

[Field: DSP Get Godown Namevh]
Use : Name Field
Table :Scenario12Vh
Show Table : Always
; Key : Scenario12Mr
; Set as : if ##DSPGodownName = "" then $$SysNamerimary else ##DSPGodownName
Modifies : SScenario12Vh1
CommonTable : No

[Field: DSP Get Godown NameEng]
Use : Name Field
Table :Scenario12Eng
Show Table : Always
; Key : Scenario12Mr
; Set as : if ##DSPGodownName = "" then $$SysNamerimary else ##DSPGodownName
Modifies : SScenario12Eng1
CommonTable : No

[Report: mCollection Variable]

Use : mModify Variables
Title : $$LocaleString:"Select Item"
Local : Form : mModify Variables : Vertical Align : Top
Local : Part : mModify Variables : Lines : mCollection Variable
Local : Collection: Default : Align : Centre


[Report:VhCollection Variable]
Use : VhModify Variables
Title : $$LocaleString:"Select Item"
Local : Form : VhModify Variables : Vertical Align : Top
Local : Part : VhModify Variables : Lines : vhCollection Variable
Local : Collection: Default : Align : Centre

[Report:EngCollection Variable]
Use : EngModify Variables
Title : $$LocaleString:"Select Item"
Local : Form : EngModify Variables : Vertical Align : Top
Local : Part : EngModify Variables : Lines : EngCollection Variable
Local : Collection: Default : Align : Centre


[Line: mCollection Variable]
[Line: vhCollection Variable]
[Line: EngCollection Variable]

[Report: mModify Variables] ;; Auto Report

Auto : Yes
Form : mModify Variables
Title : $$LocaleString:"Modify Variables"
Variable: SVCurrentCompany

[Report: VhModify Variables] ;; Auto Report

Auto : Yes
Form : VhModify Variables
Title : $$LocaleString:"Modify Variables"
Variable: SVCurrentCompany


[Report: EngModify Variables] ;; Auto Report

Auto : Yes
Form : EngModify Variables
Title : $$LocaleString:"Modify Variables"
Variable: SVCurrentCompany



[Form: mModify Variables]

No Confirm : Yes
Space Top : 0.5
Space Left : 1
Space Right : 1

Full Width : No
Full Height : No

Vertical Align : Centre

Parts : mMV Title, mModify Variables

Local : Line : Default : Space Bottom : 0.5
Local : Line : SVBudget : Space Bottom : 0
Local : Line : DSPOrderCombo : Space Bottom : 0


[Form: VhModify Variables]

No Confirm : Yes
Space Top : 0.5
Space Left : 1
Space Right : 1

Full Width : No
Full Height : No

Vertical Align : Centre

Parts : VhMV Title, VhModify Variables

Local : Line : Default : Space Bottom : 0.5
Local : Line : SVBudget : Space Bottom : 0
Local : Line : DSPOrderCombo : Space Bottom : 0

[Form: EngModify Variables]

No Confirm : Yes
Space Top : 0.5
Space Left : 1
Space Right : 1

Full Width : No
Full Height : No

Vertical Align : Centre

Parts : EngMV Title, EngModify Variables

Local : Line : Default : Space Bottom : 0.5
Local : Line : SVBudget : Space Bottom : 0
Local : Line : DSPOrderCombo : Space Bottom : 0

[Part:m MV Title]

Lines : mMV Title
Space Bottom: 0.5


[Part:VhMV Title]

Lines : VhMV Title
Space Bottom: 0.5

[Part:EngMV Title]

Lines : EngMV Title
Space Bottom: 0.5


[Part: mModify Variables]

HorizontalAlign : Centre


[Part: VhModify Variables]

HorizontalAlign : Centre


[Part: EngModify Variables]

HorizontalAlign : Centre


[Line : mMV Title]

Field : mMV Title

[Line : VhMV Title]

Field : VhMV Title



[Line : EngMV Title]

Field : EngMV Title


[Field: mMV Title]

FullWidth : Yes
Align : Centre
Case : Title
Style : Normal Bold
Border : Thin Bottom
Skip : Yes
Fixed : Yes


[Field: VhMV Title]

FullWidth : Yes
Align : Centre
Case : Title
Style : Normal Bold
Border : Thin Bottom
Skip : Yes
Fixed : Yes

[Field: EngMV Title]

FullWidth : Yes
Align : Centre
Case : Title
Style : Normal Bold
Border : Thin Bottom
Skip : Yes
Fixed : Yes

[report :Scenario12Mr]
use :Agent Commission

[system : formula]
filterbrok : $IsBrokarage
[system : udf]
IsBrokarage : logical : 2


[Key: Create Portmr]

Key : Alt+C
Action : Create : PORT MASTERmr

[Key: Alter PortMr]

Key : Ctrl+Enter
Action : Alter : PORT MASTERMr


[Collection: Scenario12Mr]

Use : Alias Collection
Title : $$LocaleString:"Truck No."
Type : budget
filter : mrfilter
Report : PORT MASTERMr
Variable : SScenario12Mr


[Variable: SScenario12MR]

Table : Scenario12Mr


[System: formula]
mrfilter : $budge2testMr = "Truck No."


[Report: PORT MASTERMr]

Family : $$LocaleString:"Accounts Masters"
Use : Master Report
Object : Budget
Local : Collection : Company : Filter : HasBudgets

Variable : MVSetSortPosition, UseAliasesInMaster
Set : MVSetSortPosition : No
Set : UseAliasesInMaster: No

Form : Scenario12Mr

[Form: Scenario12Mr]

Use : Master Accounting Form
Normal Color: White, Lily White
;; Output : MSTName12
Top Parts : p2Mr , MST Basic ,ScenarioBasic ;;,p2123
Local : Button : Master Budget : Inactive : Yes

Local : Field : MST Name12 : Control : NoActuals : $$Value = @@ActualStr


[part2Mr]
line:line2p2Mr ;;,line2p2
[line:line2p2Mr]
Space bottom:1
field:f2p2mr,f2p3mr
[field:f2p2mr]
Use : name field
Storage : budge2testMr
Set as : "Truck No."
Skip : yes
width:1.2 inch

[field:f2p3Mr]
Use : name field
;;Storage : budge2test
Set as : "MASTER"
Skip : yes
width:1 inch

;;*****************************************************

[Key: Create PortVh]

Key : Alt+C
Action : Create : PORT MASTERVh

[Key: Alter PortVh]

Key : Ctrl+Enter
Action : Alter : PORT MASTERVh

[Collection: Scenario12Vh]

Use : Alias Collection
Title : $$LocaleString:"Vehicle Regn. No."
Type : budget
filter : mrfilterVh
Report : PORT MASTERVh
Variable : SScenario12Vh

[Variable: SScenario12Vh]

Table : Scenario12Vh


[System: formula]
mrfilterVh : $budge2testVh = "Vehicle Regn. No."


[Report: PORT MASTERVh]

Family : $$LocaleString:"Accounts Masters"
Use : Master Report
Object : Budget
Local : Collection : Company : Filter : HasBudgets

Variable : MVSetSortPosition, UseAliasesInMaster
Set : MVSetSortPosition : No
Set : UseAliasesInMaster: No

Form : Scenario12Vh

[Form: Scenario12Vh]

Use : Master Accounting Form
Normal Color: White, Lily White
;; Output : MSTName12
Top Parts : p2Vh , MST Basic ,ScenarioBasic ;;,p2123
Local : Button : Master Budget : Inactive : Yes

Local : Field : MST Name12 : Control : NoActuals : $$Value = @@ActualStr


[part2Vh]
line:line2p2Vh ;;,line2p2
[line:line2p2Vh]
Space bottom:1
field:f2p2Vh,f2p3Vh
[field:f2p2Vh]
Use : name field
Storage : budge2testVh
Set as : "Vehicle Regn. No."
Skip : yes
width:1.2 inch


[field:f2p3Vh]
Use : name field
;;Storage : budge2test
Set as : "MASTER"
Skip : yes
width:1 inch

;;************************************************************************************

[Key: Create PortEng]

Key : Alt+C
Action : Create : PORT MASTEREng


[Key: Alter PortEng]

Key : Ctrl+Enter
Action : Alter : PORT MASTEREng

[Collection: Scenario12Eng]

Use : Alias Collection
Title : $$LocaleString:"Vehicle Regn. No."
Type : budget
filter : mrfilterEng
Report : PORT MASTEREng
Variable : SScenario12Eng


[Variable: SScenario12Eng]

Table : Scenario12Eng

[System: formula]
mrfilterEng : $budge2testEng = "Engine No."


[Report: PORT MASTEREng]

Family : $$LocaleString:"Accounts Masters"
Use : Master Report
Object : Budget
Local : Collection : Company : Filter : HasBudgets

Variable : MVSetSortPosition, UseAliasesInMaster
Set : MVSetSortPosition : No
Set : UseAliasesInMaster: No

Form : Scenario12Eng

[Form: Scenario12Eng]

Use : Master Accounting Form
Normal Color: White, Lily White
;; Output : MSTName12
Top Parts : p2Eng , MST Basic ,ScenarioBasic ;;,p2123
Local : Button : Master Budget : Inactive : Yes

Local : Field : MST Name12 : Control : NoActuals : $$Value = @@ActualStr


[part2Eng]
line:line2p2Eng ;;,line2p2
[line:line2p2Eng]
Space bottom:1
field:f2p2Eng,f2p3Eng
[field:f2p2Eng]
Use : name field
Storage : budge2testEng
Set as : "Engine No."
Skip : yes
width:1.2 inch

[field:f2p3Eng]
Use : name field
;;Storage : budge2test
Set as : "MASTER"
Skip : yes
width:1 inch

[system : udf]
budge2testMr :string : 3016
budge2testVh :string : 3017
budge2testEng :string : 3018

 

Pls provide scrrenshot of your problem i can't get you.

 

Dear All,
In Income wise report there is problem in income ledger filter. but problem is solved so find the attached code.

 

nice work
keep going
if ok with you share the code for learning