schema smarmotech TOPMENU GROUP g1 (TEXT="CONTEO FISICO") COMMAND actualizarf (TEXT="Actualizacion Conteo PDA") COMMAND Eliminarf (TEXT="Eliminar Conteo",IMAGE="cancel") END GROUP g2 (TEXT="INVENTARIO FISICO") COMMAND actualizari (TEXT="Actualiza inventario",IMAGE="pda") COMMAND eliminari (TEXT="Eliminar Inventario Fisico",IMAGE="cancel") COMMAND imprimir (TEXT="Impresion",IMAGE="printer") END GROUP g3 (TEXT="DOCUMENTO") COMMAND actualizard (TEXT="Actualziacion Documento") COMMAND eliminard (TEXT="Eliminar Documento",IMAGE="cancel") END GROUP g4 (TEXT="Interrumpir") COMMAND salir (TEXT="Salir Sistema",IMAGE="exit") END END LAYOUT (TEXT="Visualizacion Conteo y Ajuste",STYLE="Basic") GRID { Fecha Conteo : [f1 ] Busca Fecha Conteo[fb ] Numero Documento Ajuste: [doc ]Fecha Documento:[fd ]No. Registros: [no ] Codigo Movimiento : [cod ][DESc ] TIPO INVENTARIO : [tp ] Registros Sumarizados [rs ] ALMACEN : [al ] Incluye Registros SECCION : [se ] Que no esten en el conteo[ii ] TRAMO O FILA : [fila ] Igualo Existencia En Libro a Fisica? [fs ] 0 50 100 [p000 ] [a ][b ][c ][d ][de ][u ][c1 ][c2 ][d1 ][p1 ][v1 ][v2 ][u1 ][f11 ][z1][z2 ][z3 ][kj ] [a ][b ][c ][d ][de ][u ][c1 ][c2 ][d1 ][p1 ][v1 ][v2 ][u1 ][f11 ][z1][z2 ][z3 ][kj ] [a ][b ][c ][d ][de ][u ][c1 ][c2 ][d1 ][p1 ][v1 ][v2 ][u1 ][f11 ][z1][z2 ][z3 ][kj ] [a ][b ][c ][d ][de ][u ][c1 ][c2 ][d1 ][p1 ][v1 ][v2 ][u1 ][f11 ][z1][z2 ][z3 ][kj ] [a ][b ][c ][d ][de ][u ][c1 ][c2 ][d1 ][p1 ][v1 ][v2 ][u1 ][f11 ][z1][z2 ][z3 ][kj ] [a ][b ][c ][d ][de ][u ][c1 ][c2 ][d1 ][p1 ][v1 ][v2 ][u1 ][f11 ][z1][z2 ][z3 ][kj ] [a ][b ][c ][d ][de ][u ][c1 ][c2 ][d1 ][p1 ][v1 ][v2 ][u1 ][f11 ][z1][z2 ][z3 ][kj ] [a ][b ][c ][d ][de ][u ][c1 ][c2 ][d1 ][p1 ][v1 ][v2 ][u1 ][f11 ][z1][z2 ][z3 ][kj ] [a ][b ][c ][d ][de ][u ][c1 ][c2 ][d1 ][p1 ][v1 ][v2 ][u1 ][f11 ][z1][z2 ][z3 ][kj ] [a ][b ][c ][d ][de ][u ][c1 ][c2 ][d1 ][p1 ][v1 ][v2 ][u1 ][f11 ][z1][z2 ][z3 ][kj ] TOTAL AJUSTE [t1 ] TOTAL FISICO[tf ]TOTAL TEORICO[fi ] } END attributes PROGRESSBAR p000 = formonly.progreso,VALUEMIN=0,VALUEMAX=100,COLOR=GREEN; doc= formonly.num_doc; COMBOBOX fb = formonly.busca_fecha; DATEEDIT fd = formonly.fecha_doc type date,format="dd/mm/yyyy"; DATEEDIT f1 = formonly.xfecha type date,format="dd/mm/yyyy" ; COD = formonly.cod_mov; desc = formonly.descrip_mov; CHECKBOX rs = formonly.sumarizo type char,NOT NULL,VALUECHECKED="S",VALUEUNCHECKED="N",default="N"; CHECKBOX ii = formonly.incluye type char,NOT NULL,VALUECHECKED="S",VALUEUNCHECKED="N",default="N"; CHECKBOX fs = formonly.igualo type char,NOT NULL,VALUECHECKED="S",VALUEUNCHECKED="N",default="N"; COMBOBOX tp = formonly.tipo_inventario,include = ("MATERIA PRIMA","PRODUCTOS TERMINADOS","REPUESTOS"); COMBOBOX al = formonly.almacen; COMBOBOX se = formonly.seccion; COMBOBOX fila = formonly.tramo; a = formonly.cod_n, UNSORTABLE, TITLE="CLASE"; b = formonly.cod_grupo,UNSORTABLE, TITLE="GRUPO"; c = formonly.cod_tipo, UNSORTABLE,TITLE = "TIPO"; d = formonly.cod_sec, UNSORTABLE,TITLE = "SECUENCIA"; de = formonly.descripcion, NOENTRY,TITLE="DESCRIPCION"; u = formonly.unidad_med, NOENTRY,TITLE="UNIDAD MEDIDA"; c1 = formonly.fisico, TITLE = "FISICO",FORMAT="###,###.####"; c2 = formonly.teorico TYPE DECIMAL(12,2), UNSORTABLE,TITLE ="TEORICO",noentry,FORMAT="---,--#.####"; d1 = formonly.diferencia, UNSORTABLE,TITLE="DIFERENCIA",noentry,FORMAT="---,--#.##"; p1 = formonly.costo, UNSORTABLE,TITLE ="COSTO",noentry,FORMAT="###,###.####"; v1 = formonly.valor1, UNSORTABLE,TITLE="VALOR",noentry,FORMAT="---,---,--#.##"; v2 = formonly.valor2, UNSORTABLE,TITLE="VALOR DIF",noentry,FORMAT="-,---,--#.##"; t1 = formonly.total2, FORMAT="---,---,--#.##"; u1 = formonly.usuario,UNSORTABLE,noentry; f11 = formonly.fechacrea,UNSORTABLE,noentry; no = formonly.numero_registros,UNSORTABLE,noentry; z1 = formonly.bodega,UNSORTABLE,noentry,TITLE="bodega"; z2 = formonly.cod_seccion,UNSORTABLE,noentry,TITLE="SECCION"; z3 = formonly.cod_tramo,UNSORTABLE,noentry,TITLE="TRAMO O FILA"; kj = formonly.trxid,UNSORTABLE,noentry; fi = formonly.total_teorico,FORMAT="--,---,---,--#.##"; tf = formonly.total_fisico,FORMAT="--,---,---,--#.##"; INSTRUCTIONS DELIMITERS " " SCREEN RECORD sconteo[10](cod_n,cod_grupo,cod_tipo,cod_Sec,descripcion,unidad_med,fisico,teorico,diferencia,costo,valor1,valor2,usuario,fechacrea,bodega,cod_seccion,cod_tramo,trxid) END