Comandos Comunes en Lenguaje CLIPPER

3
Comandos comunes en lenguaje PCL Función Comando Opciones (Variable) Restablecer Chr(27) + "E" Escape + E mayúscula. Ninguna Número de Copias Chr(27) + "&l" + Variable + "X" Escape + ampersand + ele minúscula + variable + X mayúscula 1 a 999 Tamaño de papel Chr(27) + "&l" + Variable + "A" Escape + ampersand + ele minúscula + variable + A mayúscula 1 - Exec 2 - Carta 3 - Legal 25 - A5 26 - A4 Orientación Chr(27) + "&l" + Variable + "O" Escape + ampersand + ele minúscula + variable + Ó mayúscula 0 - Prolongada (normal) 1 - Apaisada Margen Superior Chr(27) + "&l" + Variable + "E" Escape + ampersand + ele minúscula + variable + E mayúscula Variable = número de líneas Margen Inferior Chr(27) + "&l" + Variable + "F" Escape + ampersand + ele minúscula + variable + F mayúscula Variable = número de líneas desde margen superior. Margen Izquierdo Chr(27) + "&a" + Variable + "L" Escape + ampersand + a minúscula + variable + L mayúscula Variable = número de columna Margen Derecho Chr(27) + "&a" + Variable + "M" Escape + ampersand + a minúscula + variable + M mayúscula Variable = número de columna Desde margen izquierdo. Juego de caracteres Chr(27) + "(" + Variable Escape + Paréntesis abierto + variable 8U - Roman-8 de HP 10U - IBM PC-8 Pag.Cód 437 12U - IBM PC-850 8M - Math8

Transcript of Comandos Comunes en Lenguaje CLIPPER

Comandos comunes en lenguaje PCL

Comandos comunes en lenguaje PCL

FuncinComandoOpciones (Variable)

RestablecerChr(27) + "E"Escape + E mayscula.Ninguna

Nmero de CopiasChr(27) + "&l" + Variable + "X"Escape + ampersand + ele minscula + variable + X mayscula1 a 999

Tamao de papelChr(27) + "&l" + Variable + "A"Escape + ampersand + ele minscula + variable + A mayscula1 - Exec2 - Carta3 - Legal25 - A526 - A4

OrientacinChr(27) + "&l" + Variable + "O"Escape + ampersand + ele minscula + variable + mayscula0 - Prolongada (normal)1 - Apaisada

Margen SuperiorChr(27) + "&l" + Variable + "E"Escape + ampersand + ele minscula + variable + E maysculaVariable = nmero de lneas

Margen InferiorChr(27) + "&l" + Variable + "F"Escape + ampersand + ele minscula + variable + F maysculaVariable = nmero de lneasdesde margen superior.

Margen IzquierdoChr(27) + "&a" + Variable + "L"Escape + ampersand + a minscula + variable + L maysculaVariable = nmero de columna

Margen DerechoChr(27) + "&a" + Variable + "M"Escape + ampersand + a minscula + variable + M maysculaVariable = nmero de columnaDesde margen izquierdo.

Juego de caracteresChr(27) + "(" + VariableEscape + Parntesis abierto + variable8U - Roman-8 de HP10U - IBM PC-8 Pag.Cd 43712U - IBM PC-8508M - Math819U - Latin 1 Win 3.19E - Latin 25T - Latin 5579L - Wingding

EspaciadoChr(27) + "(s" + Variable + "P"Escape + Parntesis abierto + ese minscula + variable + PMayscula0 - Fijo1 - Proporcional

PasoChr(27) + "(s" + Variable + "H"Escape + Parntesis abierto + ese minscula + variable + HMaysculaVariable = Caracteres porpulgada

AlturaChr(27) + "(s" + Variable + "V"Escape + Parntesis abierto + ese minscula + variable + VMaysculaVariable = Puntos

EstiloChr(27) + "(s" + Variable + "S"Escape + Parntesis abierto + ese minscula + variable + SMayscula0 - Slida1 - Italica4 - Condensada5 - Italica condensada

Peso del trazoChr(27) + "(s" + Variable + "B"Escape + Parntesis abierto + ese minscula + variable + BMaysculade 0 a 4 (clara a extranegra)

A continuacin algunas funciones PCL para Laser y chorro de tinta donadas porJhonny Vargas P. Santiago de Chile(Microsoft Most Valuable Professional)** Esta funcion sirve para retroceder algunas lineas cuando uno imprimesecuencialmente en la impresora, esto pasa cuando sobre pasa las 60 lineas ynecesitas imprimir algn dato por ejemplo en la 50, le debes pasar lacantidad de lineas que deseas devolverte.

Function Retrocede(linea)return chr(27)+'&'+strzero(linea,4)+'R'

** Esta funcin te deja la letra con negrita las palabras que acontinuacinimprimas

Function letranegrita()return chr(27)+'(s+4B'

** Esta funcin te deshabilita la funcin anterior.

function letranormal()return chr(27)+'(s0B'

** Muchas veces, necesitamos imprimir algo en una posicin fija,independiente de donde se encuentre el cursor de la impresin, lassiguientes funciones nos permiten localizarnos en un punto e imprimir lo quequeramos.

Function posx(nume)return chr(27)+'*p'+alltrim(str(nume,8))+'X'

Function posy(nume)return chr(27)+'*p'+alltrim(str(nume,8))+'Y'

** Para variar un poco de letra, se debe pasar el tamao y listo.

Function fnClaredonCondensed(tam)return chr(27)+'(s1p+'+alltrim(str(tam,8))+'v4s3b4140T'