Hola a todos,
Soy muy nuevo para la impresi贸n utilizando FWH. Debo imprimir las facturas de la aplicaci贸n usando FWH en una impresora l谩ser.
Estoy tratando de convertir s贸lo la impresi贸n de una vieja aplicaci贸n Clipper. Mi nuevo FWH aplicaci贸n tendr谩 un di谩logo con un cuadro de texto en que la aceptaci贸n de la factura no. Una vez que el usuario las teclas en la factura no. FWH la solicitud deber谩 imprimir en un papel de tama帽o A4 en blanco en una impresora l谩ser con toda la Denominaci贸n, domicilio, n 潞 de factura, fecha, Cajas / L铆neas y, a continuaci贸n, el detalle las l铆neas que contengan los elementos y, a continuaci贸n, al final de la p谩gina con el proyecto de ley y total Statuatory otras declaraciones.
En DOS Clipper que estoy haciendo esto, utilizando el c贸digo
Proyecto de ley debe aparecer como este
Alguien me puede ayudar donde debo comenzar para obtener una impresi贸n similar a la anterior.
Cualquier c贸digo de ejemplo ser谩 煤til. Estoy confundido despu茅s de ver las muestras TestPrn3 etc etc como CMSay ()
Tambi茅n me gustar铆a utilizar los recuadros y l铆neas en lugar de la naturaleza a fin de que la "-----" imprimir aparece limpio y ordenado
Gracias y Saludos
Anser
Soy muy nuevo para la impresi贸n utilizando FWH. Debo imprimir las facturas de la aplicaci贸n usando FWH en una impresora l谩ser.
Estoy tratando de convertir s贸lo la impresi贸n de una vieja aplicaci贸n Clipper. Mi nuevo FWH aplicaci贸n tendr谩 un di谩logo con un cuadro de texto en que la aceptaci贸n de la factura no. Una vez que el usuario las teclas en la factura no. FWH la solicitud deber谩 imprimir en un papel de tama帽o A4 en blanco en una impresora l谩ser con toda la Denominaci贸n, domicilio, n 潞 de factura, fecha, Cajas / L铆neas y, a continuaci贸n, el detalle las l铆neas que contengan los elementos y, a continuaci贸n, al final de la p谩gina con el proyecto de ley y total Statuatory otras declaraciones.
En DOS Clipper que estoy haciendo esto, utilizando el c贸digo
@prow()+1,00 say BOLD_ON+PADC("Company Name",80) +BOLD_OFF
@prow()+1,00 say PADC("Company Address",80)
@prow()+1,00 say "Invoice No : "+str(nInvoiceNo,4)
@prow() ,50 say "Invoice Dt : "+dtoc(dInvDate)
@prow()+1,00 say "/---------------------------------------------------------------------------------------------\"
@prow()+1,00 say "| Sr# | Item Name | Qty | Price | VAT % | VAT Amt | Total Amt |"
@prow()+1,00 say "|-------|--------------------|--------|----------|----------|--------------|---------------|"
// Process and Print the Line Items
Do while Bill->InvoiceNo == nInvoiceNo .and. !eof()
cLine:="|"+str(n++,5)+"| "+ITEM_NAME+" | "+str(QTY,3)+" | "+STR(PRICE,8,2)+" | "+str(VAT_TYPE)
cLine+=+" | "+ STR(VAT_AMT,8,2)+" | "+str(TOTAL_AMT)+" |"
@prow()+1,00 say cLine
Select Bill
Skip
Enddo
@prow()+1,00 say "|-------|--------------------|--------|----------|----------|--------------|---------------|"
@prow()+1,00 say "| TOTAL |"+str(GRAND_TOTAL)+" |"
@prow()+1,00 say "\---------------------------------------------------------------------------------------------/"Proyecto de ley debe aparecer como este
[b]ABC Company[/b]
Address 12/123445, That Street, Pincode : 999999
Invoice No : 23 Invoice Dt : 15-05-2009
/---------------------------------------------------------------------------------------------\
| Sr# | Item Name | Qty | Price | VAT % | VAT Amt | Total Amt |
|-------|--------------------|--------|----------|----------|--------------|---------------|
| 1 | Item 1 | 3 | 10.00 | 4% | 0.40 | 10.40 |
| 2 | Item 2 | 5 | 15.00 | 4% | 0.40 | 15.40 |
| 3 | Item 3 | 2 | 20.00 | 4% | 0.40 | 20.40 |
| | | | | | | |
| | | | | | | |
| | | | | | | |
| | | | | | | |
|-------|--------------------|--------|----------|----------|--------------|---------------|
| TOTAL | 46.20 |
\---------------------------------------------------------------------------------------------/
Goods once sold will not be take back .........Cualquier c贸digo de ejemplo ser谩 煤til. Estoy confundido despu茅s de ver las muestras TestPrn3 etc etc como CMSay ()
Tambi茅n me gustar铆a utilizar los recuadros y l铆neas en lugar de la naturaleza a fin de que la "-----" imprimir aparece limpio y ordenado
Gracias y Saludos
Anser
