{
------------------------------------------------------------------------
 FORMULARIO        : NOFMMT001
 OBJETIVO          : Pantalla que captura los codigos de movimientos 
                     Es utilizada por: NOPRMT001
 PROGRAMADOR       : Ing. Betania Guerrero Perez
 FECHA REALIZACION : Agosto 19, 1993 
------------------------------------------------------------------------
}
schema smarmotech


TOOLBAR 
  ITEM nuevo (TEXT="Codigos", IMAGE="new", COMMENT="Nuevo Codigo")
  ITEM buscar (TEXT="Buscar Codigos", IMAGE="find", COMMENT="Criterio de busqueda")
 SEPARATOR
  ITEM salir (TEXT="Salir", IMAGE="quit")
END
LAYOUT (TEXT="CREACION CONCEPTOS NOMINAS", STYLE="basic")
GRID
{
Movimiento                   [f0 ] [a                             ]
Primer Encabezado            [f001  ]
Segundo Encabezado           [f002  ]
Tercer Encabezado            [f003  ]
Encabezado En El Volante     [f021       ]
Tipo de Movimiento           [b] [d       ]
Clasificacion del Movimiento [c                      ]
Afecta TSS                   [af  ]
Cantidad Compania   [f005        ]      Cantidad Empleado   [f006        ]
Cuenta Control      [cc      ]          Cuenta Auxiliar     [ca      ]
[j]
Usuario Creador  [f007     ]            Usuario Modificador  [f009     ]
Fecha Creacion   [f008            ]     Fecha Modificacion   [f010            ]
}
end
tables
notb00002
attributes
COMBOBOX af =formonly.afecta_tss,include=("SI","NO");
f0 = notb00002.cod_mov,autonext;
a = notb00002.descrip_mov,upshift,
 comments = "Digite la descripcion del movimiento";
f001 = notb00002.primer_enc,upshift,
 comments = "Digite el primer encabezado";
f002 = notb00002.segundo_enc,upshift,
 comments = "Digite el segundo encabezado";
f003 = notb00002.tercer_enc,upshift,
 comments = "Digite el tercer encabezado";
b = notb00002.tipo_mov,upshift,comments = "Digite F- Fijo, V- Variable";
d = formonly.descr,noentry;
COMBOBOX c = formonly.clase_mov,ITEMS = (("R","ISR"),("I","INGRESOS"),("P","INGRESOS SIN RETENCION ISR"),("D","DESCUENTOS"),("E","HORAS EXTRAS"),("S","SEGURO SOCIAL"),("C","DESCUENTO CALCULADO"),("G","INGRESOS CALCULADO"));

f005 = notb00002.cantidad_cia,
 comments = "Digite el monto que aporta la compania";
f006 = notb00002.cantidad_emp,
 comments = "Digite el monto que aporta el empleado";
cc = notb00002.cta_control,autonext,
 comments = "Digite la cuenta control del movimiento";
ca = notb00002.cta_aux,
 comments = "Digite la cuenta auxiliar del movimiento";
j = notb00002.status_t,noentry;
f007 = notb00002.us_crea,noentry;
f008 = notb00002.fech_crea,noentry;
f009 = notb00002.us_mod,noentry;
f010 = notb00002.fech_mod,noentry;
f021 = notb00002.ch_encabeza,comments = 
"Digite el encabezado para el cheque";
instructions
  delimiters " "
end