कुल पेज दृश्य

बुधवार, 26 जनवरी 2022

Tally Chapter 138 TDL for Monthly Distach Item & Party wise By Rajiv Mishra Computer Class



 few lines are missing here. Watch the lesson Video for complete code.


 : Y : Display : STQueryCSknl : NOT $$IsEmpty:$$SelectedCmps 


[Report: STQueryCSknl]

Use : DSP Template

Form : STQueryCSknl

Title : "Month Wise Dispatch"

PrintSet : Report Title : "Month Wise Item Wise Total sales"

 Variable : SV Print Orientation : String

 Variable : ETNETNPartyMatInNameLed : String

Set : ETNETNPartyMatInNameLed : ""


 Variable : ETNETNPartyMatInItemNameLedItem : String

Set : ETNETNPartyMatInItemNameLedItem : ""


[Form: STQueryCsKnl]

Use : DSP Template

Parts : DB Title, STQueryCSknl

Delete : Buttons : ExplodeFlag

Delete : Bottom Buttons : DSPAutoColumns, BudgetAnalysis, ReportConfig

Local: Line : DB Title : Local : Field : Name Field: Set as : "Month Wise Item Wise Total Sales"

background : White

 Button :Print Button,Export Button,ETNETNPartyMatIn,ETNETNPartyMatInItem

 Set Always : SV Print Orientation : "Landscape"





[Button : ETNETNPartyMatInItem]

Key : Alt+I

Title : Stock Item

Action : Alter:ETNETNPartyMatInItemNameLedItem

[Report: ETNETNPartyMatInItemNameLedItem]

Form : ETNETNPartyMatInItemNameLedItem

[Form : ETNETNPartyMatInItemNameLedItem]

Part: ETNETNPartyMatInItemNameLedItem

 

[Part :ETNETNPartyMatInItemNameLedItem]

Line: ETNETNPartyMatInItemNameLedItem

 

[Line : ETNETNPartyMatInItemNameLedItem]

Field: ETNETNmyfield,ETNETNPartyMatInItemNameLedItem

[Field :ETNETNPartyMatInItemNameLedItem]

Use : name Field

Table : ETNETN Stock Item  ME

Show Table : Always

Variable:ETNETNPartyMatInItemNameLedItem

Modifies : ETNETNPartyMatInItemNameLedItem


 [Field :ETNETNmyfield]

Use : name Field

Table : ETNETN Stock Item  new

Show Table : Always

storage : ETNETNmyme

 [system : udf]

ETNETNmyme : string : 8654


[Collection: ETNETN Stock Item  new]

    Type: Stock Item

     

    BelongsTo: Yes

Fetch  : Name, Parent


Format : $Parent,30


 






[Collection: ETNETN Stock Item  ME]

    Type: Stock Item

     

    BelongsTo: Yes

   Filter :ETNETN jobi1


[System:formula]


ETNETNjobi1:$$IsEqual:$parent:$$LocaleString:#ETNETNmyfield






; select ledger starts from here


 

 

[Button : ETNETNPartyMatIn]

Key : Alt+V

Title : Select Ledger

Action : Alter:ETNETNPartyMatInNameLed

[Report: ETNETNPartyMatInNameLed]

Form : ETNETNPartyMatInNameLed

[Form : ETNETNPartyMatInNameLed]

Part: ETNETNPartyMatInNameLed

[Part :ETNETNPartyMatInNameLed]

Line: ETNETNPartyMatInNameLed

[Line : ETNETNPartyMatInNameLed]

Field: ETNETNPartyMatInNameLed

[Field :ETNETNPartyMatInNameLed]

Use : name Field

Table : ETNETN My Ledger

Show Table : Always

Variable:ETNETNPartyMatInNameLed

Modifies : ETNETNPartyMatInNameLed



[Collection: ETNETN My Ledger]

    Type: Ledger

    ChildOf: $$GroupSundryDebtors

    BelongsTo: Yes




[Part: STQueryCSknl]

Lines : STQueryCSknlT, STQueryCSknl

Repeat : STQueryCSknl : SItemCollCSknl

Scroll : both

Common Borders : Yes

Total : OpQtyCSknl, InQtyCSknl, ConsQtyCSknl, ProdQtyCSknl, OutwQtyCSknl, ClosQtyCSknl,qtyoct,qtynov,qtydec,qtyjan,qtyfeb,qtymar,QTYTOTAL


