1. CLICK HERE TO JOIN WHATSAPP CHANNEL FOR TDL PROGRAMS

Cont new with the last thread for rent a car details- Vch entry screen

Discussion in 'Tally Developer' started by Nirav Merchant, Mar 11, 2013.

    
  1. Nirav Merchant

    Nirav Merchant Active Member


    this sample code - allows user to enter - sale entry for rent a car -

    ;;; Screen Entry For Customer Slip

    [system : udf]
    cartripto: string : 15
    carreportat : string : 16
    carvehicletype : string : 17
    carbookingdt : string : 18
    carbookday : string : 19
    carstkm : amount : 5
    carendkm : amount : 6
    carsttime : string : 20
    carcltime : string : 21
    cartotkm : amount : 7
    cartothrs : amount : 8
    carextkm : amount : 9
    carexthrs : amount : 10
    carrelplace : string : 22
    custkms : amount : 11
    custtime : amount : 12

    [#Line: EI Consignee]

    ADD : field : after : EI Consignee : custslip, carslipyesno

    ;;[line : custslip]
    ;;field : custslip

    [field : custslip]
    info : "Customer Rent a Car Details"
    style : Normal
    invisible :$VoucherTypeName != $$VchTypeSales


    [field : carslipyesno]
    use : logical field
    set as : "No"
    invisible :$VoucherTypeName != $$VchTypeSales
    subform : custsubform : $$Issales:##SVVoucherType and $$value

    [report : custsubform]
    form : custsubform

    [form : custsubform]
    use : dsp template
    part : custsubtop, custsubbottom
    height : 75% screen
    width : 75% screen
    ;;vertical : yes
    ;;border : thin box

    [part : custsubtop]
    part : custsubtop1, custsubtop2
    vertical : yes

    [part : custsubtop1]
    lines : custsliptitle


    [part : custsubtop2]
    part : custsubtop2left
    right part : custsubtop2right
    vertical : no
    border : thick bottom

    [part : custsubtop2left]
    lines : custtripto, custreportat, custvehtype
    width : 50% screen

    [part : custsubtop2right]
    lines : custday, custdate
    width : 50% screen

    [line : custsliptitle]
    field : custslipfld
    Border : Column Titles

    [field : custslipfld]
    info : "Rent a Car Request Slip Details"
    full width : yes
    align : centre
    ;;width : 75% screen
    style : large



    [line : custtripto]
    field : custtripfldt, custtripfld


    [field : custtripfldt]
    info : "Trip To : "
    align : left
    style : Large

    [field : custtripfld]
    use : short name field
    set as : $cartripto
    storage : cartripto
    align : left
    style : Normal

    [line : custreportat]
    field : custreportatt, custreportat

    [field : custreportatt]
    info : "Report At : "
    style : Large
    align : left

    [field : custreportat]
    use : short name field
    set as : $carreportat
    storage : carreportat
    align : left
    style : Normal

    [line : custvehtype]
    field : custvehtypet, custvehtype

    [field : custvehtypet]
    info : "Vehicle Type : "
    align : left
    style : Large

    [field : Custvehtype]
    use : short name field
    set as : $carvehicletype
    storage : carvehicletype
    style : Normal
    Align : left

    [part : custsubbottom]
    part : custbottomtop
    bottom parts : custbottomdown
    vertical : yes
    height : 70% screen
    space top : 5 mms

    [part : custbottomtop]
    part : custbottomtopleft
    right parts : custbottomtopright
    vertical : no


    [part : custbottomtopleft]
    lines : custkmtitle, custstkms, custendkms, custtimetitle, custsttime, custendtime
    width : 50% screen

    [line : custday]
    field : info field, custday
    local : field : info field : info : "Booked Day : "
    local : field : info field : style : Large
    local : field : info field : align : left

    [field : custday]
    use : short name field
    set as : $carbookday
    storage : carbookday
    style : Normal

    [line : custdate]
    field : info field, custdate
    local : field : info field : info : "Booked Date :"
    local : field : info field : style : Large
    local : field : info field : align : left

    [field : custdate]
    use : short name field
    set as : $carbookingdt
    storage : carbookingdt
    align : left
    style : normal

    [line : custkmtitle]
    field : info field
    local : field : info field : info : "Garage Kilometer"
    local : field : info field : style : large
    local : field : info field : align : centre
    local : field : info field : full width : yes
    local : field : info field : border : Column Titles


    [line : custstkms]
    field : info field, custstkms
    local : field : info field : info : "Starting Kms :"
    local : field : info field : style : Large
    local : field : info field : align : left

    [field : custstkms]
    use : amount field
    set as : $carstkm
    storage : carstkm
    align : left
    style : Normal

    [line : custendkms]
    field : info field, custendkms
    local : field : info field : info : "Ending Kms : "
    local : field : info field : style : Large
    local : field : info field : align : left

    [field : custendkms]
    use : amount field
    set as : $carendkm
    storage : carendkm
    align : left
    style : Normal

    [line : custtimetitle]
    field : info field
    local : field : info field : info : " Garage Time : "
    local : field : info field : style : Large
    local : field : info field : align : Centre
    local : field : info field : border : column titles
    local : field : info field : full width : yes

    [line : custsttime]
    field : info field, custsttime
    local : field : info field : info : "Staring Time : "
    local : field : info field : style : Large
    local : field : info field : align : left



    [field : custsttime]
    use : short name field
    set as : $carsttime
    storage : carsttime
    align : left
    style : Normal

    [line : custendtime]
    field : info field , custendtime
    local : field : info field : info : "Closing Time : "
    local : field : info field : style : Large
    local : field : info field : align : left

    [field : custendtime]
    use : short name field
    set as : $carcltime
    storage : carcltime
    align : left
    style : Normal



    [part : custbottomtopright]
    part : kilometerpart, customerpart
    vertical : yes
    width : 50% screen

    [part : kilometerpart]
    lines : totalkmhrst, totalkm1, totalhrs1, extrakmhrst, extrakm1, extrahr1

    [line : totalkmhrst]
    field : info field
    local : field : info field : info : "Total Kms / Hrs : "
    local : field : info field : style : Large
    local : field : info field : align : centre
    local : field : info field : full width : yes
    local : field : info field : border : column titles

    [line : totalkm1]
    field : info field, totalkm1
    local : field : info field : info : "Kms :"
    local : field : info field : style : Large
    local : field : info field : align : left

    [field : totalkm1]
    use : amount field
    set as : $cartotkm
    storage : cartotkm
    align : left
    style : normal

    [line : totalhrs1]
    field : info field, totalhrs1
    local : field : info field : info : "Hrs : "
    local : field : info field : align : left
    local : field : info field : style : Large

    [field : totalhrs1]
    use : amount field
    set as : $cartothrs
    storage : cartothrs
    style : normal
    align : left


    [line : extrakmhrst]
    field : info field
    local : field : info field : info : "Extra Kms/ Hrs : "
    local : field : info field : style : Large
    local : field : info field : align : centre
    local : field : info field : full width : yes
    local : field : info field : border : column titles

    [line : extrakm1]
    field : info field, extrakm1
    local : field : info field : info : "Kms : "
    local : field : info field : style : Large
    local : field : info field : align : left

    [field : extrakm1]
    use : amount field
    set as : $carextkm
    storage : carextkm
    style : normal
    align : left

    [line : extrahr1]
    field : info field, extrahr1
    local : field : info field : info : "Hrs : "
    local : field : info field : style :Large
    local : field : info field : align : left

    [field : extrahr1]
    use : amount field
    set as : $carexthrs
    storage : carexthrs
    align : left
    style : normal


    [part : customerpart]
    lines : custuseonly, custrelplace, custkm, custtime

    [line : custuseonly]
    field : custuseonly
    Border : Column Titles

    [field : custuseonly]
    info : "For Customer Information"
    align : center
    style : large
    full width : yes



    [line : custrelplace]
    field : info field, custrelplace
    local : field : info field : info : "Release Place : "
    local : field : info field : style : Large
    local : field : info field : align :left

    [field : custrelplace]
    use : short name field
    set as : $carrelplace
    storage : carrelplace
    align : left
    style : normal

    [line : custkm]
    field : info field, custkm
    local : field : info field : info : "Kms : "
    local : field : info field : style : Large
    local : field : info field : align : left

    [field :custkm]
    use : amount field
    set as : $custkms
    storage : custkms
    align : left
    style : normal

    [line : custtime]
    field : info field, custtime
    local : field : info field : info : "Time : "
    local : field : info field : style : Large
    local : field : info field : align : left

    [field : custtime]
    use : amount field
    set as : $custtime
    storage : custtime
    style : Normal
    align : left

    [part : custbottomdown]
    line : happyjourney
    height : 10% screen
    [line : happyjourney]
    field : happyfld
    Border : Column Titles

    [field : happyfld]
    info : "Wish u a Very Happy journey"
    style : large bold
    align : centre
    full width : yes


    ;;; Screen Entry for Extra Kms/hrs
     
    Nirav Merchant, Mar 11, 2013
    #1


  2. NMS

    NMS Member


    Thanks For Sharing....
     
    NMS, Mar 14, 2013
    #2


  3. ahmed rishali

    ahmed rishali Member


    :)
     
    ahmed rishali, Mar 15, 2013
    #3


  4. kpstup

    kpstup New Member


    Thanks for Sharing :)
     
    kpstup, Mar 15, 2013
    #4


  5. admin

    admin Administrator Staff Member


    Good :)
     
    admin, Mar 15, 2013
    #5


  6. ganesha chavan

    ganesha chavan New Member


    Dear
     
    ganesha chavan, Jun 23, 2013
    #6


  7. ganesha chavan

    ganesha chavan New Member


    Dear Sir,

    Can we generate New report from all field which we store
     
    ganesha chavan, Jun 23, 2013
    #7


  8. Pritam Krishna

    Pritam Krishna Member


    Yes it is very much possible.
     
    Pritam Krishna, Jun 28, 2013
    #8


  9. Amol Ashok Bhalgat

    Amol Ashok Bhalgat Member


    grt
     
    Amol Ashok Bhalgat, Sep 11, 2013
    #9


Share This Page