{
-------------------------------------------------------------------------
NOMBRE          : ctfmmt009
OBJETIVO        : Capturar las informaciones de labor standard
DISENO          : Ing. Juan F.Soto
FECHA REALIZADO : JULIO 09, 1993
MODULO UTILIZA  : ctprmt009
--------------------------------------------------------------------------
}
 database marmotech
 screen
{ 
 Semi-elaborado        [cod ]  [des                                  ]
 Numero Departamento   [nd  ]  [nd1                                  ]
\g--------------------------------------------------------------------------\g
                                                            PRODUCCION 
  Tipo                                                      POR  HORA    
\g--------------------------------------------------------------------------\g
 [tp  ]     [tp1                           ]   [tp2 ]       [cp       ]
 [tp  ]     [tp1                           ]   [tp2 ]       [cp       ]
 [tp  ]     [tp1                           ]   [tp2 ]       [cp       ]
 [tp  ]     [tp1                           ]   [tp2 ]       [cp       ]
}
end
tables
cttb00008
attributes
nd = formonly.num_dpto type smallint;
nd1= formonly.nom_dpto type CHAR,noentry,color=yellow;
cod = formonly.cod_prod, comments = "Digite Codigo Semi-elaborado";
des =formonly.descrip1,noentry;
tp = formonly.tipo_p type smallint,autonext;
tp1= formonly.desc_prod type char,noentry,color=yellow;
tp2= formonly.unidad type char,noentry,color=yellow;
cp = formonly.prod_p_hora;
instructions 
  screen record datos_s[4] (tipo_p,desc_prod,unidad,prod_p_hora)
delimiters " "
end