Files
jsotoandClaude Opus 5.5 d8764b3bda JSOTO Alta y compilacion G6 de programas CG, Cheques, Activos, Tesoreria, Repuestos e Informatica
Merge de main (ipprrp013/014/046/053) con conflictos resueltos:
- mbsERP.4pw: ipprrp014 conserva ambos 4rp y su 4fd.
- bin/ipprrp014.4rp: columnas MARGEN/CLASIF. + titulo IPPRRP014.

Programas agregados a mbsERP.4pw (53 compilan y enlazan con fgl602):
- CONTABILIDAD GENERAL, ACTIVOS FIJOS, REPUESTOS; grupos nuevos TESORERIA,
  CHEQUES e INFORMATICA (segprmt001 = seguridad2.0/segprmt0001.4gl).
- irdir copiado de 3.20 PROYECTOS/irdir a PROYECTO/irdir; helpers de
  PROYECTOS/otrodir en FUNCIONES_IR (departamento -> irdepartamento.4gl).
- Fuentes mas nuevos de 3.20: edprrp118, edprrp080, acprrp010, cgprmt022.
- FUNCIONES: GeneraEntradaDiario.4gl a la version 3.20 + costoLiquidacion.4gl.
- Ajustes G6: existe duplicado en irprgb000, fakeData de 22 campos y
  answer2 en irprmt036/020 (ApiMaintainC), selectOutputSimple en irprcs008,
  schemas de forms a smarmotech, referencia declarada en cgprmt005.
- cgprmt005 sigue sin enlazar: requiere funciones de EXTERIOR.

Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
2026-10-15 16:22:14 -04:00

101 lines
7.2 KiB
Plaintext

