1. CLICK HERE TO JOIN WHATSAPP CHANNEL FOR TDL PROGRAMS

De-Activate or Block of stock for Purchase/Sales

Discussion in 'Free Source Codes' started by Rajsrisrimal, Oct 9, 2017.

    
  1. Rajsrisrimal

    Rajsrisrimal Member


    Dear Sir,
    Can any one help me to find error in this TDL and update for mention remark for block as per Image 2 and same will show in closing stock as Image 1 for the mentioned Code.

    [#Part: STKI Basic Features]
    Add:part:After:STKI Batch:STKI Control

    [Part:Stki Control]
    Line:Stki Control

    [Line:STKI Control]
    Field:Stki Control,Stki Control1

    [Field:Stki Control]
    Use:name Field
    Info:"De-Activate this Stock Item ?"
    Width: 22
    Background: Yellow

    [Field:Stki Control1]
    Use : Logical Field
    Storage :isStockITEMcontrol
    Set As : Yes
    Set Always : Yes

    [System:udf]
    isStockITEMcontrol:Logical:3015

    [System:Formula]
    USEDStockitem:Not $isStockITEMcontrol

    [#Collection: Vch Stock Item Extract]
    Filter: usedstockitem

    [#Collection: List of POSStockItems]
    Filter: usedstockitem image1.jpg image two.jpg
     
    Rajsrisrimal, Oct 9, 2017
    #1


  2. Rajsrisrimal

    Rajsrisrimal Member


    sir Waiting for Expert help.
     
    Rajsrisrimal, Oct 12, 2017
    #2


  3. Rajsrisrimal

    Rajsrisrimal Member


    SIR
    Please help to solve this error
     
    Rajsrisrimal, Oct 15, 2017
    #3


  4. admin

    admin Administrator Staff Member


    Msg me if you still need solution for this
     
    admin, Nov 20, 2017
    #4


  5. Rajsrisrimal

    Rajsrisrimal Member


    yes Sir
    still not solved
     
    Rajsrisrimal, Dec 1, 2017
    #5


  6. Prasanna Pathak

    Prasanna Pathak Member


    ;;Not Able to store values
    ;; please enable the ladger description in Accounting Invoice

    [#Part: EI DescExplosion]

    Line : EI DescExplosion
    Repeat : EI DescExplosion : BasicUserDescription
    BreakOn : $$IsEmpty:$BasicUserDescription
    Scroll : Vertical




    [#Line: EI DescExplosion]

    Fields : EI Desc
    Add:Field:After:EI Desc:EI DescNew
    Indent : If ($$InPrintMode AND NOT ($$IsStockJrnl:##SVVoucherType OR $$IsPhysStock:##SVVoucherType)) Then 6 Else 2
    Option : EI DescExplosion Excel : $$InExportMode AND @@IsExcelFormat AND NOT ($$IsPhysStock:##SVVoucherType OR $$IsStockJrnl:##SVVoucherType)
    Remove if : #EIDesc = $$String:0

    [#Line: EI DescExplosion Excel]

    Add : Right Fields: EXPINV PartNo, EXPINV MRPValue, EXPINV VATPerc, EXPINV DueOn, EXPINV ActualQty, EXPINV Qty, EXPINV Rate, EXPINV RatePer, EXPINV Discount, EXPINV Amount
    Option : ExpINV AltQtyCol : @@InvWithQty AND NOT $$IsEmpty:$StockItemName AND @@Altunits And @@AltUnitasCol
    Local : Field : EXPINV PartNo : Type : String
    Local : Field : EXPINV MRPValue : Type : String
    Local : Field : EXPINV VATPerc : Type : String
    Local : Field : EXPINV DueOn : Type : String
    Local : Field : EXPINV ActualQty : Type : String
    Local : Field : EXPINV Qty : Type : String
    Local : Field : EXPINV Rate : Type : String
    Local : Field : EXPINV RatePer : Type : String
    Local : Field : EXPINV Discount : Type : String
    Local : Field : EXPINV Amount : Type : String
    Local : Field : EXPINV ActualAltQty : Type : String
    Local : Field : EXPINV BilledAltQty : Type : String


    Local : Field : EXPINV DueOn : Delete : Storage
    Local : Field : EXPINV ActualQty : Delete : Storage
    Local : Field : EXPINV Qty : Delete : Storage

    Local : Field : EXPINV PartNo : Set as : ""
    Local : Field : EXPINV MRPValue : Set as : ""
    Local : Field : EXPINV VATPerc : Set as : ""
    Local : Field : EXPINV DueOn : Set as : ""
    Local : Field : EXPINV ActualQty : Set as : ""
    Local : Field : EXPINV Qty : Set as : ""
    Local : Field : EXPINV Rate : Set as : ""
    Local : Field : EXPINV RatePer : Set as : ""
    Local : Field : EXPINV Discount : Set as : ""
    Local : Field : EXPINV Amount : Set as : ""
    Local : Field : EXPINV ActualAltQty : Set as : ""
    Local : Field : EXPINV BilledAltQty : Set as : ""




    [#Field: EI Desc]

    Use : Name Field
    Style : Small Italic
    Storage : BasicUserDescription
    Set as : If (($$ExplodeLevel = 0) AND ($$Line = 1) AND NOT ##SVAcctsInvoice) Then $Description:StockItem:$StockItemName Else $$Value
    Cells : @@ExcelItemColumn


    [Field:EI DescNew]
    Use:Number field
    Storage:Descnew
    Set Always:Yes



    [System:UDF]
    Descnew:Number:700
     
    Prasanna Pathak, Mar 1, 2018
    #6


  7. 9779845157470

    9779845157470 New Member


    [#Part: STKI Basic Features]
    Add:part:After:STKI Batch:STKI Control

    [Part:Stki Control]
    Line:Stki Control,reason

    [Line:STKI Control]
    Field:Stki Control,Stki Control1
    [Line:reason]
    Field:reason,reason 1

    [Field:Stki Control]
    Use:name Field
    Info:"De-Activate this Stock Item ?"
    Width: 22
    Background: Yellow

    [Field:Stki Control1]
    Use : Logical Field
    Storage :isStockITEMcontrol
    Set As : Yes
    Set Always : Yes
    [Field:reason]
    Use:name Field
    Info:"Reason for De-Active ?"
    Width: 22
    Background: Yellow

    [Field:reason 1]
    Use : name field
    Type:String
    Storage :isreason

    Skip:$isStockITEMcontrol="No"
    [System:udf]
    isStockITEMcontrol:Logical:3015
    isreason:String:3016
    [System:Formula]
    USEDStockitem:Not $isStockITEMcontrol

    [#Collection: Vch Stock Item Extract]
    Filter :usedstockitem

    [#Collection: List of POSStockItems]
    Filter: usedstockitem

    [#Line: DSP AccLine]
    Add:Field:asd
    [Field:asd]
    Width:30
    Space Left:30
    Align:Center

    Set:$isreason
     
    9779845157470, May 28, 2021
    #7


Share This Page