40 lines
1.5 KiB
Plaintext
40 lines
1.5 KiB
Plaintext
database smarmotech
|
|
screen
|
|
{
|
|
|
|
Empleado [co1 ][co2 ][co][co3] [no1 ][no2 ]
|
|
Numero Docto [nd ] Fecha [fe ]
|
|
Valor [vf ]
|
|
\g--------------------------------------------------------------------------\g
|
|
Cuenta No. Descripcion Valor
|
|
\g--------------------------------------------------------------------------\g
|
|
[cod ] [b4 ] [va ]
|
|
[cod ] [b4 ] [va ]
|
|
[cod ] [b4 ] [va ]
|
|
[cod ] [b4 ] [va ]
|
|
==============
|
|
Total [tt ]
|
|
}
|
|
end
|
|
tables
|
|
cgtb00001
|
|
attributes
|
|
co1= formonly.num_emp;
|
|
co2= formonly.departamento,noentry;
|
|
co = formonly.nivel_emp,noentry;
|
|
co3= formonly.cod_puesto,noentry;
|
|
no1= formonly.nombre,noentry;
|
|
no2= formonly.apellido,noentry;
|
|
nd = formonly.num_doc;
|
|
fe = formonly.fecha_orig type date,format = "dd/mm/yy";
|
|
vf = formonly.valor_fac;
|
|
|
|
cod= cgtb00001.cuenta_no,comments = "Digite numero de cuenta afectado";
|
|
b4 = cgtb00001.descripcion,noentry,color=yellow;
|
|
va = formonly.valor_cta,comments="Digite Valor asignado a la cuenta";
|
|
tt = formonly.valor1,noentry;
|
|
instructions
|
|
screen record cuentas[4](cuenta_no,descripcion,valor_cta)
|
|
delimiters " "
|
|
end
|