{
=============================================================================
   FORMULARIO         : IPFMWD009
   OBJETIVO           : Desplegar los codigos y nombres de la maestra de
                        clientes
   PROGRAMA Q. LO USA : IPPRMT044
   AUTOR              : JUAN F. SOTO
   FECHA              : FEBRERO 6, 1999
=============================================================================
}
DATABASE smarmotech 
SCREEN
{
    
   DESCRIPCION:[cod   ][des                                  ][und ]
\g------------------------------------------------------------------------------\g
            --MEDIDA RECIBIDAS---
   Bloque   Lado 1 Lado 2  Lado 3  Cantidad   Medidas
\g------------------------------------------------------------------------------\g
 [et       ][b  ] [c   ]  [d   ][l1     ][l2     ][l3    ][c1     ][m        ]
 [et       ][b  ] [c   ]  [d   ][l1     ][l2     ][l3    ][c1     ][m        ]
 [et       ][b  ] [c   ]  [d   ][l1     ][l2     ][l3    ][c1     ][m        ]
 [et       ][b  ] [c   ]  [d   ][l1     ][l2     ][l3    ][c1     ][m        ]
 [et       ][b  ] [c   ]  [d   ][l1     ][l2     ][l3    ][c1     ][m        ]
 [et       ][b  ] [c   ]  [d   ][l1     ][l2     ][l3    ][c1     ][m        ]
 [et       ][b  ] [c   ]  [d   ][l1     ][l2     ][l3    ][c1     ][m        ]
 [et       ][b  ] [c   ]  [d   ][l1     ][l2     ][l3    ][c1     ][m        ]
                                                                  ============
                                                                   [t1       ]
}
end
tables
vetb00004
attributes
cod = formonly.cod_prod;
et  = formonly.codigo_bloque,noentry;
t1  = formonly.total_medida;
des = formonly.descripcion;
und = formonly.medida;
b   = formonly. ancho1;
c   = formonly.largo1;
d   = formonly.espesor1;
l1  = formonly.medida1;
l2  = formonly.ancho2;
l3  = formonly.largo2;
c1   = formonly.espesor2;
m   = formonly.medida2;
m1  = formonly.cantidad;
 
instructions delimiters " "
screen record sdespiece[8](codigo_bloque,cod_,ancho1,largo1,espesor1,medida1,ancho2,largo2,
                           espesor2,medida2,cantidad)
end