Añadir cpprrp002, cpprrp003 y cpprrp004; corregir reportes XML y formulario cpfmrp002

- cpprgb000/msgrp000: restaurar getPreviewDevice con case correcto
  (ui.Interface.frontCall) y dejar configureOutput como stub, ya que la
  API fgl_report_* no existe en este FGL 6.00.01.
- cpprrp002/003/004: sustituir configureoutput()/handler roto por
  om.XmlWriter.createFileWriter escribiendo a FGLSPOOL, usando STRING
  para la ruta (CHAR(80) truncaba la ruta larga del proyecto).
- cpfmrp002.per: agregar campo faltante "Salida" (r_output) que el
  programa ya esperaba.
- mbsERP.4pw: registrar cpprrp002/003/004 con sus dependencias,
  entorno FGLSPOOL y configuracion de prueba.

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

PROYECTO/cpdir/cpprrp003.4gl

@@ -13,8 +13,9 @@ GLOBALS "cpprgb000.4gl"
     DEFINE idx_1, idx_2, idx_3 SMALLINT 
     DEFINE fecha_inicial, fecha_final DATE  
     DEFINE salir, salir1, salir3, tipo_venta CHAR(1) 
-    DEFINE selec5, selec6 CHAR(1500) 
+    DEFINE selec5, selec6 CHAR(1500)
     DEFINE cod_sp SMALLINT
+    DEFINE p_reportfile STRING
 
     DEFINE tot_gen1 RECORD 
        totald     DECIMAL(10,2),
@@ -145,9 +146,14 @@ FUNCTION cpprrp003()
 #                                                       doble_on,doble_off,comp_on,comp_off,
 #                                                       doce,normal,archivo,copia
 
-                                                       
-       #START REPORT reporte61 TO archivo
-         CALL configureoutput("SVG") RETURNING handler  
+
+       -- La API de configuracion de reportes (fgl_report_*) no esta
+       -- disponible en este FGL; se escribe el XML directo a un archivo
+       -- en FGLSPOOL en lugar de la vista previa SVG.
+       -- (usa STRING, no "archivo" CHAR(80): la ruta del proyecto supera
+       --  los 80 caracteres y se truncaba)
+       LET p_reportfile = FGL_GETENV("FGLSPOOL"), "/cpprrp003_mayor.xml"
+       LET handler = om.XmlWriter.createFileWriter(p_reportfile)
        START REPORT reporte61 TO XML HANDLER handler
      
 LET selec5 =