39 lines
1.6 KiB
Plaintext
39 lines
1.6 KiB
Plaintext
database marmotech
|
|
screen size 24 by 80
|
|
{
|
|
Codigo:[a][b][c ][d ] [a1 ] [a2 ]
|
|
\g----------------------------------------------------------------------------\g
|
|
Codigo Suplidor Precio Unitario
|
|
\g----------------------------------------------------------------------------\g
|
|
[p1][p2 ][k1 ][n ]
|
|
Terminos de Pago[f002 ]
|
|
[p1][p2 ][k1 ][n ]
|
|
Terminos de Pago[f002 ]
|
|
[p1][p2 ][k1 ][n ]
|
|
Terminos de Pago[f002 ]
|
|
[p1][p2 ][k1 ][n ]
|
|
Terminos de Pago[f002 ]
|
|
[p1][p2 ][k1 ][n ]
|
|
Terminos de Pago[f002 ]
|
|
}
|
|
tables
|
|
cotb00001
|
|
cotb00015,cotb00024,
|
|
intb00001
|
|
attributes
|
|
a = intb00001.cod_n,autonext;
|
|
b = intb00001.cod_grupo,autonext ;
|
|
c = intb00001.cod_tipo,autonext;
|
|
d = intb00001.cod_sec,autonext;
|
|
a1 = intb00001.descrip_esp,noentry;
|
|
a2 = intb00001.unidad_med,noentry;
|
|
p1 = cotb00001.cod_sp,noentry;
|
|
p2 = cotb00001.cod_sp_sec,noentry;
|
|
k1 = cotb00001.nom_sp,noentry;
|
|
f002 = cotb00024.descrip_term,noentry;
|
|
n = cotb00015.precio,noentry;
|
|
instructions
|
|
screen record consart[5] (cod_sp,cod_sp_sec,descrip_term,precio,nom_sp)
|
|
end
|
|
|