[#Menu: Gateway of Tally]
Add : Item : Before : @@locStockSummary : Godown Stock Report : Execute :
GDStockReportVKY
[Report: GDStockReportVKY]
[Form: GDStockReportVKY]
Part : GDStockReportVKY
On : Form Accept : Yes : Form Accept
On : Form Accept : Yes : Display : GDStockReport
Background : @@SV_UNYELLOW
[Part: GDStockReportVKY]
Line : GDStockReporVKYoup,GDStockReportCat,GDStockReportItem
[Line: GDStockReporVKYoup]
Field : Medium Prompt,GDStockReporVKYoup
Local : Field : Medium Prompt : Set As : "Stock Group : "
[Field: GDStockReporVKYoup]
Use : Name Field
Table : GDStockReporVKYoup,ALLSysNames
Show Table : Always
Modifies : GDStockReporVKYoup
[Line: GDStockReportCat]
Field : Medium Prompt,GDStockReportCat
Local : Field : Medium Prompt : Set As : "Stock Category : "
[Field: GDStockReportCat]
Use : Name Field
Table : GDStockReportCat,ALLSysNames
Show Table : Always
Modifies : GDStockReportCat
[Line: GDStockReportItem]
Field : Medium Prompt,GDStockReportItem
Local : Field : Medium Prompt : Set As : "Stock Item : "
[Field: GDStockReportItem]
Use : Name Field
Table : GDStockReportCollALL,ALLSysNames
Show Table : Always
Modifies : GDStockReportItem
[Collection: GDStockReporVKYoup]
Title : "Stock Groups"
Type : Stock Group
Format : $Name,30
[Collection: ALLSysNames]
List name : $$SysName:AllItems
[Collection: GDStockReportCat]
Title : "Stock Category"
Type : Stock Category
Format : $Name,30
[Variable: GDStockReporVKYoup]
Type : String
Persistent : Yes
[Variable: GDStockReportCat]
Type : String
Persistent : Yes
[Variable: GDStockReportItem]
Type : String
Persistent : Yes
[System: Variable]
GDStockReporVKYoup : ""
GDStockReportCat : ""
GDStockReportItem : ""
;;-- GDStockReport
[Report: GDStockReport]
Title : "Godown Stock Report"
PrintSet : ReportTitle : "Godown Stock Report - (Stock Group : "
+ ##GDStockReporVKYoup + " , Category : " + ##GDStockReportCat +" )"
Variable : DoSetAutoColumn,DSPRepeatCollection,GDName
Repeat : GDName
Set : DSPRepeatCollection:GDNameColl
Set : DoSetAutoColumn : Yes
[Form: GDStockReport]
Part : DSP ReportTime, DSP CompanyName, DSP CompanyAddress, DSP
GSTCmpRegnNo, DSP ReportTitle, DSP PageNo,
GDStkRepTTL,GDStockReportTTL,GDStockReport
Bottom Part : GDStockReportBTM
Option : Set Auto Vch Option : ##DoSetAutoColumn AND $
$SetAutoColumns:GDName
Background : @@SV_UNYELLOW
Buttons : PrintButton, ExportButton, UploadButton, MailButton,Change
Period,ChgVariable
Page Break : ClosPgBrk,OPnPgBrk
[Part: ClosPgBrk]
Line : ClosPgBrk
[Line: ClosPgBrk]
Border : Thin Top
Right Field : Simple Field
Local : Field : Simple Field : Set As : "Continue.... "
[Part: OPnPgBrk]
Part : DSP ReportTime, DSP CompanyName, DSP CompanyAddress, DSP
GSTCmpRegnNo, DSP ReportTitle, DSP PageNo, GDStkRepTTL,GDStockReportTTL
Vertical : Yes
[!Form: Set Auto Vch Option]
[Part: GDStkRepTTL]
Line : GDStkRepTTL
Invisible : $$InPrintMode
[Line:GDStkRepTTL]
Field : Name Field
Right Field : Simple Field
Local : Field : Name Field : Set As : "Godown Item
Report - (Stock Group : " + ##GDStockReporVKYoup + " , Category : " +
##GDStockReportCat +" )"
Local : Field : Name Field : Width : 50 % Page
Local : Field : Simple Field : Set As : "From " + $
$String:##SVFromDate + " to " + $$String:##SVCurrentDate
[Part: GDStockReportTTL]
Line : GDStockReportTTL
Border : Column titles
[Line: GDStockReportTTL]
Field : GDStockReport,GDStockPartNo,StockGDName
Repeat : StockGDName
Local : Field : StockGDName : Set As : ##GDName
Local : Field : Default : Type : String
Local : Field : Default : Style : Small Bold
Local : Field : GDStockReport : Set As : "Item Name"
Local : Field : GDStockPartNo : Set As : "Part No."
Local : Field : Default : Align : Center
[Part: GDStockReport]
Line : GDStockReport
Repeat : GDStockReport :GDStockReportColl
Scroll : Vertical
Total : StockGDName
CommonBorder: Yes
Float : No
Option : GDStockReportALL : ##GDStockReporVKYoup = $
$SysName:AllItems and ##GDStockReportCat = $$SysName:AllItems
Option : CatStockReportALL : ##GDStockReporVKYoup != $
$SysName:AllItems And ##GDStockReportCat != $$SysName:AllItems
Option : CatStockReportALL2 : ##GDStockReporVKYoup = $
$SysName:AllItems And ##GDStockReportCat != $$SysName:AllItems
[!Part: GDStockReportALL]
Repeat : GDStockReport :GDStockReportCollALL
[!Part: CatStockReportALL]
Local : Collection : GDStockReportColl : Add : Filter : IsSameCat
[!Part: CatStockReportALL2]
Repeat : GDStockReport :GDStockReportCollALL
Local : Collection : GDStockReportCollALL : Add : Filter :
IsSameCat
[Line: GDStockReport]
Field : GDStockReport,GDStockPartNo,StockGDName
Repeat : StockGDName
Local : Field : Default : Style : Small
Empty : $Name != ##GDStockReportItem And ##GDStockReportItem !=
$$SysName:AllItems
[Field: GDStockReport]
Use : Name Field
Set As : $Name
Width : 30
Quick Search: yes
[Field: GDStockPartNo]
Use : Name Field
Set As : $PartNo
Width : 10
Border : Thin Left
[Field: StockGDName]
Type : Quantity
Width : 18
Set As : $$GodownItemValue:##GDName:$Name:$ClosingBalance
Type : Quantity
Align : Right
Border : Thin Left
[Part: GDStockReportBTM]
Line : GDStockReportBTM
Border : Totals
[Line: GDStockReportBTM]
Field : GDStockReport,GDStockPartNo,StockGDName
Repeat : StockGDName
Local : Field : GDStockReport : Set As : "Total"
Local : Field : Default : Style : Small Bold
Local : Field : StockGDName : Type : Quantity
Local : Field : StockGDName : Set As : $$Total:StockGDName
Local : Field : Default : Align : Center
[Collection: GDStockReportColl]
Type : StockItem
Child of : ##GDStockReporVKYoup
Belongs to : yes
Filter : IsEmptyBalance
Fetch : ClosingBalance
[System: Formulae]
IsEmptyBalance : Not $$IsEmpty:$ClosingBalance
[Collection: GDStockReportCollALL]
Title : "List of items"
Use : Alias Collection
Type : StockItem
; Format : $Name,30
Filter : IsEmptyBalance
[Collection: GDStockReportCollCat]
Type : StockItem
Child of : ##GDStockReporVKYoup
Filter : IsSameCat
Filter : IsEmptyBalance
[System :Formula]
IsSameCat : $Category = ##GDStockReportCat Or $
$IsBelongsToCategory:##GDStockReportCat
IshaveStk : Not $$IsEmpty:$ClosingBalance
[Collection: GDNameColl]
Type : Godown
Compute : GDName : $Name
Filter : IshaveStk
[Variable: GDName]
Type : String
Repeat : ##DSPRepeatCollection
[Button : ChgVariable]
Title : "Change Filter"
Key : Alt + 1
Action : Execute : ChgVariable
[Report: ChgVariable]
[Form: ChgVariable]
Part : GDStockReportVKY
Background : @@SV_UNYELLOW
On : Form Accept : Yes : Form Accept
On : Form Accept : Yes : RefreshTDL
