Reorganiza MATERIA PRIMA a PROYECTO y avanza inprmt002/005/013/046
- Mueve todo el contenido de PROYECTOS/indir y varias funciones compartidas de PROYECTOS/otrodir hacia PROYECTO, siguiendo instruccion de Johnny (PROYECTOS se va a eliminar). - inprmt002: agrega campo Desglose faltante, corrige typo "eLiminar". - inprmt005: agrega formulario y 3 campos faltantes (Consumo, Requiere Autorizacion, Requisiciones), corrige typo "eLiminar". - inprmt013: agrega formulario, titulo, corrige typo "eLiminar". - inprmt046: agrega formulario y varias funciones/dependencias faltantes (cincodmov, clasf_bloque, medidas, defecto, buscaEmp, consultaTransportista, busca_departamento); corrige nombres de campo desalineados con el codigo (depto_a, bodega) y los convierte a ComboBox donde el codigo lo requiere. - Corrige dependencia faltante de FORMULARIOS_IN a la libreria Database (bloqueaba todo el modulo de MATERIA PRIMA).
This commit is contained in:
@@ -0,0 +1,13 @@
|
||||
FUNCTION integridad()
|
||||
DEFINE numero_msg INTEGER,
|
||||
bandera SMALLINT
|
||||
IF sqlca.sqlcode < 0 THEN
|
||||
LET numero_msg = sqlca.sqlcode
|
||||
CALL msg(numero_msg)
|
||||
DISPLAY numero_msg AT 23,70
|
||||
LET bandera = 1
|
||||
SLEEP 2
|
||||
RETURN
|
||||
END IF
|
||||
RETURN bandera
|
||||
END FUNCTION
|
||||
Reference in New Issue
Block a user