schema smarmotech
TOPMENU
GROUP g1 (TEXT="CONTEO FISICO")
COMMAND actualizarf (TEXT="Actualizacion Conteo PDA")
COMMAND Eliminarf (TEXT="Eliminar Conteo",IMAGE="cancel")
END
GROUP g2 (TEXT="INVENTARIO FISICO")
COMMAND actualizari (TEXT="Actualiza inventario",IMAGE="pda")
COMMAND eliminari (TEXT="Eliminar Inventario Fisico",IMAGE="cancel")
COMMAND imprimir (TEXT="Impresion",IMAGE="printer")
END
GROUP g3 (TEXT="DOCUMENTO")
COMMAND actualizard (TEXT="Actualziacion Documento")
COMMAND eliminard (TEXT="Eliminar Documento",IMAGE="cancel")
END
GROUP g4 (TEXT="Interrumpir")
COMMAND salir (TEXT="Salir Sistema",IMAGE="exit")
END
END
LAYOUT (TEXT="Visualizacion Conteo y Ajuste",STYLE="Basic")
GRID
{
<G Encabezado >
Fecha Conteo : [f1 ] Busca Fecha Conteo[fb ]
Numero Documento Ajuste: [doc ]Fecha Documento:[fd ]No. Registros: [no ]
Codigo Movimiento : [cod ][DESc ]
TIPO INVENTARIO : [tp ] Registros Sumarizados [rs ]
ALMACEN : [al ] Incluye Registros
SECCION : [se ] Que no esten en el conteo[ii ]
TRAMO O FILA : [fila ] Igualo Existencia En
Libro a Fisica? [fs ]
0 50 100
[p000 ]
<G Detalle >
<t >
[a ][b ][c ][d ][de ][u ][c1 ][c2 ][d1 ][p1 ][v1 ][v2 ][u1 ][f11 ][z1][z2 ][z3 ][kj ]
[a ][b ][c ][d ][de ][u ][c1 ][c2 ][d1 ][p1 ][v1 ][v2 ][u1 ][f11 ][z1][z2 ][z3 ][kj ]
[a ][b ][c ][d ][de ][u ][c1 ][c2 ][d1 ][p1 ][v1 ][v2 ][u1 ][f11 ][z1][z2 ][z3 ][kj ]
[a ][b ][c ][d ][de ][u ][c1 ][c2 ][d1 ][p1 ][v1 ][v2 ][u1 ][f11 ][z1][z2 ][z3 ][kj ]
[a ][b ][c ][d ][de ][u ][c1 ][c2 ][d1 ][p1 ][v1 ][v2 ][u1 ][f11 ][z1][z2 ][z3 ][kj ]
[a ][b ][c ][d ][de ][u ][c1 ][c2 ][d1 ][p1 ][v1 ][v2 ][u1 ][f11 ][z1][z2 ][z3 ][kj ]
[a ][b ][c ][d ][de ][u ][c1 ][c2 ][d1 ][p1 ][v1 ][v2 ][u1 ][f11 ][z1][z2 ][z3 ][kj ]
[a ][b ][c ][d ][de ][u ][c1 ][c2 ][d1 ][p1 ][v1 ][v2 ][u1 ][f11 ][z1][z2 ][z3 ][kj ]
[a ][b ][c ][d ][de ][u ][c1 ][c2 ][d1 ][p1 ][v1 ][v2 ][u1 ][f11 ][z1][z2 ][z3 ][kj ]
[a ][b ][c ][d ][de ][u ][c1 ][c2 ][d1 ][p1 ][v1 ][v2 ][u1 ][f11 ][z1][z2 ][z3 ][kj ]
TOTAL AJUSTE [t1 ]
TOTAL FISICO[tf ]TOTAL TEORICO[fi ]
}
END
attributes
PROGRESSBAR p000 = formonly.progreso,VALUEMIN=0,VALUEMAX=100,COLOR=GREEN;
doc= formonly.num_doc;
COMBOBOX fb = formonly.busca_fecha;
DATEEDIT fd = formonly.fecha_doc type date,format="dd/mm/yyyy";
DATEEDIT f1 = formonly.xfecha type date,format="dd/mm/yyyy" ;
COD = formonly.cod_mov;
desc = formonly.descrip_mov;
CHECKBOX rs = formonly.sumarizo type char,NOT NULL,VALUECHECKED="S",VALUEUNCHECKED="N",default="N";
CHECKBOX ii = formonly.incluye type char,NOT NULL,VALUECHECKED="S",VALUEUNCHECKED="N",default="N";
CHECKBOX fs = formonly.igualo type char,NOT NULL,VALUECHECKED="S",VALUEUNCHECKED="N",default="N";
COMBOBOX tp = formonly.tipo_inventario,include = ("MATERIA PRIMA","PRODUCTOS TERMINADOS","REPUESTOS");
COMBOBOX al = formonly.almacen;
COMBOBOX se = formonly.seccion;
COMBOBOX fila = formonly.tramo;
a = formonly.cod_n, UNSORTABLE, TITLE="CLASE";
b = formonly.cod_grupo,UNSORTABLE, TITLE="GRUPO";
c = formonly.cod_tipo, UNSORTABLE,TITLE = "TIPO";
d = formonly.cod_sec, UNSORTABLE,TITLE = "SECUENCIA";
de = formonly.descripcion, NOENTRY,TITLE="DESCRIPCION";
u = formonly.unidad_med, NOENTRY,TITLE="UNIDAD MEDIDA";
c1 = formonly.fisico, TITLE = "FISICO",FORMAT="###,###.#####";
c2 = formonly.teorico, UNSORTABLE,TITLE ="TEORICO",noentry,FORMAT="---,--#.#####";
d1 = formonly.diferencia, UNSORTABLE,TITLE="DIFERENCIA",noentry,FORMAT="---,--#.#####";
p1 = formonly.costo, UNSORTABLE,TITLE ="COSTO",noentry,FORMAT="###,###.####";
v1 = formonly.valor1, UNSORTABLE,TITLE="VALOR",noentry,FORMAT="---,---,--#.##";
v2 = formonly.valor2, UNSORTABLE,TITLE="VALOR DIF",noentry,FORMAT="-,---,--#.##";
t1 = formonly.total2, FORMAT="---,---,--#.##";
u1 = formonly.usuario,UNSORTABLE,noentry;
f11 = formonly.fechacrea,UNSORTABLE,noentry;
no = formonly.numero_registros,UNSORTABLE,noentry;
z1 = formonly.bodega,UNSORTABLE,noentry,TITLE="bodega";
z2 = formonly.cod_seccion,UNSORTABLE,noentry,TITLE="SECCION";
z3 = formonly.cod_tramo,UNSORTABLE,noentry,TITLE="TRAMO O FILA";
kj = formonly.trxid,UNSORTABLE,noentry;
fi = formonly.total_teorico,FORMAT="--,---,---,--#.##";
tf = formonly.total_fisico,FORMAT="--,---,---,--#.##";
INSTRUCTIONS
DELIMITERS " "
SCREEN RECORD sconteo[10](cod_n,cod_grupo,cod_tipo,cod_Sec,descripcion,unidad_med,fisico,teorico,diferencia,costo,valor1,valor2,usuario,fechacrea,bodega,cod_seccion,cod_tramo,trxid)
END