{
------------------------------------------------------------------------
 FORMULARIO        : NOFMMT011
 OBJETIVO          : Pantalla que captura los numeros y montos de las
                     facturas de farmacia y plaza lama
                     Es utilizada por: NOPRMT011
 PROGRAMADOR       : Ing. Betania Guerrero Perez
 FECHA REALIZACION : Septiembre 09, 1993
------------------------------------------------------------------------
}
database smarmotech
TOOLBAR 
  ITEM nuevo (TEXT="Prestamo", IMAGE="new", COMMENT="Nuevo Prestamo")
  ITEM buscar (TEXT="Buscar Prestamo", IMAGE="find", COMMENT="Criterio de busqueda")
 SEPARATOR
  ITEM salir (TEXT="Salir", IMAGE="quit")
END
LAYOUT (TEXT="CONTROL PRESTAMOS Y FACTURAS  Version 2.20.1a", STYLE="basic")
GRID

{
Codigo Empleado  [f000] [f001] [f2] [f3] [a                             ]
Numero Documento [f004       ]
Movimiento       [b ] [c                             ]
Fecha Factura    [f002      ]            Monto            [f005        ]
Porciento        [f003  ]                Monto Neto       [mn          ]
[j]
Usuario Creador  [f006     ]             Usuario Modificador  [f008     ]
Fecha Creacion   [f007            ]      Fecha Modificacion   [f009            ]
}
end
tables
notb00011,notb00002
attributes
f000 = notb00011.num_emp,autonext,
 comments = "Digite la ficha del empleado";
f001 = notb00011.departamento,noentry;
f2 = notb00011.nivel_emp,noentry;
f3 = notb00011.cod_puesto,noentry;
a = formonly.descrip1,noentry;
f004 = notb00011.num_doc,autonext,comments = "Digite el numero del documento";
b = notb00011.cod_mov,upshift,autonext,
 comments = "Digite el codigo de movimiento";
c = notb00002.descrip_mov,noentry;
DATEEDIT f002 = formonly.fecha type date,format = "dd/mm/yyyy";
f005 = notb00011.monto,comments = "Digite el monto del documento";
f003 = notb00011.porciento,comments = "Digite el porciento de descuento";
mn = formonly.monto2,noentry;
j = notb00011.status_t,noentry;
f006 = notb00011.us_crea,noentry;
f007 = notb00011.fech_crea,noentry;
f008 = notb00011.us_mod,noentry;
f009 = notb00011.fech_mod,noentry;
instructions
  delimiters " "
end