Predefined Narration

Discussion in 'Free Source Codes' started by JObimon Arackal JOhn, Apr 19, 2013.

    
  1. JObimon Arackal JOhn

    JObimon Arackal JOhn Active Member



    Make your own TDL. If you face any problem; post your problem others will help you.

    Do not Except anything free
     


  2. saranbe

    saranbe New Member


    SIR,
    I DON'T NEED FREE TDL. I DON'T KNOW WRITE TDL BUT WE USING THE FOLLOWING FORMAT. BUT NOW I WANT LATEST FORMAT

    [#form : sales color]
    add : print : Quotation Printout ;: if $$issales:##svvouchertype

    [Report : Quotation printout]
    Form : Mekelamani Quotation
    Object : Voucher
    ;Empty : ##SVVoucherType not contains "Quotation Creation"

    [Form : Mekelamani Quotation]
    Part : quotpart1,mekalamani quotations,quotpart2,quotpart3,BEOPGBrkk,quotpart44 ;;;;quotpart4;,quotpart3 ;qcmppart,qpart1,qbuyerpart ;,qpart3;,qpart4 ;sec_part,part2,in_part,part3,part4,part5,part6
    Bottom part : quotpart5,quotpart6,quotpart7,quotpart8 ;,quotpart5 ;qpart3
    ;bottom part : quotpart5,quotpart6,quotpart7 ;,qpart4
    Height : 100% page
    Width : 100% page
    space right : 5% page
    space top : 4% page
    space left : 8% page
    delete : page break
    add : page break : CLPGBrkk,BEOPGBrkk

    [Part : CLPGBrkk]
    Part: BEcontinuepartt ;;,quotpart5,quotpart6,quotpart7,quotpart8 ;;,BEIpart7,BEIpart8 ;BEIpart5,BEIpart6,BEIpart7,BEIpart8
    ;Part:CLPGBrkln1
    Vertical : yes
    ;;Scroll : Vertical

    [Part:CLPGBrklnn1]
    Line : CLPGBrkln1
    [Line :CLPGBrkln1]
    Field : CLPG Brkfld1
    [Field :CLPG Brkfld1]
    Use : Name Field
    Set as : ”Continued………………….”

    [Part: BEOPGBrkk]
    ;;Use:part1
    Part : quotpart4 ;BEIpart1,BEIpart2,BEIpart3;,BEIpart4 ;part1,part2,in_part,invoice_details,consignee,part4Title,part4
    ;Vertical : yes

    [part : BEcontinuepartt]
    space top : 2% page
    Line : BEcontinuee
    [Line : BEcontinuee]
    right Field : BEcontinuee
    [Field : BEcontinuee]
    set as : "Continued..."

    [part : quotpart1]
    part : quotlogo,quotation ;quotation ;quotlogo,quotation

    [part : quotlogo]
    space bottom : 1% page ;;2 mms
    Height : 8% page ;;5% page ;;18 mms
    width : 12% page ;;screen
    Line : quotlogo1
    add : image : mekalamani logo
    [Line : quotlogo1]
    Field : quotlogo2
    [Field : quotlogo2]
    set as : ""
    [Resource : mekalamani logo]
    Source : "D:\LOGO\BBLogo.jpg" ;;"D:\Logo\rkrlogo.jpg" ;"D:\fabrication logo.jpg" ;"Images\TallyStartup.JPG"s
    Resource Type : Jpeg

    [part : quotation]
    Line : qtitle;,quotnoanddate,quotfromto
    [Line: qtitle]
    space top : 1% page ;;6 mms
    Field : qtitle1
    space bottom : 1% page
    [Field : qtitle1]
    Info : "QUOTATION"
    align : left
    space left : 31.5% page ;;77 mms
    full width : yes
    style : mekela1
    Print FG : Red

    [part : mekalamani quotations]
    ;;space top : 2 mms
    Line : quotnoanddate,quotfromto
    border : thin top left right
    common border : yes
    float : no
    [Line : quotnoanddate]
    space top : 0.5% page ;;1 mms
    Field : quotno1,quotno2,quotdate1,quotdate2
    border : thin bottom
    [Field : quotno1]
    width : 6% page ;;screen
    info : "NO : "
    style : mekela6
    Print FG : Red
    [Field : quotno2]
    width : 44% page ;;screen
    set as : $Vouchernumber
    style : mekela2
    [Field : quotdate1]
    info : "DT. : "
    align : right
    full width : yes
    style : mekela6
    Print FG : Red
    [Field : quotdate2]
    set as : $$string:$date
    style : mekela2
    [Line : quotfromto]
    space top : 0.75% page ;;2 mms
    Field : quotfrom,quotto
    [Field : quotfrom]
    width : 50% page ;; screen
    info : "From : "
    style : mekela6
    Print FG : Red
    [Field : quotto]
    info : "To : "
    full width : yes
    align : left
    ;;space left : 5% page ;;screen
    style : mekela6
    border : thin left
    Print FG : Red

    [part : quotpart2]
    height :11% page
    part : quotp2left,quotp2right ; quotlogo,quotp2left,quotp2right
    border : thin left right bottom
    /*[part : quotlogo]
    width : 10% screen
    Line : quotlogo1
    add : image : mekalamani logo
    [Line : quotlogo1]
    Field : quotlogo2
    [Field : quotlogo2]
    set as : ""
    [Resource : mekalamani logo]
    Source : "D:\LOGO\rkrlogo.jpg" ;"Images\TallyStartup.JPG"s
    Resource Type : Jpeg*/

    [part : quotp2left]
    ;width : 40% screen
    Line : quotcmpname,quotcmpaddress,quotwebsite ;quotcmpphno,quotwebsite ;quotcmpphno,quotemail,quotwebsite
    Repeat : quotcmpaddress : Company address
    [Line : quotcmpname]
    space top : 1% page ;;2 mms
    Field : quotcmpname1
    [Field : quotcmpname1]
    width : 50% page ;;59.90% page ;;screen
    ;;; set as : ##SVCurrentCompany
    set as : @@CMPMAILNAME

    style : mekela6
    space left : 6% page ;;screen
    print FG : Red
    ;full width : yes
    ;align : center
    [Line : quotcmpaddress]
    space top : 0.30% page ;;1 mms
    Field : quotcmpaddress1
    [Field : quotcmpaddress1]
    width : 50% page ;;59.90% page ;;screen
    set as : $address
    style : mekela2
    space left : 6% page ;;screen
    Print FG : Red
    ;full width : yes
    ;align : center
    [Line : quotcmpphno]
    space top : 0.30% page ;;1 mms
    Field : quotcmpphno1
    [Field : quotcmpphno1]
    width : 50% page ;;59.90% page ;;screen
    set as : "Ph No. : "+$PhoneNumber:Company:##SVCurrentCompany
    style : mekela2
    space left : 6% page ;;screen
    Print FG : Red
    [Line : quotemail]
    space top : 0.30% page ;;1 mms
    Field : quotemail1
    [Field : quotemail1]
    width : 50% page ;;59.90% page ;;screen
    set as : "E-mail : "+$Email:Company:##SVCurrentCompany
    style : mekela2
    space left : 6% page ;;screen
    Print FG : Red
    [Line : quotwebsite]
    space top : 0.5% page ;;1 mms
    Field : quotwebsite1
    [Field : quotwebsite1]
    width : 50% page ;;59.90% page ;;screen
    ;; set as : "Website : "+$website11:Company:##SVCurrentCompany
    set as : "Website : www.balajielectricals.com"
    style : mekela2
    space left : 6% page ;;screen
    Print FG : Red
    case : small

    [part : quotp2right]
    Line : quotbuyername,quotbuyeraddress ;,quotbuyerhno,quotbuyeremail
    Repeat : quotbuyeraddress : Buyeraddress
    border : thin left
    [Line : quotbuyername]
    space top : 1% page ;;2 mms
    Field : quotbuyername1
    [Field : quotbuyername1]
    set as : $BuyerName
    style : mekela2
    full width : yes
    align : left
    space left : 4% page ;;screen

    [Line : quotbuyeraddress]
    ;;height : 2% page
    space top : 0.30% page ;;1 mms
    Field : quotbuyeraddress1
    [Field : quotbuyeraddress1]
    set as : $BuyerAddress
    style : mekela2
    full width : yes
    align : left
    space left : 4% page ;;screen

    [part : quotpart3]
    Line : qattn,qdear,qsub,qref,qcontent

    [Line : qattn]
    space top : 0.75% page ;;2 mms
    Field : qattn1,qattn2
    [Field : qattn1]
    info : "Kind Attn. : "
    style : mekela6
    ;full width : yes
    width : 12.5% page ;;screen
    align : left
    Print FG : Red
    [Field : qattn2]
    set as : $qkindattn
    style : mekela2
    full width : yes
    ;align : center
    ;wide space : yes

    [Line : qdear]
    SPACE TOP : 0.5% page ;;1 mms
    Field : qdear1,qdear2
    [Field : qdear1]
    width : 6.5% page ;;screen
    info : "Dear "
    style : mekela6
    Print FG : Red
    [Field : qdear2]
    set as : $qdear+","
    style : mekela6
    full width : yes
    Print FG : Red

    [Line : qsub]
    space top : 0.5% page ;;1 mms
    Field : qsub1,qsub2
    [Field : qsub1]
    width : 7% page ;;screen
    info : "Sub: "
    style : mekela6
    Print FG : Red
    [Field : qsub2]
    set as : $qsubject
    style : mekela2
    full width : yes

    [Line : qref]
    space top : 0.5% page ;;1 mms
    Field : qref1,qref2
    [Field : qref1]
    width : 7% page ;;screen
    info : "Ref: "
    style : mekela6
    Print FG : Red
    [Field : qref2]
    set as : $qreference
    style : mekela2
    full width : yes

    [Line : qcontent]
    space top : 0.5% page ;;2 mms
    space bottom : 0.6% page ;;2 mms
    Field : qcontent1
    [Field : qcontent1]
    Info : "We have pleasure to quoting our price as under subject to the terms and conditions mentioned below."
    space left : 5% page ;;8 mms
    style : mekela2
    full width : yes

    [part : quotpart4]
    height : 2.5% page
    ;;height : 60% page ;;105 mms
    border : thin box
    Line : qpart4title ;;,qpart4data
    ;;repeat : qpart4data : Inventoryentries
    common border : yes
    float : no
    [Line : qpart4title]
    space top : 0.5% page ;;2 mms
    ;;height : 2.5% page ;;8 mms
    ;border : thin bottom
    Field : qsno,qdesc ;;,qqty,qunit,qrate,qtax
    right fields : qqty,qunit,qrate,qtax
    [Field : qsno]
    info : "S.No."
    width : 6% page ;;screen
    align : center
    border : thin right
    style : mekela6
    Print FG : Red
    [Field : qdesc]
    info : "Descriptions"
    ;width : 75% page ;;screen
    full width : yes
    ;full width : yes
    align : left
    space left : 21.5% page
    border : thin right
    Print FG : Red
    style : mekela6
    [Field : qqty]
    info : "Quantity"
    width : 10% page ;;screen ;12% screen
    align : center
    ;full width : yes
    border : thin right
    style : mekela6
    Print FG : Red
    [Field : qunit]
    info : "Unit"
    width : 10% page ;;screen ;12% screen
    align : center
    ;full width : yes
    border : thin right
    style : mekela6
    Print FG : Red
    [Field : qrate]
    info : "Rate"
    width : 10% page ;;screen
    border : thin right
    ;full width : yes
    align : center
    style : mekela6
    Print FG : Red
    [Field : qtax]
    info : "Remarks"
    width : 10% page ;;screen
    ;full width : yes
    align : center
    style : mekela6
    Print FG : Red

    [part : quotpart44]
    ;;height : 36% page
    Line : qpart44data
    border : thin left right bottom
    repeat : qpart44data : Inventoryentries
    common border : yes
    float : no
    scroll : vertical
    vertical : yes

    [Part : BE UserDesccrip]
    Line : BE UserDescripp1
    Repeat : BE UserDescripp1 : User Description

    [Line : BE UserDescripp1]
    Field : qsno1,qdesc1 ;;,qqty1,qunit1,qrate1,qtax1 ;;BEsno1
    right fields : qqty1,qunit1,qrate1,qtax1
    ;;Field : BEdesc1
    ;;right field : BEtax1,BEqty1,BErate1,BEunit1,BEdisc1,BEamount1
    Empty : $$IsEmpty:$UserDescription

    Local : Field : default : Set as : ""
    Local : Field : qdesc1 : Set as : $UserDescription
    Local : Field : qdesc1 : full width : yes
    Local : Field : qdesc1 : space left : 2% page
    Local : Field : qdesc1 : align : left

    [Line : qpart44data]
    space top : 0.5% page ;;1 mms
    height : 2% page;;3 mms
    Field : qsno1,qdesc1;;,qqty1,qunit1,qrate1,qtax1
    right fields : qqty1,qunit1,qrate1,qtax1
    Explode : BE UserDesccrip
    [Field : qsno1]
    set as : $$Line
    width : 6% page ;;screen
    align : center
    border : thin right
    style : mekela2
    [Field : qdesc1]
    set as : $StockItemname ;;+$UserDescription
    ;full width : yes
    ;width : 75% page ;;screen
    full width : yes
    align : left ;;left
    ;line : 2
    border : thin right
    style : mekela2
    [Field : qqty1]
    set as : $Billedqty
    width : 10% page ;;screen ;12% screen
    align : center
    border : thin right
    style : mekela2
    ;full width : yes
    [Field : qunit1]
    set as : $BaseUnits:StockItem:$StockItemName
    width : 10% page ;;screen ;12% screen
    align : center
    border : thin right
    style : mekela2
    ;full width : yes
    [Field : qrate1]
    use : rate price field
    set as : $Rate
    width : 10% page ;;screen
    align : center ;;right
    space right : 0.5% page ;;2 mms
    ;full width : yes
    ;style : normal
    style : mekela2
    border : thin right
    ;line : 5
    [Field : qtax1]
    ;use : rate price field
    ;; use : number field
    format : "No zero, percentage"
    ;; set as : If $RateOfVAT:TAXClassification:mad:Balaji = 0 Then "-" Else $RateOfVAT:TAXClassification:mad:Balaji ;;+$$string:"%"
    Balaji : $$CollectionField:$TaxClassificationName:1:AccountingAllocations
    set as : $PackageMarks
    width : 10% page ;;screen
    align : center
    space right : 0.5% page ;;2 mms
    ;full width : yes
    ;style : normal
    style : mekela2

    [part : quotpart5]
    Line : qterms
    [Line : qterms]
    space top : 0.5% page ;;2 mms
    space bottom : 0.75% page ;;4 mms
    Field : qterms1
    [Field : qterms1]
    info : "Terms & Conditions : "
    style : mekela6
    width : 30% page ;;screen
    Print FG : Red

    [part : quotpart6]
    border : thin box
    Line : qtermsandconditions8
    common border : yes
    float : no
    [Line : qtermsandconditions8]
    height : 2% page ;;5 mms
    space top : 0.25% page ;;1 mms
    Field : s.no8,qmtermsandconditions8,qmmtermsandconditions8
    ;border : thin bottom
    [Field : s.no8]
    info : "1"
    width : 3% page ;;screen
    border : thin right
    style : mekela2
    [Field : qmtermsandconditions8]
    info : "Delivery"
    width : 20% page ;;screen
    align : left
    space left : 0.25% page ;;1 mms
    border : thin right
    style : mekela2
    [Field : qmmtermsandconditions8]
    set as : $qdelivery
    full width : yes
    align : left
    space left : 0.25% page ;;1 mms
    style :mekela2
    ;line : 2

    [part : quotpart7]
    border : thin left right bottom
    ;part : quotp7left,quotp7right
    Line : qcon1,qcon6,qcon8
    common border : yes
    float : no
    [Line : qcon1]
    height : 2% page ;;5 mms
    border : thin bottom
    Field : qsno2,qdeliverytime1,qdeliverytime2;,qsno6,qentrytax1,qentrytax2
    [Field : qsno2]
    info : "2"
    width : 3% page ;;screen
    border : thin right
    style : mekela2
    [Field : qdeliverytime1]
    info : "Place"
    width : 20% page ;;screen
    align : left
    space left : 0.25% page ;;1 mms
    border : thin right
    style : mekela2
    [Field : qdeliverytime2]
    set as : $qplace
    ;width : 30% screen
    ;border : thin right
    full width : yes
    ;width : 25% screen
    align : left
    space left : 0.25% page ;;1 mms
    style : mekela2
    ;line : 3


    [Line : qcon6]
    height : 2% page ;;5 mms
    border : thin bottom
    Field : qsno7,qpayment1,qpayment2
    [Field : qsno7]
    info : "3"
    width : 3% page ;;screen
    ;border : thin right
    style : mekela2
    [Field : qpayment1]
    info : "Payment"
    width : 20% page ;;screen
    align : left
    space left : 0.25% page ;;1 mms
    ;border : thin right
    style : mekela2
    [Field : qpayment2]
    set as : $qpayment
    full width : yes
    align : left
    space left : 0.25% page ;;1 mms
    style : mekela2
    ;line : 2

    [Line : qcon8]
    height : 2% page ;;5 mms
    ;border : thin bottom
    Field : qsno9,qvalidity1,qvalidity2
    [Field : qsno9]
    info : "4"
    width : 3% page ;;screen
    ;border : thin right
    style : mekela2
    [Field : qvalidity1]
    info : "Validity"
    width : 20% page ;;screen
    align : left
    space left : 0.25% page ;;1 mms
    ;border : thin right
    style : mekela2
    [Field : qvalidity2]
    set as : $qvalidity
    full width : yes
    align : left
    space left : 0.25% page ;;1 mms
    style : mekela2
    ;line : 2

    [part : quotpart8]
    ;height : 35 mms
    Line : last linee,thanking,thcmpname,thauthsign
    [Line : last linee]
    space top : 0.5% page ;;1 mms
    Field : last linee
    [field : last linee]
    space left : 3% page ;;screen
    info : "Please consider the above and send us your valuable order which will meet our best and prompt attention"
    style : mekela2
    full width : yes

    [Line : thanking]
    space top : 0.5% page ;;1 mms
    Field : thanking
    [field : thanking]
    info : "Thanking you,"
    style : mekela2
    full width : yes
    align : left
    pRINT FG : Red

    [Line : thcmpname]
    space top : 0.5% page ;;1 mms
    Field : thcmpname
    [field : thcmpname]
    ;; set as : ##SVCurrentCompany
    set as : @@CMPMAILNAME
    style : mekela3
    full width : yes
    align : left
    Print FG : Red

    [Line : thauthsign]
    space top : 7% page ;;17 mms
    Field : thauthsign
    [field : thauthsign]
    info : "Authorised Signatory"
    style : mekela2
    full width : yes
    align : left
    Print FG : Red

    /*
    [part : quotp7left]
    width : 50% screen
    border : thin right
    Line : qtermsandconditions9,qtermsandconditions10,qtermsandconditions11,qtermsandconditions12;,qtermsandconditions13,qtermsandconditions14,qtermsandconditions15,qtermsandconditions16;,qtermsandconditions17
    common border : yes
    float : no

    [Line : qtermsandconditions9]
    height : 6 mms
    space top : 1 mms
    Field : s.no9,qmtermsandconditions9,qmmtermsandconditions9
    border : thin bottom
    [Field : s.no9]
    info : "2"
    width : 4% screen
    border : thin right
    style : mekela5
    [Field : qmtermsandconditions9]
    info : "Delivery Time"
    width : 20% screen
    align : left
    space left : 1 mms
    border : thin right
    style : mekela5
    [Field : qmmtermsandconditions9]
    set as : $qdeliverytime
    full width : yes
    ;width : 25% screen
    align : left
    space left : 1 mms
    style : mekela5
    ;line : 2

    [Line : qtermsandconditions10]
    height : 6 mms
    space top : 1 mms
    Field : s.no10,qmtermsandconditions10,qmmtermsandconditions10
    border : thin bottom
    [Field : s.no10]
    info : "3"
    width : 4% screen
    border : thin right
    style : mekela5
    [Field : qmtermsandconditions10]
    info : "Inspection"
    width : 20% screen
    align : left
    space left : 1 mms
    border : thin right
    style : mekela5
    [Field : qmmtermsandconditions10]
    set as : $qinspection
    full width : yes
    align : left
    space left : 1 mms
    style : mekela5
    ;width : 25% screen
    ;line : 2

    [Line : qtermsandconditions11]
    height : 6 mms
    space top : 1 mms
    Field : s.no11,qmtermsandconditions11,qmmtermsandconditions11
    border : thin bottom
    [Field : s.no11]
    info : "4"
    width : 4% screen
    border : thin right
    style : mekela5
    [Field : qmtermsandconditions11]
    info : "Sales Tax"
    width : 20% screen
    align : left
    space left : 1 mms
    border : thin right
    style : mekela5
    [Field : qmmtermsandconditions11]
    set as : $qsales
    full width : yes
    align : left
    space left : 1 mms
    style : mekela5
    ;width : 25% screen
    ;line : 2

    [Line : qtermsandconditions12]
    height : 6 mms
    space top : 1 mms
    Field : s.no12,qmtermsandconditions12,qmmtermsandconditions12
    ;border : thin bottom
    [Field : s.no12]
    info : "5"
    width : 4% screen
    border : thin right
    style : mekela5
    [Field : qmtermsandconditions12]
    info : "Central Excise"
    width : 20% screen
    align : left
    space left : 1 mms
    border : thin right
    style : mekela5
    [Field : qmmtermsandconditions12]
    set as : $qcentral
    full width : yes
    align : left
    space left : 1 mms
    style : mekela5
    ;width : 25% screen
    ;line : 2

    [part : quotp7right]
    Line : qtermsandconditions13,qtermsandconditions14,qtermsandconditions15,qtermsandconditions16 ;,qtermsandconditions17
    ;border : Thin Bottom Right ;box
    common border : yes
    float : no

    [Line : qtermsandconditions13]
    height : 6 mms
    space top : 1 mms
    Field : s.no13,qmtermsandconditions13,qmmtermsandconditions13
    border : thin bottom
    [Field : s.no13]
    info : "6"
    width : 4% screen
    border : thin right
    style : mekela5
    [Field : qmtermsandconditions13]
    info : "Entry Tax"
    width : 20% screen
    align : left
    space left : 1 mms
    border : thin right
    style : mekela5
    [Field : qmmtermsandconditions13]
    set as : $qentry
    ;full width : yes
    align : left
    space left : 1 mms
    style : mekela5
    ;line : 2

    [Line : qtermsandconditions14]
    height : 6 mms
    space top : 1 mms
    Field : s.no14,qmtermsandconditions14,qmmtermsandconditions14
    border : thin bottom
    [Field : s.no14]
    info : "7"
    width : 4% screen
    border : thin right
    style : mekela5
    [Field : qmtermsandconditions14]
    info : "Payment"
    width : 20% screen
    align : left
    space left : 1 mms
    border : thin right
    style : mekela5
    [Field : qmmtermsandconditions14]
    set as : $qpayment
    ;full width : yes
    align : left
    space left : 1 mms
    style : mekela5
    ;line : 2

    [Line : qtermsandconditions15]
    height : 6 mms
    space top : 1 mms
    Field : s.no15,qmtermsandconditions15,qmmtermsandconditions15
    border : thin bottom
    [Field : s.no15]
    info : "8"
    width : 4% screen
    border : thin right
    style : mekela5
    [Field : qmtermsandconditions15]
    info : "Insurance"
    width : 20% screen
    align : left
    space left : 1 mms
    border : thin right
    style : mekela5
    [Field : qmmtermsandconditions15]
    set as : $qinsurance
    ;full width : yes
    align : left
    space left : 1 mms
    style : mekela5
    ;line : 2
    [Line : qtermsandconditions16]
    height : 6 mms
    space top : 1 mms
    Field : s.no16,qmtermsandconditions16,qmmtermsandconditions16
    ;border : thin bottom
    [Field : s.no16]
    info : "9"
    width : 4% screen
    border : thin right
    style : mekela5
    [Field : qmtermsandconditions16]
    info : "Validity"
    width : 20% screen
    align : left
    space left : 1 mms
    border : thin right
    style : mekela5

    [Field : qmmtermsandconditions16]
    set as : $qvalidity
    ;full width : yes
    align : left
    space left : 1 mms
    style : mekela5
    ;line : 2
    */
    [#PART : DBLLINENarration]
    add : line : before : VCH ICFGBoMCompDetails : qdeli,qpayment ;,qvalidity

    [Line : qdeli]
    FIELDS : short prompt ,qdelivery,medium prompt,qplace
    LOCAL : FIELD : short PROMPT : INFO : "Delivery :"
    LOCAL : FIELD : short PROMPT : invisible : not ##SVVouchertype = "Quotation Creation"
    LOCAL : FIELD : medium PROMPT : INFO : "Place :"
    LOCAL : FIELD : medium PROMPT : invisible : not ##SVVouchertype = "Quotation Creation"


    [Field : qdelivery]
    STORAGE : qdelivery
    set as : $qdelivery
    width : 45% page ;;130 mms
    USE : Name field
    maximum : 130
    line : 2
    invisible : not ##SVVouchertype = "Quotation Creation"
    [Field : qplace]
    STORAGE : qplace
    set as : $qplace
    width : 45% page ;;130 mms
    USE : Name field
    maximum : 100
    line : 2
    invisible : not ##SVVouchertype = "Quotation Creation"


    [Line : qpayment]
    FIELDS : SHORT PROMPT,qpaymentt1,medium prompt,qvalidityy1
    LOCAL : FIELD : SHORT PROMPT : INFO : "payment :"
    LOCAL : FIELD : medium PROMPT : INFO : "Validity :"
    LOCAL : FIELD : SHORT PROMPT : invisible : not ##SVVouchertype = "Quotation Creation"
    LOCAL : FIELD : medium PROMPT : invisible : not ##SVVouchertype = "Quotation Creation"

    [Field : qpaymentt1]
    STORAGE : qpayment
    set as : $qpayment
    width : 45% page ;;130 mms
    USE : Name field
    maximum : 130
    line : 2
    invisible : not ##SVVouchertype = "Quotation Creation"
    [Field : qvalidityy1]
    STORAGE : qvalidity
    set as : $qvalidity
    width : 45% page ;;130 mms
    USE : Name field
    maximum : 100
    line : 2
    invisible : not ##SVVouchertype = "Quotation Creation"




    ;;;;;; SUB FORM

    /*[#Field: VCH StockItem]
    Sub Form : mekelauserdescription : ##SVVoucherType = "Quotation Creation" ;and $LedgerName = $StockItemname

    [Report : mekelauserdescription ]
    Title : $$LocaleString:"Product Description"
    Form : Mekela UserDescriptions
    object : Voucher

    [Form : Mekela UserDescriptions]
    Background : White, Lily White
    Height : 80 % screen
    Width : 80 % screen
    Part : mekalauser1
    [part : mekalauser1]
    Line : userdesc1,userdesc2,userdesc3
    [Line : userdesc1]
    Field : userdesc11
    [Field : userdesc11]
    maximum : 972
    ;use : name field
    storage : userdescrip1
    full width : yes
    line : 3
    [Line : userdesc2]
    Field : userdesc22
    [Field : userdesc22]
    maximum : 972
    ;use : name field
    storage : userdescrip2
    full width : yes
    Line : 3
    [Line : userdesc3]
    Field : userdesc33
    [Field : userdesc33]
    maximum : 972
    ;use : name field
    storage : userdescrip3
    full width : yes
    line : 3*/

    /*[#Field: VCH Rate]
    Sub Form : mekelaratedescription : ##SVVoucherType = "Quotation Creation" ;and $LedgerName = $StockItemname

    [Report : mekelaratedescription ]
    Title : $$LocaleString:"Rate Description"
    Form : Mekela rateDescriptions
    object : Voucher

    [Form : Mekela rateDescriptions]
    Background : White, Lily White
    Height : 80 % screen
    Width : 80 % screen
    Part : mekalarate1
    [part : mekalarate1]
    Line : userrate1
    [Line : userrate1]
    Field : userrate11
    [Field : userrate11]
    maximum : 100
    ;use : name field
    storage : userrate1
    full width : yes
    ;line : 3*/

    /*[system : UDF]
    userdescrip1 : string: 2031
    userdescrip2 : string: 2032
    userdescrip3 : string: 2033
    userrate1 : string : 2034*/

    [system : UDF]
    qkindattn : string : 2011
    qdear : string : 2012
    qsubject : string : 2013
    qreference : string : 2014
    ;qdraw : string : 2015
    ;qfab : string : 2016
    ;qmat : string : 2017
    ;qtest : string : 2018
    ;qheat : string : 2019
    ;qclean : string : 2020
    ;qpaint : string : 2021
    qdelivery : string : 2022
    qplace : string : 2023
    ;qinspection : string : 2024
    ;qsales : string : 2025
    ;qcentral : string : 2026
    ;qentry : string : 2027
    qpayment : string : 2028
    ;qinsurance : string : 2029
    qvalidity : string : 2030

    [#Part: EI BaseInfo]
    add : line : before : EI Consignee : kindattention,qdearsir,qsubject,qreference

    [Line : kindattention]
    Field : Simple Prompt,kindattention1
    Local : Field : Simple Prompt: Info : $$LocaleString:"Kind Attention :"
    Local : Field : Simple Prompt: Width : 15
    ;Local : Field : Short Prompt : Set as : $$LocaleString:"Price Level" + ":"
    Local : Field : Simple Prompt : Invisible : not ##SVVouchertype = "Quotation Creation"

    [Field : kindattention1]
    Use : name Field
    storage : qkindattn
    invisible : not ##SVVouchertype = "Quotation Creation"

    [Line : qdearsir]
    Field : Simple Prompt,qdearsir1
    Local : Field : Simple Prompt: Info : $$LocaleString:"Dear :"
    Local : Field : Simple Prompt: Width : 15
    ;Local : Field : Short Prompt : Set as : $$LocaleString:"Price Level" + ":"
    Local : Field : Simple Prompt : Invisible : not ##SVVouchertype = "Quotation Creation"

    [Field : qdearsir1]
    Use : name Field
    storage : qdear
    invisible : not ##SVVouchertype = "Quotation Creation"

    [Line : qsubject]
    Field : Simple Prompt,qsubject1
    Local : Field : Simple Prompt: Info : $$LocaleString:"Subject :"
    Local : Field : Simple Prompt: Width : 15
    ;Local : Field : Short Prompt : Set as : $$LocaleString:"Price Level" + ":"
    Local : Field : Simple Prompt : Invisible : not ##SVVouchertype = "Quotation Creation"

    [Field : qsubject1]
    Use : name Field
    storage : qsubject
    width : 70% page ;;200 mms
    invisible : not ##SVVouchertype = "Quotation Creation"
    maximum : 250


    [Line : qreference]
    Field : Simple Prompt,qreference1
    Local : Field : Simple Prompt: Info : $$LocaleString:"Reference :"
    Local : Field : Simple Prompt: Width : 15
    ;Local : Field : Short Prompt : Set as : $$LocaleString:"Price Level" + ":"
    Local : Field : Simple Prompt : Invisible : not ##SVVouchertype = "Quotation Creation"

    [Field : qreference1]
    Use : name Field
    storage : qreference
    width : 70% page ;;200 mms
    invisible : not ##SVVouchertype = "Quotation Creation" and ledgername=$Stockitemname
    maximum : 250

    [#Part: Company MailingDetails]
    Add: bottom Line: Mymekala

    [Line: Mymekala]
    Field: Short Prompt,My mekala1
    Local: Field: ShortPrompt: Set as : "Website : "

    [Field: My mekala1]
    Use: name Field
    Storage: website11
    maximum : 40
    case : small

    [system : udf]
    website11:string:1333

    [style : mekela1]
    font : Arial
    height : 12
    bold : yes

    [style : mekela2]
    font : Arial
    height : 11
    ;bold : yes

    [style : mekela3]
    font : Arial
    height : 12
    bold : yes

    [style : mekela4]
    font : Arial
    height : 14
    bold : yes

    [style : mekela5]
    font : Arial
    height : 9
    ;bold : yes
    [style : mekela6]
    font : Arial
    height : 11
    bold : yes
     


  3. PERSONALPURPOSE

    PERSONALPURPOSE New Member


    You are great, no word to appreciate
     


  4. uma

    uma New Member


    it works, very good tdl.
     



  5. no working Tally 9.2.14
     



  6. Inventroy detail s in ledger please code upload
     



  7. Inventroy detail s in ledger please code upload
     


  8. randhir

    randhir New Member


    sir please provide purchase order approval tdl... & requesition creation.
     


  9. JObimon Arackal JOhn

    JObimon Arackal JOhn Active Member



    Make your own TDL. If you face any problem; post your problem others will help you.

    Do not Except anything free
     
    admin likes this.


  10. randhir

    randhir New Member



  11. Hariram

    Hariram New Member


    Great
    Thank you sir
     


  12. Sanjay Manna

    Sanjay Manna Member



  13. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    Obviously not....Prime was not Born in 2016....

    Just replace the ERP9. specific Part/Line/fields with Prime specific ... and it will work.
     


Share This Page