set layout(gdi) 1
form 0,0 {}
header {
# acs logo
gdi_photo 0 0 7.5 1 image_acs
# draw lines on the form
gdi_rectangle 1 6.3 81 9.2 -width 5 -outline green -fill lightyellow
text "TAX INVOICE $header(REF)" 7.7,26 -size 18
gdi_rectangle 1 10.3 81 18 -width 5 -outline green -fill lightyellow
gdi_rectangle 1 18.3 81 19.8 -width 5 -outline green -fill lightyellow
gdi_rectangle 1 22.3 70 23.8 -width 5 -outline green -fill lightyellow
gdi_rectangle 1 24.3 70 55.5 -width 5 -outline green -fill lightyellow
gdi_rectangle 70 22.3 81 23.8 -width 5 -outline green -fill lightyellow
gdi_rectangle 70 24.3 81 55.5 -width 5 -outline green -fill lightyellow
field customer(NAME) 11,3 38
field customer(ADDRESS) 12,3 38,4
text "In Account With:" 12,42
text "$login::company(NAME)" 13,42 -bold 3
text "Customer No: $customer(PART)" 17,3
text "Order No:" 19,3
field header(ORDER_NO) 19,12 12
text "Invoice Date:" 19,43
field header(DATE) 19,55 D
text "DESCRIPTION" 23,2
text "QTY" 23,50 -anchor e
text "UNIT" 23,54
text "PRICE" 23,66 -anchor e
text "EXTENSION" 23,80 -anchor e
}
body 25,2 54,73 {
field part(NAME) 2 44
field tran(QTY) 50 4.2 -anchor e
field part(UNIT_MEASURE) 54 4
field tran(RATE) 66 8.2 -anchor e
field tran(AMOUNT) 80 10.2 -anchor e
}
footer {
# draw box
gdi_rectangle 1 56.2 70 64.5 -width 5 -outline green -fill lightyellow
gdi_rectangle 70 56.2 81 64.5 -width 5 -outline green -fill lightyellow
set header(PERSONAL_MESSAGE) [wrap $header(PERSONAL_MESSAGE) 60]
field header(PERSONAL_MESSAGE) 57,2 60,5
gdi_rectangle 1 61.8 52 64.5 -width 5 -outline green -fill lightyellow
text "Page No:" 63,6
field page_no 63,16 6
text "G.S.T." 62.5,36 -size 8
text "No." 63.5,36 -size 8
text "60-341-737" 63,40
if {$header(FREIGHT)} {
text "Freight" 59,68 -anchor e
field header(FREIGHT) 59,80 10.2 -anchor e
}
text "Sub Total" 61,68 -anchor e
field header(AMOUNT) 61,80 10.2 -anchor e
set GST [expr $header(TOTAL) - $header(AMOUNT)]
text "GST" 62,68 -anchor e
field GST 62,80 10.2 -anchor e
text "Total" 63,68 -anchor e
field header(TOTAL) 63,80 10.2 -anchor e
}
|