[Line: STQueryCSknlT]

Use : STQueryCSknl

Local : Field : Default : Type : String

Local : Field : Default : Align : Center

Local : Field : Default : color : Blue

Local : Field : Default : background :Yellow

Local : Field : Default : Lines : 0

Local : Field : ItemNameCSknl : Align : Left

Local : Field : ItemNameCSknl : Set as: "ITem Name"

Local : Field : OpQtyCSknl : Set as: "APR"

Local : Field : InQtyCSknl : Set as: "MAY"

Local : Field : ConsQtyCSknl : Set as: "JUN"

Local : Field : ProdQtyCSknl : Set as: "JUL"

Local : Field : OutwQtyCSknl : Set as: "AUG"

Local : Field : ClosQtyCSknl : Set as: "SEP"

Local : Field : qtyoct : Set as: "OCT"

Local : Field : qtynov : Set as: "NOV"

Local : Field : qtydec : Set as: "DEC"

Local : Field : qtyjan : Set as: "JAN"

Local : Field : qtyfeb : Set as: "FEB"

Local : Field : qtymar : Set as: "MAR"

Local : Field : qtyTOTAL : Set as: "TOTAL"

Border : column titles

 


[Line: STQueryCSknl]

Fields : ItemNameCSknl, OpQtyCSknl, InQtyCSknl, ConsQtyCSknl +

, ProdQtyCSknl, OutwQtyCSknl, ClosQtyCSknl,qtyoct,qtynov,qtydec,qtyjan,qtyfeb,qtymar

right field : qtytotal

Repeat : ClosQtyCSknl

Option : AlterOnEnter


[Field: ItemNameCSknl] 

 Set As : $Stockitem

 

 Display : Item Monthly Summary

 Variable  : StockitemName

 Border: thin Left right

width : if $$inprintmode then 18 else 36

Style : Normal


[Field: OpQtyCSknl] 

Use : Qty Primary Field

Style : Normal

Format : "No Zero"

Set as : $QtyApr

Border : Thin Left Right

Width : if $$inprintmode then 7 else 8

;Scroll : Yes

;Display : Stock Summary


[Field: InQtyCSknl]  

Use : OpQtyCSknl

Set As : $QtyMay

Border : Thin Right

Style : Normal

Width : if $$inprintmode then 7 else 8

[Field: ConsQtyCSknl] 

Use : InQtyCSknl

Set As : $QtyJun

Border : Thin Right

Style : Normal

Width : if $$inprintmode then 7 else 8


[Field: ProdQtyCSknl] 

Use : InQtyCSknl

Set As : $QtyJul

Border : Thin Right

Style : Normal

Width : if $$inprintmode then 7 else 8

[Field: OutwQtyCSknl] 

Use : InQtyCSknl

Set As : $QtyAug

Border : Thin Right

Style : Normal

Width : if $$inprintmode then 7 else 8

[Field: ClosQtyCSknl]  

Use : InQtyCSknl

Set As : $QtySep

Border : Thin Right

Style : Normal

Width : if $$inprintmode then 7 else 8

[Field: qtyoct] 

Use : InQtyCSknl

Set As : $Qtyoct

Border : Thin Right

Style : Normal

Width : if $$inprintmode then 7 else 8

[Field: qtynov] 

Use : InQtyCSknl

Set As : $Qtynov

Border : Thin Right

Style : Normal

 Width : if $$inprintmode then 7 else 8


[Field: qtydec] 

Use : InQtyCSknl

Set As : $Qtydec

Border : Thin Right

Style : Normal

Width : if $$inprintmode then 7 else 8

[Field: qtyjan] 

Use : InQtyCSknl

Set As : $Qtyjan

Border : Thin Right

Style : Normal

Width : if $$inprintmode then 7 else 8


[Field: qtyfeb] 

Use : InQtyCSknl

Set As : $Qtyfeb

Border : Thin Right

Style : Normal

Width : if $$inprintmode then 7 else 8

[Field: qtymar] 

Use : InQtyCSknl

Set As : $Qtymar

Border : Thin Right

Style : Normal

Width : if $$inprintmode then 7 else 8


[Field: qtytotal] 

Use : InQtyCSknl

Set As : $QtyTotal

Border : Thin Right

Style : Normal bold

