Sir How to Fetch Quantity in Report , Check Below code is Correct or not

Discussion in 'Requests' started by sanjaygori, Jun 6, 2016.

    
  1. sanjaygori

    sanjaygori New Member


    Please Rectified this Part

    [Field : MyVchqty_slr]
    Use : Number Field
    Set As : $BILLEDQTY
    Format : "NoZero"
    Border : Thin Right
    Width : 10
    Style:Normal
     


  2. NAGARAJKMAR SUBRAMANIAN

    NAGARAJKMAR SUBRAMANIAN Active Member


    [Field : MyVchqty_slr]
    Use : Number Field
    Set As : $$Number:$BilledQty
    Format : "NoZero"
    Border : Thin Right
    Width : 10
    Style:Normal
     


  3. mpal2311

    mpal2311 Active Member


    Great.
     


  4. sanjaygori

    sanjaygori New Member


    Closing stock and opening stock show in Profit & loss account is possible or not
     


  5. anbhuselvan

    anbhuselvan Member


    Dear Sir,

    Im unable to fetch the Purchase Quantity in Customized Purchase invoice, Kindly see my TDL change and help me sir.

    [#Form: Comprehensive Invoice]

    Parts : STDInvoiceTop, EXPINV OpPageBreak, EXPINV Details
    BottomParts : EXPINV Totals , EXPINV SignOff , EXPINV Customer, EXPINV Jurisdiction, EXPINV InvoiceCompGen

    ; Width : @@InvWidth Inch
    ; Height : @@InvHeight Inch
    ; Space Top : @@InvSpace inch
    ; Space Right : 0.5 inch
    ; Space Left : @@InvSpaceLeft inch
    ; Space Bottom: 0.25 inch

    Page Break : EXPINV ClPageBreak, EXPINV OpPageBreak

    Option : Dealer ExcisePurchaseInvoice : (@@IsExciseTraderOn AND (@@IsPurchase OR @@IsDebitNote) AND @@IsTraderInvoice AND ##PUDealerExciseDutyInfo)
    Option : STX Comprehensive Invoice : @@IsIndianServiceTax AND $$STXCanUpdateDutyLed
    Option : Invoice Bank Info Fetch : ##SABankInfo AND NOT $$IsSysName:##SABankName

    ;; When Sales Bill is made in Voucher mode, while printing sales ledger is also getting printed
    Set Always : SVViewName : $$SysName:InvVchView
    Delete :parts : STDInvoiceTop, EXPINV OpPageBreak, EXPINV Details
    Delete :BottomParts : EXPINV Totals , EXPINV SignOff , EXPINV Customer, EXPINV Jurisdiction, EXPINV InvoiceCompGen

    Add: Top Parts : INV;,EXPSMPtitle1

    Height : 100% Page
    Width : 100% Page
    Space Top : 0.25 inch
    Space Right : 0.25 inch
    Space Left : 0.5 inch
    Space Bottom: 0.5 inch

    [part : INV]
    ;Line :RMCmpName,INVS, TRWK,RMCmpAdd, MIComPhone,MIVATTINNumber
    Line :RMCmpName,INVS, TRWK,RMCmpAdd,MIVATTINNumber,CSTN
    Repeat : RMCmpAdd:Company Address
    Line : MI VCHDate,MI PartyName;, MI ColumnTitles
    Add: Line: MIQuantity
    Add: Line: MI rate
    Add: Line: IE Amount , MI AmtInWords
    Add: Line: Global ForCmp1
    Add: Line: INCDetails
    Border: MyBorder
    ;


    [Border: MyBorder]
    Top : Flush, Thin, Full Length
    Bottom : Flush, thin, full length
    Left : Thin
    Right : Flush, Thin, Full Length

    [Border: MyBorder1]
    ;Top : Flush, Thin, Full Length
    Bottom : Flush, thin, full length
    ;Left : Thin
    ;Right : Flush, Thin, Full Length

    [Line :INVS]
    Field: INVS
    [Field: INVS]
    Set as : "BOUGHT NOTE"
    Style : newSTY2
    Align : Center
    FullWidth : Yes

    [Line :TRWK]
    Field: TRWK
    [Field: TRWK]
    Set as : "Trading To Waste Kraft Boxes"
    Style : newSTY2
    Align : Center
    FullWidth : Yes


    [Line: RM CmpName]
    Fields : RMcmpname

    [Field : RMCmpName]
    Set as :mad:@CmpMailName
    Align : Center
    FullWidth : Yes
    Style : newSTY1

    [Line : RMCmpAdd]
    Fields : RMCmpAdd

    [Field : RMCmpAdd]
    Set as : $Address
    Align : Center
    FullWidth : Yes
    Style : newSTY1
    /*
    [Line: MI ComPhone]
    Field : MI ComPhone
    [Field: MI ComPhone]
    Use : Name Field
    Set as : $phonenumber:Company:##SvCurrentCompany
    Indent : 10
    */

    [Line: MI VATTINNumber]
    Left Fields: Short Prompt, MI VATTINNumber
    ;Right Fields: Short Prompt, CSTN
    Local : Field : Short Prompt : Set as : "TIN No:"
    ;Local : Field : Short Prompt : Set as : "GST : "
    [Field : MI VATTINNumber]
    Use : Name Field
    Set as : $VATTINNUMBER:Company:##SvCurrentCompany
    ;FullWidth : yes
    Style : pp6
    Align : Center

    [Line: CSTN]
    Right Fields: Short Prompt, CSTN
    Local : Field : Short Prompt : Set as : "CST.N : "
    [Field : CSTN]
    Use : Name Field
    Set as : $InterstateStnumber:Company:##SvCurrentCompany
    ;FullWidth : yes
    Style : pp6
    Align : Center

    [Line: MI VCHDate]
    Field : Simple Prompt, MI VCHNo
    Right Field : Short Prompt, MI VCHDate
    Local : Field : Short Prompt : Set as : "Voucher Date : "
    Local : Field : Simple Prompt : Set as : " Voucher No : "
    Border: MyBorder1

    [Field: MI VCHDate]
    Use : Short Date Field
    Set as : $Date

    [Field: MI VCHNo]
    Use : Short Name Field
    Set as : $VoucherNumber

    [Line: MI PartyName]
    Space Top: 1
    Field : Short Prompt, MI PartyNAme
    Local : Field : Short Prompt : Set as : "Purchaser: (Name & Vehical No: "

    [Field: MI PartyName]
    Use : Name Field
    Set as : $PartyLedgerName
    ;Set as: $BuyerName


    [Line: MIQuantity]
    Space Top: 1
    Field : Short Prompt , IE Qty
    Local : Field : Short Prompt : Set as : "Quantity: "


    [Field: IE Qty]
    Use : Qty Title Field
    Set As : $LastPurcQty
    Format : "NoZero"
    ;Border : Thin Right
    Width : 10
    Style:Normal
    Type : Quantity
    ;[Field: MIQuantity]
    /*Use : Qty Primary Field ;Number Field ;;
    ;Use : Qty Primary Field
    Set as : $BasicQty
    Format : "NoSymbol,Primary"
    */


    /*
    [Field : IE Qty]
    Use : QtyPrimaryField
    Set as : $BilledQty
    Border : Thin Left
    Format :"No Symbol,No Zero"
    Style : Style9
    Width : 4.2
    Align : Right */

    ;Use : Qty Primary Field
    ;Use: Number Field
    ;Set as : $BilledQty:StockItem:$StockItemName
    ;Border : Thin Left
    [Line: MI rate]
    Space Top: 1
    Field : Short Prompt, MI rate
    Local : Field : Short Prompt : Set as : "Unit Price: "

    ;Explode : Item Desc : $$NumItems:UserDescription > 0

    [Field : MI rate]

    ;Use : Rate Field
    ;Border : Thin Left
    ;Rate Units Field
    ;Use: Number Field
    ;Set as : $Rate

    ;Use : Rate Price Field
    ;Set as : $Rate

    Use:Rate Price Field
    Set as:$LastPurcPrice:StockItem:$StockItemName
    Width:15
    Style:Normal Bold Italic
    Set always : Yes
    Format : "Symbol,Forex"
    Type: Rate

    /*[Field:priceratefield]
    Use:Rate Price Field
    Set as:$LastPurcPrice:StockItem:$StockItemName
    Width:15
    Style:Normal Bold Italic
    Set always : Yes
    Format : "Symbol,Forex"
    Type: Rate

    */

    [Line: IE Amount]
    Space Top: 1
    Field : Short Prompt, IE Amount
    Local : Field : Short Prompt : Set as : "Amount: "

    [Field : IE Amount]
    Use : Amount Field
    Set as : $Amount
    ;Border : Thin Left Right
    Format : "NoComma,NoZero"
    ;FullWidth : yes

    [Line: MI AmtInWords]
    Space Top: 1
    Field : Short Prompt, MI AmtInWords
    Local : Field : Short Prompt : Set as : "Rs: "

    [Field : MI AmtInWords]
    Use : Name Field
    Set as : $$InWords:$Amount
    FullWidth : yes
    Style : Small

    [Line: Global ForCmp1]
    Space Top: 2
    Right Fields: Global ForCmp1
    Space Bottom: 2

    [Field: Global ForCmp1]


    Use : Name Field
    Set as : "For " + @@CMPMailNAme
    Align : Right
    Width : 0

    [Line: INCDetails]
    Space Top: 1
    Field : INCDetails
    ;Local : Field : Short Prompt : Set as : "Purchaser tax Shall be paid bythe Purchaser"

    [Field: INCDetails]
    Style : Normal1
    Set as: "Purchaser tax Shall be paid bythe Purchaser"

    /*[Collection:VCHCollection]
    Type: Stock Item
    */


    [System: Formula]



    LargeSize : 14
    SmallerSize : 6

    ;******************** Cardinal styles ********************;

    [Style: Normal1]

    ;; for linux face name is changed
    Font : if $$SysInfo:IsWindows then "Arial" else "Helvetica"
    Bold: Yes
    Height : @@LargeSize



    [Collection: Voucher CollectionCSknl]
    Type : Voucher
    [Collection: SItemCollCSknl]
    Source Collection : Voucher CollectionCSknl
    Walk : All Inventory Entries
    By : Name : $StockItemName ;; Grouping done by Stock Item
    Aggr Compute : TrPurcQty : Sum : If @@CSknlPurcVr Then $BilledQty Else 0
    Aggr Compute : TrSaleQty : Sum : If @@CSknlSaleVr Then $BilledQty Else 0
    Aggr Compute : TrTranOutQty : Sum : If @@CSknlStockJrnlVr And NOT $$IsInwards:$BilledQty Then $BilledQty Else 0
    Aggr Compute : TrTranInQty : Sum : If @@CSknlStockJrnlVr And $$IsInwards:$BilledQty Then $BilledQty Else 0
    ;; Aggregation done on Stock Item to compute Purchase, Sales, Consumption and Production quantities

    Compute : ItClQty : $StkClBalance:StockItem:$StockItemName
    Compute : ItOpQty : $StkOpBalance:StockItem:$StockItemName
    Sort : @@SortAlphaIncr : $Name
    ;; System Formula
    [System: Formula]
    CSknlPurc Vr : $$IsPurchase:$VoucherTypeName
    CSknlSale Vr : $$IsSales:$VoucherTypeName
    CSknlStock Jrnl Vr : $$IsStockJrnl:$VoucherTypeName
    ;; End-of-File
     


Share This Page