Interpretes de listados (.WIN)

Vamos a ver aquí algunos conceptos básicos de las plantillas utilizadas en los listados de documentos, tickets, etiquetas, etc.

Etiquetas.- Una etiqueta clásica de reposición en distribuidores, es la siguiente:

_campo('LIBROS',str(EDI,3)+CODIGO )                        // esto se hace para posicionarse en el libro

_campo('EDITO',EDI )                                        // esto se hace para posicionarse en la editorial

.F 'Courier new',0,12,B                                          // pone el font a 12 puntos y en negrita (Bold)

@  4,6, 'D.G.L.'

.F 'Courier new',0,10,B                                        // pone el font a 10 puntos y en negrita (Bold)

@ 10,6, left(TITULO,37)

@  4.5,50, 'PVP:  '+alltrim(pepe(PRECIO,8))                // pone el precio con 8 caracteres en total

.F 'Courier new',0,8

@ 15, 6, 'Autor:    '+left(libros->AUTOR,30)                // saca de libros, los 30 primeros caracteres del campo AUTOR

@ 19, 6, 'Editorial:'+left(edito->NOMBRE,30)                // saca de edito,  los 30 primeros caracteres del campo NOMBRE

@ 23, 6, 'Código: '+libros->ISBN  +'    Cantidad:'+allstr(nE,2)//+'/'+allstr(CANTI,2)

@ 27, 6, 'Fecha:'+dtoc(FECHA)+' Cliente:'+str(CLIENTE,6)

.F 'Courier new',0,10,,900

@ 30, 80, 'Nº Doc '+str(NUMERO,6)

@ 30, 83, guionisbn(libros->ISBN)

@ 30, 98, left(libros->BARRAS,13)

|cuadro(3,4,31,76)

|sombra(3,4,31,76,0,1)

|linea (9,4, 9,76)

|linea(14,4,14,76)

|barras(libros->BARRAS,2,88,30,10,,,NO)