Width : if $$inprintmode then 7 else 8


[Collection: Voucher CollectionCSknl]

Type : Vouchers : VoucherType

 Child of : $$VchTypeSales

 Belongs to : yes

 Fetch  : Date,All Inventory Entries

;Filter : zerovaluefilter

Filter : PartyFilterMatLedETNETN

 


[Collection: SItemCollCSknl]

Source Collection : Voucher CollectionCSknl

Walk : All Inventory Entries

By : Stockitem : $StockItemName  

Aggr Compute : Qtyapr : Sum : If @@CSknlSaleVr and @@dateapr Then $BilledQty Else 0

Aggr Compute : Qtymay : Sum : If @@CSknlSaleVr and @@datemay Then $BilledQty Else 0

Aggr Compute : Qtyjun : Sum : If @@CSknlSaleVr and @@datejun Then $BilledQty Else 0

Aggr Compute : Qtyjul : Sum : If @@CSknlSaleVr and @@datejul Then $BilledQty Else 0

Aggr Compute : Qtyaug : Sum : If @@CSknlSaleVr and @@dateaug Then $BilledQty Else 0

Aggr Compute : Qtysep : Sum :If @@CSknlSaleVr and @@datesep Then $BilledQty Else 0

 Aggr Compute : Qtyoct : Sum :If @@CSknlSaleVr and @@dateoct Then $BilledQty Else 0

Aggr Compute : Qtynov : Sum :If @@CSknlSaleVr and @@datenov Then $BilledQty Else 0

Aggr Compute : Qtydec : Sum :If @@CSknlSaleVr and @@datedec Then $BilledQty Else 0

Aggr Compute : Qtyjan : Sum :If @@CSknlSaleVr and @@datejan Then $BilledQty Else 0

Aggr Compute : Qtyfeb : Sum :If @@CSknlSaleVr and @@datefeb Then $BilledQty Else 0

Aggr Compute : Qtymar : Sum :If @@CSknlSaleVr and @@datemar Then $BilledQty Else 0

Aggr Compute : Qtytotal : Sum :If @@CSknlSaleVr Then $BilledQty Else 0

Sort : @@SortAlphaIncr : $partyledgername

 filter : PartyFilterMatItemETNETN


[System: Formula]

; zerovaluefilter : $AllLedgerEntries.BillAllocations.Amount <> ""

 PartyFilterMatLedETNETN: $Ledgername = ##ETNETNPartyMatInNameLed or $$IsSysName:##ETNETNPartyMatInNameLed

 PartyFilterMatItemETNETN:$StockItem = ##ETNETNPartyMatInItemNameLedItem or $$IsSysName:##ETNETNPartyMatInItemNameLedItem


CSknlPurc Vr : $$IsPurchase:$VoucherTypeName

CSknlSale Vr : $$IsSales:$VoucherTypeName

CSknlStock Jrnl Vr : $$IsStockJrnl:$VoucherTypeName

dateapr   : $$MonthOfDate:$date>=4 and $$MonthOfDate:$date<=4 

datemay : $$MonthOfDate:$date>=5 and $$MonthOfDate:$date<=5

datejun   : $$MonthOfDate:$date>=6 and $$MonthOfDate:$date<=6

datejul    : $$MonthOfDate:$date>=7 and $$MonthOfDate:$date<=7

dateaug  : $$MonthOfDate:$date>=8 and $$MonthOfDate:$date<=8

datesep  : $$MonthOfDate:$date>=9 and $$MonthOfDate:$date<=9

 dateoct  : $$MonthOfDate:$date>=10 and $$MonthOfDate:$date<=10

datenov  : $$MonthOfDate:$date>=11 and $$MonthOfDate:$date<=11

datedec  : $$MonthOfDate:$date>=12 and $$MonthOfDate:$date<=12

datejan  : $$MonthOfDate:$date>=1 and $$MonthOfDate:$date<=1

datefeb  : $$MonthOfDate:$date>=2 and $$MonthOfDate:$date<=2

datemar  : $$MonthOfDate:$date>=3 and $$MonthOfDate:$date<=3

कोई टिप्पणी नहीं:

एक टिप्पणी भेजें

 [#Form: Master Accounting Form] Delete: Bottom Buttons : Master Group, Master Ledger, Master VchType, Blank Button ;, Master Company Operat...