Agrega y corrige inprrp008, inprrp028, inprrp009 e inprrp011 (Materia Prima)

- inprrp008: agrega CONNECT faltante en MAIN, corrige ruta de impresion
  hardcodeada (C:\archivo -> FGLSPOOL) y comando RUN sin comillas,
  reconstruye infmrp008 como .4fd (el campo Ordenamiento se compilaba
  como checkbox en vez de texto)
- inprrp028: restaura la rama matricial (Si/No Reporte Grafico) que
  habia quedado comentada, dejando el programa forzado a la via XML
  rota; agrega funcion compartida seleccionarSalida() a defecto.4gl
- inprrp009: agrega notNull al combo de Bodega para quitar los items
  <blank>/<not blank>, agrega titulo a la ventana
- Registra formularios infmrp008, infmrp028 e infmrp011 en el proyecto
- Todos probados: corren completos sin error de FGL (Exit code: 0) via
  matricial; la salida grafica/PDF sigue siendo la limitacion conocida
  de entorno (Report Writer 2.0 no disponible)

Co-Authored-By: Claude Sonnet 5 <noreply@anthropic.com>

PROYECTO/indir/inprrp008.4gl

@@ -8,8 +8,13 @@ FECHA REALIZACION    :  Septiembre 29, 1992
 }
 GLOBALS "inprgb000.4gl"
 
-MAIN                
+MAIN
    DEFER INTERRUPT
+   CALL ARG_VAL(1) RETURNING usuarios
+   CALL ARG_VAL(2) RETURNING clave
+   CALL ARG_VAL(3) RETURNING impresor
+   CONNECT to "smarmotech" USER  usuarios USING clave
+
    SELECT * INTO p_companias.* FROM companias
    CALL inprrp008()
 END MAIN
@@ -92,8 +97,10 @@ WHENEVER ERROR CONTINUE
       DISPLAY "<< Reporte Generandose ...  Por Favor Espere. >>" 
               AT 19,14 ATTRIBUTE (REVERSE) 
 
-    START REPORT movimiento TO "C:\\archivo"         
-    FOREACH accion INTO tipo.* 
+    LET archivo = FGL_GETENV("FGLSPOOL"),"\\archivo_tipomov.txt"
+
+    START REPORT movimiento TO archivo
+    FOREACH accion INTO tipo.*
        IF status = NOTFOUND THEN
          EXIT FOREACH
        ELSE
@@ -104,7 +111,9 @@ WHENEVER ERROR CONTINUE
 
     CLEAR SCREEN
 
-RUN "type C:\\archivo > %USPRINT%" END FUNCTION
+LET dcmd = "type \"",archivo CLIPPED,"\" > %USPRINT%"
+RUN dcmd
+END FUNCTION
 
     REPORT movimiento(x)
        DEFINE x RECORD