{ ============================================================================= FORMULARIO : PRFMWD004 OBJETIVO : DESPIECE PRODUCTOS PARA REQUISICION DESPACHO(CCPRMT008) PROGRAMA Q. LO USA : CCPRMT008 AUTOR : JUAN F. SOTO FECHA : NOVIEMBRE 11, 2010 ============================================================================= } DATABASE smarmotech LAYOUT (TEXT="Despiece Requisiciones Despachos",STYLE="basic") GRID { DESCRIPCION:[des ][und ] [et ][a ][b ][c ][d ][l1 ][l2 ][l3 ][c1 ][m ][m1 ][m2 ] [et ][a ][b ][c ][d ][l1 ][l2 ][l3 ][c1 ][m ][m1 ][m2 ] [et ][a ][b ][c ][d ][l1 ][l2 ][l3 ][c1 ][m ][m1 ][m2 ] [et ][a ][b ][c ][d ][l1 ][l2 ][l3 ][c1 ][m ][m1 ][m2 ] [et ][a ][b ][c ][d ][l1 ][l2 ][l3 ][c1 ][m ][m1 ][m2 ] [t1 ] [m4 ] } end tables vetb00004 attributes et = formonly.etiqueta,noentry,TITLE="ETIQUETA"; t1 = formonly.total_medida; m4 = formonly.total_medida_r,COLOR=BLUE; des = formonly.descrip_esp; und = formonly.unidad_med; a = formonly.cod_n,noentry,TITLE="CLASE"; b = formonly.cod_grupo,noentry,TITLE="GRUPO"; c = formonly.cod_tipo,noentry,TITLE="TIPO"; d = formonly.cod_sec,noentry,TITLE="SECUENCIA"; l1 = formonly.lado_1,noentry,TITLE="LADO 1"; l2 = formonly.lado_2,noentry,TITLE="LADO 2"; l3 = formonly.lado_3,noentry,TITLE="LADO 3"; c1 = formonly.cantidad,noentry,TITLE="CANTIDAD ORD"; m = formonly.medida,noentry,TITLE="MEDIDA ORD"; m1 = formonly.cantidad_r,TITLE="CANTIDAD",COLOR=BLUE; m2 = formonly.medida_r,TITLE="MEDIDA",COLOR=BLUE; instructions delimiters " " screen record sdespiece[5](etiqueta,cod_n,cod_grupo,cod_tipo,cod_sec,lado_1,lado_2,lado_3,cantidad,medida,cantidad_r,medida_r) end