jsoto/MBS
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Commit inicial: fuentes MBS ERP (Genero 6) + .gitignore + docs/SETUP_PC_MBS.md

Browse Source
This commit is contained in:
jsoto
2026-08-18 20:59:52 -04:00
commit 454973e269
5978 changed files with 2664094 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
PROYECTO/codir/cofmcs009.per
+50
View File
@@ -0,0 +1,50 @@
database marmotech
screen size 24 by 80
{
Orden [f000 ] Tipo [a0] Fecha [f001 ] Via [a2 ]
Codigo Suplidor [f2][f003] [a1 ]
Puerto [p4 ] [p2 ] Cierre [n]
Pago [m] Fecha [f009 ] Enviada [l] Fecha [f008 ]
\g-----------------------------------------------------------------------------\g
Requi. Codigo Cantidad Precio Valor
\g-----------------------------------------------------------------------------\g
[r1 ][c1 ][c2 ] [p1 ][v1 ]
[r1 ][c1 ][c2 ] [p1 ][v1 ]
[r1 ][c1 ][c2 ] [p1 ][v1 ]
[r1 ][c1 ][c2 ] [p1 ][v1 ]
Descripcion [d1 ]
}
end
tables
cotb00014, cotb00015,cotb00024,
cotb00001
attributes
f000 = cotb00014.num_oc,autonext,noentry;
a0 = cotb00014.tipo,upshift,autonext,noentry;
f001 = cotb00014.fech_oc,autonext,format = "dd/mm/yy",noentry;
f2 = cotb00014.cod_sp,autonext,noentry;
f003 = cotb00014.cod_sp_sec,autonext,noentry;
a1 = cotb00001.nom_sp,noentry;
a2 = cotb00014.via,noentry;
l = cotb00014.enviada, noentry;
f008 = cotb00014.fech_enviada, format = "dd/mm/yy",noentry;
m = cotb00014.pago, noentry;
f009 = cotb00014.fech_pago, format = "dd/mm/yy",noentry;
n = cotb00014.cierre, noentry;
p4 = formonly.cod_pt,noentry;
p2 = formonly.descrip3,noentry;
r1 = cotb00015.num_req,noentry,
comments =
"Precione Ctrl-B Busca Descripcion";
c1 = formonly.codigo,noentry;
c2 = cotb00015.cantidad,right,noentry;
p1 = cotb00015.precio,right,noentry;
v1 = formonly.valor,right,noentry;
d1 = formonly.descrip5,noentry;
instructions
delimiters " "
screen record cs_orden[4] (num_req,codigo,cantidad,
precio,valor)
end