Commit inicial: fuentes MBS ERP (Genero 6) + .gitignore + docs/SETUP_PC_MBS.md

PROYECTO/nodir/noprrp020.ace

@@ -0,0 +1,47 @@
+database rayovac end
+output report to "jh" 
+left margin 0 end
+
+select
+	a.num_emp,
+	a.porc_accidente,
+        b.nom1_emp,b.apell1_emp,b.nomina
+from notb00018 a, adtb00003 b
+where a.num_emp = b.num_emp and
+      a.status_t is null  order by 5,1  end
+
+format 
+page header 
+    print column 1, "noprrp020.ace",
+          column 19, "R A Y . O . V A C   D O M I N I C A N A, S. A.",
+          column 73, today using "dd/mm/yy"
+    print column 19, "    PORCENTAJE DE ACCIDENTE DE EMPLEADOS",
+          column 73, time
+    print column 73, "PAG.: ",pageno using "##"
+    skip 1 line
+    print column 1,
+          "===================================================================",
+          "=============="
+    print column 1, "  EMPLEADOS    ",
+          column 70, " PORCENTAJE"
+    print column 1,
+          "===================================================================",
+          "=============="
+before group of 5
+skip 1 line
+begin
+  if nomina = "Q" then
+     print "Q U I N C E N A L E S"
+  else
+     print "S E M A N A L E S"
+  end
+skip 1 line
+on every row
+   print column 1, num_emp using "####"," ",nom1_emp," ",apell1_emp,
+         column 74, porc_accidente using "###.##","%"
+after group of 5
+skip to top of page
+
+on last row
+   print column 1, "REGISTROS IMPRESOS====> ",count using "#####"
+end