1 files changed, 271 insertions, 0 deletions
diff --git a/2022-2/L01/mitsuo/fun.cpp b/2022-2/L01/mitsuo/fun.cpp
new file mode 100644
index 0000000..386738d
--- /dev/null
+++ b/2022-2/L01/mitsuo/fun.cpp
@@ -0,0 +1,271 @@
+/* Functions are written in the in order as I write them 
+ * (following "Diseño desendente"). */
+
+#include <iostream>
+#include <iomanip>
+#include <cstring>  /* strlen, strcpy, strcmp, strcat */
+#include <cctype>   /* toupper */
+
+#include "fun.h"
+#include "aux.h"
+
+
+using namespace std;
+
+/* Input 
+ * ===== */
+
+void readRecordsWriteReport() 
+{
+    char esp1[MAXLEN], esp2[MAXLEN];
+    int curDate; // current date
+
+    // (counters)
+    int med1Qty, pac1Qty, medVen1Qty;
+    int med2Qty, pac2Qty, medVen2Qty;
+    med1Qty = pac1Qty = medVen1Qty = 0;
+    med2Qty = pac2Qty = medVen2Qty = 0;
+
+    // Header
+    cin >> esp1 >> esp2;
+    curDate = readdate(cin);
+    writeHeader(esp1, esp2, curDate);
+
+    // Medicos
+    readWriteMedicos(curDate,
+        esp1, med1Qty, pac1Qty, medVen1Qty,
+        esp2, med2Qty, pac2Qty, medVen2Qty
+    );
+
+    // Resumen (counters)
+    // (Hasta antes de agregar esta parte de los contadores el archivo era de
+    // menos de 170 lineas, luego con el resumen y pasando LAS 10 VARIABLES
+    // necesarias para contar, se incremento el numero de lineas a 267.  Esta
+    // parte se puede dejar para el final, y sin pasar todas esas variables en
+    // un inicio porque son tantas que marea y hace cualquier edicion mas
+    // dificil.  Es dificil estimar pero todo esto de los contadores debe valer
+    // unos 5 hasta 8 puntos.)
+    writeformattedResumen(
+            esp1, med1Qty, pac1Qty, medVen1Qty,
+            esp2, med2Qty, pac2Qty, medVen2Qty
+    );
+}
+
+/* Basic Output
+ * ============
+ * 
+ * (mixed with more input, this is often the LP1 way processing text) */
+
+void writeHeader(char *esp1, char *esp2, int curDate) 
+{
+    cout << 
+"                                           EMPRESA PRESTADORA DE SALUD\n"
+"========================================================================================================================\n"
+"ESPECIALIDADES A VERIFICAR: " << esp1 << " Y " << esp2 << '\n' << 
+"FECHA DEL PROCESO: "
+        ;
+    writedate(cout, curDate);
+    cout << '\n';
+}
+
+void readWriteMedicos(
+        int curDate,
+        char *esp1, int &med1Qty, int &pac1Qty, int &medVen1Qty,
+        char *esp2, int &med2Qty, int &pac2Qty, int &medVen2Qty
+) {
+    char id[MAXLEN], name[MAXLEN], esp[MAXLEN];
+    for (int i = 0; cin >> id >> name; i++) {
+        separateNameEsp(name, esp);
+        writeformattedMedico(id, name, esp);
+
+        // Pacientes
+        readWritePacientes(
+                curDate,
+                esp,
+                esp1, pac1Qty, medVen1Qty,
+                esp2, pac2Qty, medVen2Qty
+        );
+
+        // (counters)
+        if (strcmp(esp1, esp) == 0) {
+            med1Qty++;
+        } else if (strcmp(esp2, esp) == 0) {
+            med2Qty++;
+        }
+    }
+}
+
+void readWritePacientes(
+        int curDate,
+        char *esp,
+        char *esp1, int &pac1Qty, int &medVen1Qty,
+        char *esp2, int &pac2Qty, int &medVen2Qty
+) {
+    /* The trick here is that every Paciente begins with a number.  So input
+     * will fail when there is no more Pacientes.  Then clear the fail flag to
+     * resume with next Medico */
+    char name[MAXLEN];
+    int dni, qty;
+    int medVenCnt;      // medVenCnt
+
+    medVenCnt = 0;
+    for (int i = 0; cin >> dni >> name >> qty; i++) {
+        writeformattedPaciente(i+1, dni, name);
+
+        // Medicina
+        readWriteMedicinas(qty,
+                medVenCnt,
+                curDate,
+                esp,
+                esp1, medVen1Qty,
+                esp2, medVen2Qty
+        );
+
+        // (counters)
+        if (strcmp(esp1, esp) == 0) {
+            pac1Qty++;
+        } else if (strcmp(esp2, esp) == 0) {
+            pac2Qty++;
+        }
+    }
+    cin.clear();
+
+    // (almost hidden mini summary)
+    cout << WL(4 + 12 + 20 + 12) << "";
+    cout << "Cantidad de medicamentos vencidos: " << medVenCnt
+        << '\n';
+}
+
+void readWriteMedicinas(int n,
+        int &medVenCnt,
+        int curDate,
+        char *esp,
+        char *esp1, int &medVen1Qty,
+        char *esp2, int &medVen2Qty
+) {
+    char name[MAXLEN];
+    int id, venDate;
+
+    for (int i = 0; i < n; i++) {
+        cin >> id >> name; 
+        venDate = readdate(cin);
+
+        writeformattedMedicina(i, id, name, venDate, n, curDate);
+
+        // (counters)
+        if (curDate > venDate) {
+            medVenCnt++;
+
+            if (strcmp(esp1, esp) == 0) {
+                medVen1Qty++;
+            } else if (strcmp(esp2, esp) == 0) {
+                medVen2Qty++;
+            }
+        }
+    }
+}
+
+/* Formatted output 
+ * ================ */
+
+// Una vez con los datos leidos. Verificando que el ultimo medico y medicina se
+// leen bien.  Se procede a tratar de formatear la salida.
+
+// I usually like the output being 80 columns (characters) wide, with "tabstops"
+// every 4 columns.  But this output is huge so I'll go with 120 columns.
+// Defining and sticking with some kind of standard makes the process more
+// straightforward and faster.
+// https://en.wikipedia.org/wiki/Tab_stop
+
+void writeformattedMedico(char *id, char *name, char *esp)
+{
+    cout << 
+"========================================================================================================================\n"
+"Medico: " << name << " [" << id << "]             Especialidad: " << esp << '\n' <<
+"------------------------------------------------------------------------------------------------------------------------\n"
+"       Pacientes atendidos                                 Medicinas recibidas\n"
+"------------------------------------------------------------------------------------------------------------------------\n"
+// a small offset "to center" the table headers
+"  " 
+
+// 4 12         20                  12          8       32                              12          12       (col)
+// 1 3          5                   3           2       8                               3           3        (tabstops)
+"    DNI         Nombre              Cantidad    Codigo  Descripcion                     FV          Observacion \n"
+"------------------------------------------------------------------------------------------------------------------------\n"
+    ;
+}
+
+void writeformattedPaciente(int i, int id, char *name)
+{
+    cout << WR0(3, 2, i) << ")" 
+         << WR(12) << id
+         << WL(20) << name;
+}
+
+void writeformattedMedicina(int i, int id, char *name, int venDate, int qty,
+        int curDate
+) {
+    char obs[MAXLEN] = "";
+
+    if (curDate > venDate)
+        strcpy(obs, "VENCIDO");
+
+    if (i == 0) {
+        cout << WL(12) << qty;
+    } else {
+        cout << WL(4 + 12 + 20 + 12) << "";
+    }
+
+    cout << WR(8) << id
+         << WL(32) << name
+         << WL(12) << venDate
+         << WL(12) << obs
+         << '\n';
+}
+
+// Resumen final
+
+void writeformattedResumen(
+        char *esp1, int med1Qty, int pac1Qty, int medVen1Qty,
+        char *esp2, int med2Qty, int pac2Qty, int medVen2Qty)
+{
+    cout << 
+"========================================================================================================================\n"
+         << "RESUMEN\n";
+    writeformattedResumenLine(esp1, med1Qty, pac1Qty, medVen1Qty);
+    writeformattedResumenLine(esp2, med2Qty, pac2Qty, medVen2Qty);
+    cout << 
+"========================================================================================================================\n"
+        ;
+}
+
+void writeformattedResumenLine(
+        char *esp, int medQty, int pacQty, int medVenQty)
+{
+    strcat(esp, ": ");
+    cout << "Especialidad" 
+         << WL(16) << esp
+         << WR0(2, 2, medQty) << " medicos, "
+         << WR0(2, 2, pacQty) << " pacientes, "
+         << WR0(2, 2, medVenQty) << " medicinas vencidas."
+         << '\n';
+}
+
+/* Problem specific helper functions 
+ * =================================*/
+
+void separateNameEsp(char *name, char *esp)
+{
+    int i;
+
+    for (i = strlen(name); i > 0; i--) {
+        if (name[i] == '_')
+            break;
+    }
+    name[i] = '\0';
+
+    strcpy(esp, &name[i+1]);
+    for (i = 0; esp[i] != '\0'; i++) {
+        esp[i] = toupper(esp[i]);
+    }
+}