Translating Crystal Syntax to SQL difficulties.

  • Hey All,
    Hoping to draw on some of the expertise on here!
    Currently struggling to translate the following Crystal Reports syntax into SQL.

    Here is an example of the data:
    data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAABaUAAAC6CAYAAAC+/CHWAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAE+mSURBVHhe7d0/jxu54/h3bp5BHkCaOwmGEdy31wJJd0C0MA6uDKRZII223S3861y5i4vddtUEcBPAlQ/wrYIrE2DV2wiM+0h3V1xzXR6CQg7J0fwhZ8j5p5H0fgEDr3epGf6ZISlyhnPx9z//7oTx9etX8V//9V/mfzgXlDuAc/LP//m/iP/pf/ufzf8AABje//N//N/if/hf/y/zPwDHiO/RANDOf2f+BQDgfFxcsLGxsbGxHW4DAAA4cwxKAwDOj2uAgI2NjY2NbagNAADgzDEoDQA4P64BAjY2NjY2tqE2AACAM8egNADg/LgGCNjY2NjY2IbaAAAAztzFr7/9nr7oEACAU/ff/7//zfwEAMBh/H//4/9ufgIAADhPF3//8286KK3eHvvL1c/mfzgXmz//EtMffzD/A4DTRp0HADg02iLg+HEdA0A7LN8BAAAAAAAAABgMg9IAAAAAAAAAgMEwKA0AAAAAAAAAGAyD0gAAAAAAAACAwTAoDQAAAAAAAAAYDIPSAAAAAAAAAIDBMCgNAAAAAAAAABgMg9KItn24FBcXF+JmZX4BAAAAoDen2v/mewXOCed7S6ubJP8uH7bmFwCO3VkPSttGgUoNAHCqaOsAABgP2mXg8LgOgXE4+UHp1c2FrGwuRUxd0+QzAAAcyrG0dedyTAAAYtFeAQDOzVnfKT25fRa73U48307MbwAAOC20dQAAjAftMnB4XIfAOLCmNAAAAAAAAABgMMGD0vpxIruZx4rMQvO5hforFp/3L+y/Ejfpvs12+SBKe8geb/sgLivC22NdLdX/1uJuasNmHokqxLXuMzYP3OsO2TTcyJ9Oh7PcXbJ5aX5ONlvYjc6LrXi4zB4/uzV8tC3iHNprf35m053LU+8x9/kSEhZAN2jrVHD9f1fa9mmIa+uC4mnU1n0mPa68s3FXeRdzTAAYk5PrfxvB6bKyaTKbu22SimE9/ebaNkaJzTcTPqTdThT2T3t1mk7uOs6e56U+ra9fGNj3NUrXZ2BcnX3XbF6qrXjcUr5W5JkjzkF1CYBaAYPS+uLUjaSlG8vL99/M/1tIKoMrkdu9sr4TU9+F/Vl+ZnonY5Ghwpdr407NXy+Sf9efvpTjtfqs07B4LebJL46dv9ynd7mcz/t0LS7yH2pINWBTUXWoVkLPoY7Oz/XdVDZ4D0mjnMse53503pfyWYU9sUkPYDxo66zDtXWBdd/8UTypKMrfXxe+fCTlt3gSj6fREAM4O6fa/45PVzLI5EiT6lM7B5eKYUvt5QD96wO12xibU72ODXWel/q0S3FVvI4i+77qmi/nj8q36utTfS7JNtn/S5fiCKoTmhqgLgHOSP2g9OqDqdAW4mm3S9bd2e024n4mr7t1VzVddt/7/ctvxOKL45v6cpnUOvvPbO6FCi6W79OZNLtGUPLFVf71fmP3/Sx8ywbVfmb+1huv1Wdd6S1en8g34Ypyr5KcE7N7sbGfaTgysH14bwY+nsyx5aYLxvzOX44hQs6hvQbnZyYPNibT1nd3SZoWT2Y/9pjF/di8z6Y93Y9s8OnYAt2jrdt/poe2LiieEXXf/PFJ5oyqV69NXsgvYPobiXgy7U6TvAGAgzrV/ndsuuwkY67ullvad85OSm7Fw3sVOB/W9r9TA/Sv475f7NFenZhTvY6N4nfdfdqW4n3pRM/mQSZs6fuv55q38fZQdyvbAel9fgXWCSUTcfucOXbmM7M3r+RfjQHqEuCc1A5Kp19Anx4zd0XpC7b+wg4wf5QXcXbfykS8epPUVuL7Rv8mJ6kEM5+Z3Ip3SX3lCd+Zfbw+5WtRobNpIU5mTLppuauyeb7dV9oNbb4nNX06uJCwAyXLz+1nIEPPoabnZyYPJrfvZEo0NSCdJkke82OSoOx+bCNaSLs0uf2o0//tj9LMMoB2aOuyDtHWxdZ9c/HW1J93H1bpF7DZ/dtCHgPA8TjV/ndsuvbhC4Nnsh18NoNUzqd5MpKB3jQdA/WvD9ZuY0xO/nu0GozNxVOm7aOegMldlxF9X+8179yHpgakk7uVcwPSfvk6IcD2QVyr/cty+ZhGiu/qQNdqBqW34o/kqeW+B1vlxX2ZWY9HbpWPtvz0olRZT19WVPAdmrx6U65wT3Dpjsbl7iibUYo6h+LOz9xMamIq9K79+fntD3s2bUTSj1CzrJnj6c08hrX+LkMB6A5tXdHwbV183Zd2/pdXOh9zXxoA4Nicav87Nl01E6Dz1/IvUtomTMRtMvKrl0dwrbs7WP/6gO02xuIMvke7TF6In9S/pesopO8bn2dqGZ9kP84B6ZA6oY6M97Vaimcm7j9mB+D5rg50rWZQ2l50PUpeBtHjmkddm7wSenJv/8hJOrMX3fKM1QDlXkN34AqPv9hHZWYvxVT/pn/Hdn4CaIC2ruQo2jr7pUNbvGt/dxEAHM6p9r8bpst7PHuzR4a6m9IslZGsOa0GiHzvawB6da7fox3XZXDfNz7PZvf3enLKtzROyzph+3CdxHt2/5EldICe1QxKOyqXTtkZKHXBb0R5TZ4xKj7WbGbzZ/fi7amMSfde7vXSJS+WV/vZR/OyguEGHg54fiaP/+2Pl9/cjzABaIq2ruxAbV1U3WfXkdaWV7xcBsAxO9X+d8N0ee829AxgqaU9krbCrlnreJka/Wv07ly/Rxevy5i+b5M8eyUek6V81uLu2jPYHFInuKxu6p/Aoy4BOlP/osPEUnyO/Ka3Dlo4y1ZeC/HuiKagbEWfPNZsHmcuL9lwCuLLvU7YeSEbsUv1pt6FWCQtqqVfVhCzFFQ7hzg/TaPsefEZgD7R1mUN29bF1312HWm1Vr/+glO4KwgAjtKp9r9D02UHqDzha5eSUmv3Fl+m1qx/HZZvgMuZfY+212V6J3ZM33ciXiRrf0Tm2fxRvxxUDTZX9v9cdYJP5sXZzvW9+a4OdK1mUNreKSWriNwdSKqy86yFOX2ZPCahZuZyT4zcuMK7Ox3povWdKb6sKUTVZ+bitf6mLq7Nm13fvDqegYZ6Dcq9TtR5YRox2ai9fczOOg79Buqhzs+s/d2Jd9PyXX8qv5qtiwXAj7bOra+2znXMyLov8/IZdef2/q4gz2OcjfIGAIZ0qv3v2HRlw1/m63S1HIC94zNdSmolbi4K4dIBsZ/EiyTukW1MVL51jfbquJ3qdZwh45FfCmP/5Nr+5oW4vq9dez2fZ1KyBEj5mrXmj2awWcZpfw2H1Aluqxs1oK9uePDd7RxZlwCo9/c//+7s9utvv8s6q+hpJ7/o7WTQ0jabzZJ/F08mqPG0CA+/ude/8225fT8t9O+LB5Tsfkp/sp9Jt9nufpP/2yz9hVH1GSsbZna/K/75mPxn+6f5Kctf7ouFTnto2Vgx50W5DDLhS4URoSKernOoyflZjt9mJxtL+beFzNU8u//8Z2x499Yq/QCi6zzaOvP3Ltq6ymOG1n02XCG+dt/FeIakEwAGdlb979h01bQH+fT6950PF9e/bpRv+UQknO22Cd+oXcaonOX3aN9W6H9F9X0rr8/Md2jXtbO5382ScPZ6CawTSvuq+Fyj/iqAEAHLd8zFo12HJ7UQ8nIWH9+Y/xbMH3f6UYqUflzk+V3yXEbO5Pa5vK6QeotqfgfN2cc6UtWzY4mQz9g3P0unuXSHv9wfX5v/Roo5L+wLtVySlxUM9PKS3s9PJ/WIUTGvNNmOiucjevwfOB60dYO0dZXHDKv77MtnxOJd/q4fu+/1nbjO3qXSJG8A4CBOtf8dmy7dHpTaTUm1B7vcGgRy3+aFZlkztY5tLlxc/zom3zpDe3UiTvx7tOq/Fq859bvCchdxfV/f9anSWbNGs1o7OvmgvXs5tE5oiu/qQJcu1B3S5mfx9etX8cvVz+Z/9ezjF+ri6219otFSj+Cot8mqinLoZSW6tfnzLzH98QfzvxFY3eiXMagXCJTWclKP4+h1sp54iQCABmLrPNq602jrAGBM6H8Dx++srmO7bzWwfH4dYgA9CXzRIUq2X8SnZL2mN+KklpMek59eFBpSafuH+GZ+BAD0jLYOAM4L/W/g+HEdAzgSDEo3tPpwJ/TTw663sqIV+7i4eonCxUV+m+p8n92/FfNktrfw94qNlw4AQBx/W0f9CwAnhf43cPy4jgEcGQalG1kJvVTTQqQvfkaHXOtwWXo9LtZqAoC+0dYBwPmg/w0cP65jAMel1ZrSOA2jWwsLAHpEnQcAODTaIuD4cR0DQDvcKQ0AAAAAAAAAGAyD0gAAAAAAAACAwVz8+tvv6fIdyssXP5qfAAAAAAAAAADoFmtKg7WwAJwV6jwAwKHRFgHHj+sYANph+Q4AAAAAAAAAwGAYlAYAAAAAAAAADIZBaQAAAAAAAADAYBiUBgAAAAAAAAAMhkFpAAAAAAAAAMBgGJQGAAAAAAAAAAxmnIPS2wdxeXEhLm5W5hcHMIY4AAAAAAAAAMCJGeWg9PbLJ7GW/y5ez/UvDmAMcQAAADVWN+Li4kJcPmzNL+BFXgEYAnVNOPIK2ON6CEde4USED0qbkz67+S+ArXi4zIe9uLgRYfccb8WXT8lwsCiNB0fFYW91Ex5Wq4iDEbrP7cNlLr5qq7z5OjaNDfMkmuM4ersU5cOtxE3yN3+Z1+Vfmm+uzLJ3sec2VzwMZ/iqfLLxd2yF+ESnwxMXtTnPi9jwWa3S7Ss7e20X/+4rc/P7ywf5SZ+6feqtNr1KLs3+82+voqx9nz9YmXSRBzXl5Nwq8rEiL5KtstzHqE3b1a3gdmuoNqBGfDuLk+SsEyraZwC9oV4GxoE+HY4SfToMJGhQOhlYu1qa/+2t76blQYekMp2KOzWmm7MUVyEn8faL0OPBr0V2PDgqDpa5kBwfq+aJQyJ4n3pwY1rOCLG8clfysWlslCexbGXkTfBa3E3jK6f523sxk/+u7z44BnzspMBM3L/Nl0DSSE7vkrvY81Q8yoN2/vAmn2IHnJZXuc80TYeL77zwqQrfPt1L8T62UHu2fF9/Tq8+uNPcjKqzAgeCjX7LpMc82P4hvpkfy3Q+nPxSRm3brq5EtFuDtAF1mrazODmx7XNXkuPyJQnYo14GxoE+HY4UfToMqX5QWlZO1+Zb+uJpJ3Y7s230YJysKcWH0kk5E/ebTNjdk1gkv5cncTlwjnPZjAZx2F9IC/H0pI8eyrd0R8w+tw/XZnBDhk3zQW7mc6VBzNg0NiqXSGqQJq2MCukw2+Y+OVq8ya14l2TFUnwuxnP1Qefd4p24nehfKaqxto1kLs1qs+nOUOVVH34prnwN/exebLKfSc9j+RlbEzdIR2LxlNnvPh/Xd9fuSjgifPt0z5Iw7oH2A5gtxCKJ0CfxpbKBWonPKt02fJTy+W0vce9A8KBlMkQeSKVzPnONqwkZXw/E8blke74VxVN/3Jq3XV2IareGaANqRMUXJy22fQbQD+plYBzo0+FY0afD0GoHpe1dd7P7jXjMjtFObsVHM1iRG7SZP8oT9rkwCDcXj7Zy+/aHe9AlsRIf9ChebtmM6DjIn/74psPvdo/lu50rueMQt8/MHbKbQliZPzor8oOYsWmMz5NYK3FjaqOqNE9unx3lHcbeZVwsu4f3yaha/u7itLHWg0a5NCsy3c+yokx/L8Mnu6kMbwacght6eR7binj5WeaQFpUOj8ntR6GLbS2+b5JfVfKG7yTdb8S7ZOeZwfeDeineJiP/a/GpYkR2+/Bexlheue/eyk+0Z8tVrL+LgCLpuUwOkwdKco2n5/370525btV2dSGu3eq/DajTpp3FSYltnwH0hHoZGAf6dDhS9OlwADWD0rqCUiflm1flUcfJqzd6oCJk0Gb6UoetsvqcDKjM7t9mKsMmcZiI2+edeG4yUuqMgxKzz434rq5l8ZN44Qg+f60HOZbpqHRsGjssFx+TDzIjxMcm+RhCVmp6nC0zEOe7S9rcve6869jBhp/df6wIPxdvbUNfus3ZY/JClmpBRDr8JuJFacdV3OG7Svf09p0eJB3LIOT8dRIf/93b9evANzZ7Kabmx2r9lslB8yDtFA9zx/CohLRdil0H0HG3e3L3ifxb9RxPTBvTQRswaHw9TByS48hOsHpkNImT3LLL4Nj4JJvvaYJgjvXTXfvsKm7Z/ZSOXbFkjy2fzOZcGsiEc/0teRRY/q26HPds+HQLzOvY9lmLK4ckfdk8kYmy8dXz5/pxUv13x2OfkfnpKvf25x5Qw56njnONelnqKm7Z/ZxovYxDo09H3ZFhyyezjbXuoE+HQ6gZlK4eXJW1pHiT1JLfxB91pbr5rk/wn17Ias9tpZ87L1TIHcYhgDsOTXniVBrkiE1j/3mi80HVR/0+fp8O0JvZX5v/xbuLNzrBpSVVfGz4n5wZtJc29KF3Qdq1dwsDlaHp8Nt3SF4GjYC6w3eXbjtIOpZByLnQWexYJkUxkwDlyaSmtuLhWt+1EH4N9F8mw+ZBXvS1cioC2q6EfQpmfSeusx0j2SFKOliLpw7vKuigDRg0vjU+y05j8sjonlpD8fLhIenkmod2NBnfadOOZNI5vdITrllV++wqbmo/pWMvxZXjS0zypSi3Y62/dSU978BQ6QlY6z62fW5UDp+uK95tUa1RfjrKPYlf6LdBoAnq5b2qfVIv19bLOCb06RpdP9QdHvTpShzlnsSPPt1oVA9Kewbg4tmlDKpOcLsW6huRGw/uLA4hPHGINhUvk8ZjLe6uyxeHfUQnHdyJTWPveRI7QNrC/K1e8kCtlbsyyxyUZua6GbBtTc2wmQpt9uZVfoAqKB1+6RrkgeeeO3y36Z6M7G5p9zIpWvvJJNWRkI1cuqkX3nkeW/IYokz6zYMa9ikB150aSUcnm39qO4WXVIS0XXvzR70My35d8ZVZBmkhnrr8NtBRGzBYfGssl/KYmXXJ9+uz3yWd3HQ9u3Rtxbq11avItJnj6G2zr7sd++wqbsX9pMeVe8m9VNZ+gZR7U/VPGs90/4UvnF1In+xxrZNft4xT0zourhzWaxnBbP7J81MvH2bX/8/mV2YZnob5mZRXNo7nsIQRRoF6WW3Uy+3qZRwV+nTUHV2iT6d+yknKKxtHG54+3WjUv+iwC5mLw1sn2mUzioN9Q+osDhNxq99+l1wcxcEafTGNmX/GNpmdKqSn3eCTzau1uLtSA76ykindXVwzg+wVED5moM3OsMlKtLykSUg6MtRL4zL71rOZsrL0vRguKnzLdKfserojuVva3ilQbOC28ZMAYWS61aNDvsb7EGUyeB6cuZC2Kyf/hIFd47uvu9fbG0l8Vcc0c92kE2KS+oKQ5n1mGZmQtfdLknXDi2slTsQrfVG599lV3NSXg1zdINuMj7pTvP70JZ1kSp9Seiqsby73/6x76rnw7dmJF1l3FU7ydJ38yqcjGrTPHZRDqMb5mXxZysRRhtfduobnHhCMejm2PqBeBhTqDnUNU3e0qTvo0+Ew+h+UVneXBszS6ZOsx7v8AnQah+QCNS8vy5H5YGdn6h4HPxh7p3fz5T+i2LuMFeegWtP4BISPnJ1WDVa+EcqoTUcVNeNXrNCrVIXvMN02Tcur4DWs+rNv4LIv+7NrXwU/ZuQkr0s7e1qaRb0SznWqSoYokz7zoIWksS/kX8MXoI5GYNtVlHb65HmTTFTIvOltXf4OjCG+5YlgW+f710f/1rhxkh32y/1kktr0hJJbr3ErTUSZp7V8+zbryldPJsayX0CKT4uoTT0xIv9Uebym7XNcOTTrL7XIT8fxpjqhQO+ol6mX29XLOFfUHdQd9Okc6aNPN3phg9K1F4tnNiVd7qBmwM3e5Ve1dEHTOIQKiUO0uXgsDdTIfDBrlM6Kz0XEprHvPJGxLM4ezR/z6TGTUi3ZgTZHnrQSMPtVtV6sY6CtemwqIh1qhtXuN8lEdVduxR3nUeFbpjvH3gEum7de3/ocxs5o71/2txIfkkbP35lorG7W9UBlMmgeZHX0eOFRCG27nPbXjNLruvydtAEDxvfQVLnaTvko2M5/gfca84Q/NkOXw6nnJ04Q9fLhnGm9jMOjTxeHumMc6NOhA9WD0nbGxzdbsv0iPvlOQHWCpl/qq++Ys3f5lWevpDZxiFAZh47ZRw/SF5/FprH3PNkPro5hIFLF54WeeszdHepnw8scqpnm2+qFk2T95q7eBjF/NOs86cetannD95TudL3sOxESPafKjpad1Q1ReNmfXXKnr0fT7KxrnUHLZOA8MIasIw8qou1ys2v4acurHl5I1GkbMEB8R2Gbvrx0dr/ZTyjJza4pODxP3eetL2PqykiOSdj9VjUxE9s+H6AcDpGfQCvUy9TLUuN6GUeFPl0D1B2V6NPhyNTcKW0HP9wnph2kEIvXhZNbVohm/d3Smi8lW/ElqWkX4p0zYNM4xKiLQ4e25o7s3F2NsWnsP0/SNZb6WIC/gblOsIyOfXlDtX14ezepgyyL62Ra77DLxihpfi8/B3UefOH7SfckXSdr+f6D+K5/GcjOWhZe/JBlBlX9M595No3L9zfiRj/e0F/52buDAwxZJoPmgTKia6VfMW2Xm13DTy31oztkfbyQqLs2YJj4joHtrA7Qzocq1X37+jKZcCqy4R3lum68KJ45pudlNCH2dVxI+zxkOTTPT+CQqJcP6ETqZRwT+nTxqDvc6NPRpztOtct3eE/M1Y1ZK2ZWeKGb/FJ/cZWcFKpCrF2K087+VZxA8XGIFBCHaKtVeQBKxte+LK94V2NsGnvPExk7/bIEdYypuLhwzbTaN7QOYP5olgrxLJGwVY+OXOzXPU7Xd1ZrKjnCZ8oifv3nPtgOScXgbY4nfF/pti8EWC/FMvlwqP1jZOo8Kq3NrOJjZvSDHzFL79w2cemr/NQ5Za/XoLuDByyTofJA2j5cjuxa6Utk2+ViB+9n90JVv/uJiu7f7txJGzBgfA/P3ZlV57fOr54tr8TFZfbJo/3dTPv6JfOU0lWhrlD1ka0rs+v0TF/Kkpbk/rPfO9VLicPStV+n/m5abufVfmrX1I9qn/sqB9eX+Qb5CRwa9XIH9UGgU66XcVTo08Wi7nCjT0ef7kj9/c+/O7v9+tvvu7LN7n4mdjKoc5vdb0w4TZ7EznDZLfuZzf0s+d3iyfzCKS4OdeHV1nUc1Obap3NzHqjbNJbD+/1n+6f5qawyHek22+UP97STdZkjnN5ccbPHqY539X7Vls/a+vCy4ZY5WWQ+5/xbtdp0bO53sjp1nwP2b2IhY2DEhk/0lO70eGrzHbP4e622XnBeE/74ZM/L8kftteGOS16DvBpJmTTLA0855crWs1Wm17eFlMHwXHVebNtVZvO8UB8+LfTnfddVqrpOV1v++G3bgKHj62COVQ5n910+f5x1rHc/edlrxrXlTvGO4+bdSvlck6+O69B37s5mOj716ao+Zl2+avV1nI1Hk3JwtxFGKY+z53RkflYcz8a7KipAjHJbZM9X6mW7ueqDruLm3U6mXsYQ3N+jY6/FtuVtP0/dYTfqDvdWl68afToMK+BFhxNx++xeF0YWongu3DYX9ybL/bIZ1ZMacXGIExqHOOnsZM5MyItK7Jy34MWmsc882ZvcPifrAskK0klWbPLvzR5zj6dfHOlKs83bfNbWh989j+gFEJNXQk8A5mcbvbzhe0r35FZ8dO6zXvKCzI1eAiSv6prwm7x6Y/bV78v91LUUlVcDlkmneZCuZ+dg1yVrdOvw8Wj7Fubtw7V+yUfxbnJ7x0HnSyG1awOGj+/hqfaslF/qhaW+Bq5L6jjFOlD9rnTdV5er6zpU9Ws+CbpOeX7nvaoL9DFd2RDenwhvnzsvh/SuHiv7Mqj4/AQOhXrZoF6WuqiXcTyqzzH6dGXUHT5d1B306TCsC3WHtPlZfP36Vfxy9bP53wDUrfbqsXB14h7qJBpDHA5s8+dfYvrjD+Z/AHDaqPMwGLtE0Rn3MQC40RYdCPUyOsR1fEaoO4BeBNwp3Z/VB71O6SHXfhlDHAAAAAAAAADgXBxwUHolPqv1yM1i/IcxhjgAAAAAAAAAwPk44KC0Xqsmdh3Vbo0hDgAAAAAAAABwPg66fAcAAMDJmj8mLwtm7UEAGAnqZQBNUHcAvWBQGgAAAAAAAAAwGAalAQAAAAAAAACDufj1t9935ufEyxc/mp8AAAAAAAAAAOjWxd///JsOSn/9+lX8cvWz+R/OxebPv8T0xx/M/wDgtFHnAQAOjbYIOH5cxwDQDst3AAAAAAAAAAAGw6A0AAAAAAAAAGAwDEoDAAAAAAAAAAbDoDQAAAAAAAAAYDAMSgMAAAAAAAAABsOgNAAAAAAAAABgMOMclN4+iMuLC3FxszK/OIAxxAEAAAAAAAAATswoB6W3Xz6Jtfx38Xquf3EAY4gDAACosboRFxcX4vJha34BL/IKwBCoa8KRV8Ae10M48gonInxQ2pz02S3kAljdhIfVtuLLp2Q4WJTGg8cQByN0n9uHy1x81VZ583VsGhvmSTTHcfR2KcqHW4mb5G838ie3uvxL882VWfYu9tzmiofhDF+VTzb+jq0Qn+h0eOKiNud5ERs+q1W6fWW3FQ+Xrr/7ytz8/vJBftKnbp96q02vkkuz//zbqyhr3+cPViZd5EFNOTm3inysyItkqyz3cYtvN7oVfPyh2oAah84vjISzTqhonwH0hnoZGAf6dDhK9OkwkKBB6WRg7Wpp/re3vpv6Bx3MSez4WLXtF6HHg1+L7HjwGOKQCN6nHmib3qkd5S2v3JV8bBob5UksWxl5E7wWd9P4ymn+9l7M5L/ruw+OAS87KTAT92/zJZA0ktO75C72PBWP8qCdP7zJp6CBy4zlVe4zTdPh4jsvfKrCt0/3UrwfWYuzfF9/Tq8+uNPczFJcyXM/aCDY6LdMesyD7R/im/mxTOfD2Sxl1LTd6ErE8QdpA+ocOr8wGrHtc1eS4/IlCdijXgbGgT4djhR9OgypflBaVk7XZmB18bQTu53ZNnowTtaU4kPhpNyfxAvx9LQwvw3jXDZjDHGQYva5fbgWOsoyrI2v2sznSoOYsWlskCfR1GxtWhkV0mG2zX1ytHiTW/EuyYql+FyM5+qDzrvFO3E70b9SVGNtG8lcmtVm052hyqs+/FJc+Rr62b3YZD+ze5K5oMjP2Jq4QToSi6fMfvf5uL67dlfCEeHbp3uWhHEPtB/AbCEWSYQ+iS+VDdRKfFbptuGjlM9ve4l7B4IHLZMh8kAqnfOZa1xNyPh6II7PJdvzrSie+mPWpt3oQtTxh2gDahw6vzAese0zgH5QLwPjQJ8Ox4o+HYZWOyht77qb3W/EY3aMdnIrPprBivygzVb88U2H3+0ey3caV1qJD3oUL7dsxhjiELfPzB2ym0LY+aMZ7MoPYsamMT5PYq3EjamNqtI8uX2Wf3suD7oGsHcZF8vu4X0yqpa/uzhtrFWe7vJpVmS6n2VFmf5ehk92UxneDDIHN/Rz8Wgr4uVnmUNaVDo8JrcfhS62tfi+SX5VyRu+k3S/Ee+SnWcG3w/qpXibjPyvxaeKEdntw3sZY3nlvnsrP9GeLVex/i4CiqTnMjlMHijJNZ6e9+9PeOa6TbvRhbjj998G1Dl0fmE0YttnAD2hXgbGgT4djhR9OhxAzaC0rqDUSfnmVXnUcfLqjR6oyA3aTMTt8048NxmlXH1OBlRm928zleEY4qDE7HMjvqtrWfwkXjiCz18nw09imY5Kx6axSZ5EMvkgM0J8bJKPIWSlpsfZMgNxvrukzd3rzruOHWz42f3HivBz8dY29KXbnD0mL2SpFkSkw28iXpR2XMUdvqt0T2/f6UHSsQxCzl8n8fHfvV2/Dnxjs5dian6s1m+ZHDQP0k7xWtyFzeAcoRbthmLXAXTc7Z7cfSL/Vj3HE3P8DtqAQePrYeKQHEd2gtUjo0mc5JZdBsfGJ9l8TxMEc6yf7tpnV3HL7qd07Iole2z5ZDbn0kAmnOtvyaPA8m/V5bhnw6dbYF7Hts9aXDkk6cvmiUyUja+eP9ePk+q/Ox77jMxPV7m3P/eAGvY8dZxr1MtSV3HL7udE62UcGn066o4MWz6Zbax1B306HELNoHT14KqsJcWbpJb8Jv7ooFRX+rnzQoU8hjg05YnT9KVuXFKxaew/T3Q+qPqo38fv0wF6M/tr8794d/FGJ7i0pIqPDf+TM4P20ob+2x9hFZNde7cwUBmaDr99h+Rl0AioO3x36baDpGMZhJwLncWOZVIUMwlQnkxqaiservVdC+HXQP9lMmwe5EVfK+fGPgWzvhPX2Y6R7BAlHazFU4d3FXTQBgwa3xqfZacxeWR0T62hePnwkHRyzUM7mozvtGlHMumcXukJ16yqfXYVN7Wf0rGX4srxJSb5UpTbsdbfupKed2Co9ASsdR/bPjcqh0/XFe+2qNYoPx3lnsQv9Nsg0AT18l7VPqmXa+tlHBP6dI2uH+oOD/p0JY5yT+JHn240qgelPQNw/bBrob4RufHgMcQh2lS8TBqPtbi7Ll8c9hGddHAnNo2950nsAGkL87d6yQO1Vu7KLHNQmpnrZsC2NTXDZiq02ZtX+YHKoHT4pWuQB5577vDdpnsysrul3cukaO0nk1RHQjZy6TaV+et5bMljiDLpNw9q2KcEXHdqJB2dbP6p7fxeUjF/1Muw7NcVX5llkBbiqctvAx21AYPFt8ZyKY+ZWZd8vz77XdLJTdezS9dWrFtbvYpMmzmO3jb7utuxz67iVtxPely5l9xLZe0XSLk3Vf+k8Uz3X/jC2YX0yR7XOvl1yzg1rePiymG9lhHM5p88P/XyYXb9/2x+ZZYUa5ifSXll43gWSxhhDKiX1Ua93K5exlGhT0fd0SX6dOqnnKS8snG04enTjUb9iw6HYpfNKA72DamzOEzErX77XXJxFAdr9MU0Zv4Z22R2qpCedoNPNq/W4u5KDfjKSqZ0d3HNDLJXQPiYgTY7wyYr0fKSJiHpyFAvjcvsW89mysrS92K4qPAt052ai0c97T6Ou6XtnQLFBm4bPwkQRqZbPTrka7wPUSaD5wHi5J8wsGt893X3ensjia/qmGaum3RCTFJfENLvUpllZELW3i+ZP8rOaHGtxIl4pS8q9z67ipv6cpCrG2Sb8VF3itefvqSTTOlTSk+FdzXI/T/rnnoufHv2/Qey7ip8aU3Xya98OqJB+9xBOYRqnJ/Jl6VMHGV43a1reO4BwaiXY+sD6mVAoe5Q1zB1R5u6gz4dDmM0g9L6JOvxLr8AncYhuUDNy8tyZCVhZ2d+ehF9MQ7D3undfPmPKPYuY8U5qNY0PgHhI2enVYOVb4QyatNRRc34FSv0KlXhO0y3TdPyKngNq/7sG7jsy/7s2lfBjxk5yevSzp6WZlGvhHOdqpIhyqTPPGghaewL+dfwBajHLu30yfMmmaiQedPbuvwdGEN8yxPBts73r4/+rXHjpB9rtJNJatMTSm69xq00EWWe1vLt26wrXz2ZGMt+ASk+LaI29cSI/FPl8Zq2z3Hl0Ky/1CI/Hceb6oQCvaNepl5uVy/jXFF3UHfQp3Okjz7d6IUNStdeLBGzKS72Lr+qpQvGEIdoc/FYGqh5FPPN92QAaVZ8LiI2jX3niYxlcfZo/phPj5mUaskOtDnypJWA2S9TFs7K0THQVph0LIhIR/aRmiQT1V25FXecR4Vvme4cewe4bN56fetzGDujvX/Z30p8SBo9f2eisbpZ1wOVyaB5kNXR44Wnb3/NKL2uy99JGzBgfA9NLcFkO+WjYDv/Bd5rzBP+2AxdDqeenzhB1MuHc6b1Mg6PPl0c6o5xoE+HDlQPStsZH99syfaL+NTBCWjv8ivPXkljiEPH7KMH6YvPYtPYe57sB1fHMBCp4vNCTz3m7g71s+FlDtVM8231wkmyfnNXb4OYP5p1nvTjVrW84XtKd7pe9p0IiZ5TZUfLzuqGKLzszy6509ejaXbWtc6gZTJwHhhD1pHHza7hpy2venghUadtwADxHYVt+vLS2f1mP6EkN7um4PA8dZ+3voypKyM5JmH3W9VTPLHt8wHK4RD5CbRCvUy9LDWul3FU6NM1QN1RiT4djkzNndJ28MN9YtpBCrF43aJh3IovSU27EO+cj5eMIQ4d2po7snN3Ncamsf88SddY6mMB/gbmOsEyOvblDdX24e3dpA6yLK6Tab3DLhujpPm9/BzUefCF7yfdk3SdrOX7D+K7/mUgO2tZePFDlhlU9c985tk0Lt/fiBv9eEN/5WfvDg4wZJkMmgfKiK6VsbNr+KmlfnSHrI8XEnXXBgwT3zGwndUB2vlQpbpvX18mE05FNryjXNeNF8Uzx/S8jCbEvo4LaZ+HLIfm+QkcEvXyAZ1IvYxjQp8uHnWHG306+nTHqXb5Du+Juboxa8XUvNCtjp39qziBxhCHaKtVeQBKxte+LK94V2NsGnvPExk7/bIEdYypuLhwzbTaN7QOYP5olgrxLJGwVY+OXOzXPU7Xd1ZrKjnCZ8oifv3nPtgOScXgbY4nfF/pti8EWC/FMvlwqP1jZOo8Kq3NrOJjZvSDHzFL79w2cemr/NQ5Za/XoLuDByyTofJA2j5cjuxaGTE7eD+7F6r63U9UdP92507agAHje3juzqw6v3V+9Wx5JS4us08e7e9m2tcvmaeUrgp1haqPbF2ZXadn+lKWtCT3n/3eqV5KHJau/Tr1d9NyO6/2U7umflT73Fc5uL7MN8hP4NColzuoDwKdcr2Mo0KfLhZ1hxt9Ovp0R+rvf/7d2e3X337flW129zOxk0Gd2+x+Y8JZ1eHVlv3M5n6W/G7xZH7hNP44qM21T+fmPFC3aSyH9/vP9k/zU1llOtJttssf7mkn6zJHOL254maPUx3v6v2qLZ+19eFlwy1zssh8zvm3arXp2NzvZHXqPgfs38RCxsCIDZ/oKd3p8dTmO2bx95ps3PbHdm3Oa8Ifn+x5Wf6ovTbccclrkFcjKZNmeeApp1zZerbK9Pq2kDIYnrvOi6vjy+znC/Xh00J/3nddpWKPXx2+Oq7K0PF1MMcqh7P7Lp8/zjrWu5+87DXj2nKneMdx826lfK7JV8d16KtfZzMdn/p0VR+zLl+1+jrOxqNJObjbCKOUx9lzOjI/K45n410VFSBGuS2y5yv1st1c9UFXcfNuJ1MvYwjd9Cnblrf9PHWH3ag73Ftdvmr06TCsgBcdTsTts3tdGFmI4rnVbXP7ZTOqJzXGEIc46exkzkzIi0rsnG/Li01jn3myN7l9TtYF0jNmZbJik39/HujuSf3iSFeabd7ms7Y+/O55RC+AmLwSegIwP9vo5Q3fU7ont+Kjc5/1khdkbvQSIHlV14Tf5NUbs69+X+6nrqWovBqwTDrNg3Q9Owe7LllkGZ2b7cO1fslH8W5ye8dB50shtWsDho/v4an2rJRf6oWlvgauS+o4xTpQ/a503VeXq+s6VPVrPgm6Tnl+572qC/QxXdkQ3p8Ib587L4f0rh4r+zKo+PwEDoV62aBelrqol3E8qs8x+nRl1B0+XdQd9OkwrAt1h7T5WXz9+lX8cvWz+d8A1K326rFwdeIe6iQaQxwObPPnX2L64w/mfwBw2qjzMBi7RNEZ9zEAuNEWHQj1MjrEdXxGqDuAXgTcKd2f1Qe9Tukh134ZQxwAAAAAAAAA4FwccFB6JT6r9cjNYvyHMYY4AAAAAAAAAMD5OOCgtF6rJnYd1W6NIQ4AAAAAAAAAcD4OunwHAADAyZo/Ji8LZu1BABgJ6mUATVB3AL1gUBoAAAAAAAAAMBgGpQEAAAAAAAAAg7n49bffd+bnxMsXP5qfAAAAAAAAAADo1sXf//ybDkp//fpV/HL1s/kfzsXmz7/E9McfzP8A4LRR5wEADo22CDh+XMcA0A7LdwAAAAAAAAAABsOgNAAAAAAAAABgMAxKAwAAAAAAAAAGw6A0AAAAAAAAAGAwDEoDAAAAAAAAAAbDoDQAAAAAAAAAYDDjHJTePojLiwtxcbMyvziAMcQBAAAAAAAAAE7MKAelt18+ibX8d/F6rn9xAGOIAwAAo7e6ERcXF+LyYWt+AS/yCsA5oK4LR14Be1wP4cgrnIjoQenVzUXYyW8ukuwWdsFsxZdPyXCwKI0HN9xncJxTFXEwQve5fbjMxVdtlTdfx6axcT5HchxHb5eifLiVuEn+diN/cqvLvzTfXJll72LPba54GM7wVflk4+/YCvGJTocnLmpznhex4bNapdtXdlvxcOn6u6/Mze8vH+Qnfer2qbfa9Cq5NPvPv72KsvZ9/mBl0kUe1JSTc6vIx4q8SLbKch+3/tu6bsW3cwCAU0a7AIwDfUocJef3vIoxF6Ch8EFpc1JeLc3/KyQDcY6A67tp/SDF9ovQ48GvRXY8uNE+I+Kc44lDInifeqBteqd2lLe8clfysWlslc+hbGXkTfBa3E3jK6f523sxk/+u7z44BrzspMBM3L/Nl0DSSE7vkrvY81Q8yoN2/vAmn4IGLjOWV7nPNE2Hi++88KkK3z7dS/F+ZC3O8n39Ob364E5zM0txJc/9oIFgo98y6TEPtn+Ib+bHMp0PZ7OU0VBtXVeatnMAgNNEuwCMA31KHKnYMZeuJMdl4PvsBA1K70/KhXh6WpjfesjK7NoMxC6edmK3M9tGD97JmlV8qDiJnctmNNhnVJwLfEt3xOxz+3AtdJRlWBtftZnPlQYxY9PYMp+DqNnatDIqpMNsm/vkaPEmt+JdkhVL8bkYz9UHnXeLd+J2on+lqMbaNpK5NKvNpjtDlVd9+KW48jX0s3uxyX5m9yRzQZGfsTVxg3QkFk+Z/e7zcX137a6EI8K3T/csCeMeaD+A2UIskgh9El8qG6iV+KzSbcNHKZ/f9hL3DgQPWiZD5IFUOucz17iakPH1QByfS7bnW1E89ccsqt0Yog6uERVfAMDJo10AxoE+JY5V7JgL0FbAoPRW/PFNjTls5In4WL5zuMDepafCP2YDT27FRzO44b/bbyU+6FG83LIZ8fuMi3OeOw5x+8zcIbsphJ0/msGu/CBmbBrb5XOIlbgxtVFVmie3z/Jvz+VB1wD2LuNi2T28T0bV8ncXp421ytNdPs2KTPezrCjT38vwyW4qw5tB5uCGfi4ebUW8/CxzSItKh8fk9qPQxbYW3zfJryp5w3eS7jfiXbLzzOD7Qb0Ub5OR/7X4VDEiu314L2Msr9x3b+Un2rPlKtbfRUCR9Fwmh8kDJbnG0/P+/QnPXA/Z1nWhTTsHADg9tAvAONCnxJGKHXMBOhAwKD0Rt8878Rw06qgrNHUSv3lVDj959aZ6kGf1ORlQmd2/zVSGTfYZE+cCZxyUmH1uxHd1LYufxAtH8PnrZPhJLNNR6dg0tsznECYfZEaIj03yMYSs1PQ4W2YgzneXtLl73XnXsYMNP7v/WBF+Lt7ahr50m7PH5IUs1YKIdPhNxIvSjqu4w3eV7untOz1IOpZByPnrJD7+u7fr14FvbPZSTM2P1fotk4PmQdopXou7sBmcIzRgW6fYdQMdd8cnd6vIv1XPCbVo5ywTh+Q4shOqHtm0a8Zll6Gx8Um21o+QOtYvd+2zq7hl91M6dsWSObZ8MptzaR4TzvW35FFc+bfQuT0bPt1a5zWAo2LrHdoF2gWDduFY0aek7siw5ZPZxlp3xI65aHHlkKQvmycyUTa++p5IvUSI/rtjKY/I/HSVe/tzD12KftFhterBWFmrijdJrfpN/OE6b/Rz54UKud0+Y7nj0JQnTtOXunFJxaax/zzR+aDqo34fv08H6M3sr83/4t3FG53g0pIqPjb8T84M2ksb+m9/hFVMdu3dwkBlaDr89h2Sl0EjoO7w3aXbDpKOZRByLnQWO5ZJUcwkQHkyqamteLjWdy2EXwP9l8mweZAXfa2ctA7qYPvUzPpOXGc7UrIDlXTIFk/D3YXwWXbakkc299QahpcPD0kn0z7Cl5DxnTbtyCWdwys94ZlVtc+u4qb2Uzr2Ulw5vkQkX0pyO9b6W9fR8w4KlZ6AteYBnAjahT3aBdqFs0GfstH1Q93h0a7uiB1zaVQOn66deRKiUX46yj2JX+gIP3rX7aC0Z8AujF0L9Y3IjQe32mcsTxyiTcXLpPFYi7vr8sVhH9FJB3di09h7nsQOkLYwf6uXPFBr5a7MMgelmbluBmxbUzNspkKbvXmVH6gMSodfugZ54LnnDt9tuicju1vavUyK1n4ySXUkZCOXblOZv57HljyGKJN+86CGfUrAdadG0tHJ5p/aTvglFR3VwfNHvWzLfh3ylVk2aSGeBnwubrmUx8ysC75fH/0u6WSm68mlaxvWrW1eRabNHEdvm33d6dhnV3Er7ic9rtxL7qWu9guc3Ju6/tN4pvsvfOHrQvpkjWud+rEsowRgCLQLaqNdoF04I/QpqTu61KruaPq9Na4c1msZwWz+yfNTLwlr3+mUza/MMrEN8zMpr2wcbfiTXpbyuHR8p3QLdtmM4mDfkDqLw0Tc6rffJRdHcbBGX0xj5p+xzT3Wkm5tBp9sXq3F3ZUa8JWVTOnu4poZZK+A8DEDbXaGTVai5SVNQtKRoV4al9m3ns2UlaXvxXBR4VumOzUXj3rafRx3S9s7BYoN3DZ+EiCMTLd6dMjXeB+iTAbPA/Qr/0SCXRO8r7vdvVTHMHPephNSkuqgp99lMsu4hKx9XzJ/lJ3B4lqFE/FKn9TufXYVN9U5z12bss7+qDul609f0kme9Cmhp8K7EuT+n3VPORe+Pfv+AVl3FL40puvU83QCcEZoF1T9TLtAu4BY1B3qGqbuaFN3NBhz6aAcQjXOT3W8bBxleD1U1/DcQ+dGMyjd+11+ATqNQ3KBmpeX5chKws7O/PQi+mIchr3Tu/nyH1HsXcaKc1CtaXwCwkfOTqsGK98IZdSmo4qa8StW6FWqwneYbpum5VXwGlb92Tdw2Zf92bWvgh8zcpLXpZ09Lc2iXgnnOlUlQ5RJn3nQQtLYF/Kv4QtQz03aSZTnWTKxIfOyt3X8PcoTsbbO9a9P/q1x46AfK7STOWorPWKY0WvcShNB5mkp377Nuu7Vk3mx7BeA4tMaalNPbMg/dXo8AGNHu0C7QLuAJqg7qDva1R02P2LHXOLKodkYWIv8dBxvqhOKkehnULr24irMvti7/KqWLojdZ6yQOESbi8fSQM2jmG++JwNIs+JzEbFp7DtPZCyLs0fzx3x6zKRUS3agzZEnrQTMfpmycFaOjoG2wqRjQUQ6so/UJJmo7sqtuOM8KnzLdOfYO8Bl89brW5/D2Bnt/cv+VuJD0uj5OxON1c26HqhMBs2DrI4eLzwpndTB+2tM6Xsd/4NSSyDZTvEo2M53gfcc94QHgE7RLhwO7QIOhD5lHOqOcRi6HKiLT1K3g9J2hsg3u7L9Ij45Tlh7l1959kpquM9YlXHomH30IH3xWWwae8+T/eDqGAYiVXxe6KnH3N2hfja8zKGaab6tXjhJ1m8HHGabP5p1nvTjVrW84XtKd7pe9p0IiZ5TZUfLzuqGKLzszy6509ejaXbWtc6gZTJwHhhD1pGj12kdbNf805ZXp/oCo2368tDZ/WY/oSM3u6bf8Dx1j7e+iqmrIjmfNrBbzFM0AI4f7QLtgkS7cB7oUzZA3VGpcd0RO+ZygHI4RH6idx3fKW0HS9wnsh3UEIvXmYthK74kNe1CvHM+XtJkn7Hq4tAhe0d27q7G2DT2nyfpGkt9LMDfwFwnWEbHvryh2j68vZvUQZbFdTKtd9hlY5Q0v5efgzoPvvD9pHu/Ttby/QfxXf8ykJ21LLz4IcsMqvpnPvNsGpfvb8SNfryhv/KzdwcHGLJMBs0DZUTXyjh0VwfbNf/U0kC6A3eqLzCyncUB2tlQpbpnX18lEz5FNryjXNeNF6Uzx/S8DAbA+aFdOCDaBQyOPmU86g639nXH/ntryJjLkOXQPD8xfp0v3+E9kVc3Zm2Zwgvg7OxfxQkUvc9YAXGItlqVB6BkfO3L8op3Ncamsfc8kbHTL0tQx5iKiwvXTKt9Q+sA5o9mqRDPEglb9ejIxX7d43R9Z7WmkiN8pizi13/ug+2QVAze5njC95Vu+0KA9VIskw+H2j9Gps6j0trMKj5mRj/4EbP0zm0Tl77KT51T9noNujt4wDIZKg+k7cPlyK6VceikDraD/bN7oYLuJzZO8W3Q7s6kOr90fvVseSUuLrNP/uzvJtpf35mnhK4K16qqD2xdlV0nZ/pSlrQk95/93qdeChyWrv068XfTcjur9hO2pj2Ak0C7QLtAu3B26FPGou5w66DuiBpz6ascXBM0DfITx+Pvf/7d2e3X337flW129zOxk0G92+x+Y8Iq1eHzYWXo+1ny+8WT+YVT3D5j49xFHNTm2qdzcx6o2zSWw/v9Z/un+amsMh3pNtvlD/e0k3WZI5zeXHGzx6mOd/V+1ZbP2vrwsuGWOVlkPuf8W7XadGzud7I6dZ8D9m9iIWNgxIZP9JTu9Hhq8x2z+HtNNm77Y7s25zXhj0/2vCx/1F4b7rjkNcirkZRJszzwlFOubD1bZXp9W0gZDM9d58XV8XXh6+tg+/lC/fm00PvwXYep2Pg6mGOVw/nOH/kXVx3n3U9e9px1bblTrOO4ebdSPtfkq+M68NVvs5mOT326qo9Zl68AjlO5LbJ1Ae2C3WgX3FtdvmI49CmNjq/PuuNRd0jOdFUfsy5ftfrvrTYeTcrB+Z3SKuVx9pyOzM+K49l4V0UFw+nhRYcTcfvsXkdGFrp4zt1mt182o3pSI2afsULjECedncyZCXlRiZ3zbXmxaewzT/Ymt8/JukB6xqxMVmzy788D3T2pXxzpSrPN23zW1offPY/oBRCTV0JPAHoeSynyhu8p3ZNb8dG5z3rJCzI3egmQvKprwm/y6o3ZV78v91PXUlReDVgmneZBup6dg12XLLKMTl+7Onj7cK1fClK8+9zeoTCSpZO6pNqTUn6pF4b6GpguqeMU6yD1u9J1V12urutA1W/5JOhr+vmd96oq0Md0ZUOX7TmAcaNdMGgXJNqF80KfMhZ1h08XdUf4mEvn5ZDeqW1lX/AZn584DhfqDmnzs/j69av45epn878BqFvt1WPh6sQ91Ek0hjgc2ObPv8T0xx/M/wDgtFHnnRG7RNAZt/EAxom26EBoF9AhruMzQt0B9KKHO6XDrT7odUoPufbLGOIAAAAAAAAAAOfigIPSK/FZrUduFuM/jDHEAQAAAAAAAADOxwEHpfVaNbHrqHZrDHEAAAAAAAAAgPNx0OU7AAAAejN/TF7Wy9p/AIAE7QKAJqg7gF4wKA0AAAAAAAAAGAyD0gAAAAAAAACAwVz8+tvvO/Nz4uWLH81PAAAAAAAAAAB06+Lvf/5NB6W/fv0qfrn62fwP52Lz519i+uMP5n8AcNqo8wAAh0ZbBBw/rmMAaIflOwAAAAAAAAAAg2FQGgAAAAAAAAAwGAalAQAAAAAAAACDYVAaAAAAAAAAADAYBqUBAAAAAAAAAINhUBoAAAAAAAAAMJhxDkpvH8TlxYW4uFmZXxzAGOIAAAAAAAAAACdmlIPS2y+fxFr+u3g91784gDHEAQCA0VvdiIuLC3H5sDW/gBd5BeAcUNeFI6+APa6HcOQVTkT0oPTq5iLs5DcXSXYLu2C24sunZDhYlMaDG+4zOM6pijgYofvcPlzm4qu2ypuvY9PYOJ8jOY6jt0tRPtxK3CR/u5E/udXlX5pvrsyyd7HnNlc8DGf4qnyy8XdshfhEp8MTF7U5z4vY8Fmt0u0ru614uHT93Vfm5veXD/KTPnX71FttepVcmv3n315FWfs+f7Ay6SIPasrJuVXkY0VeJFtluY9b/21dt+LbOQDAKaNdAMaBPiWOkvN7XsWYC9BQ+KC0OSmvlub/FZKBOEfA9d20fpBi+0Xo8eDXIjse3GifEXHO8cQhEbxPPdA2vVM7ylteuSv52DS2yudQtjLyJngt7qbxldP87b2YyX/Xdx8cA152UmAm7t/mSyBpJKd3yV3seSoe5UE7f3iTT0EDlxnLq9xnmqbDxXde+FSFb5/upXg/shZn+b7+nF59cKe5maW4kud+0ECw0W+Z9JgH2z/EN/Njmc6Hs1nKaKi2ritN2zkAwGmiXQDGgT4ljlTsmEtXkuMy8H12ggal9yflQjw9LcxvPWRldm0GYhdPO7HbmW2jB+9kzSo+VJzEzmUzGuwzKs4FvqU7Yva5fbgWOsoyrI2v2sznSoOYsWlsmc9B1GxtWhkV0mG2zX1ytHiTW/EuyYql+FyM5+qDzrvFO3E70b9SVGNtG8lcmtVm052hyqs+/FJc+Rr62b3YZD+ze5K5oMjP2Jq4QToSi6fMfvf5uL67dlfCEeHbp3uWhHEPtB/AbCEWSYQ+iS+VDdRKfFbptuGjlM9ve4l7B4IHLZMh8kAqnfOZa1xNyPh6II7PJdvzrSie+mMW1W4MUQfXiIovAODk0S4A40CfEscqdswFaCtgUHor/vimxhw28kR8LN85XGDv0lPhH7OBJ7fioxnc8N/ttxIf9ChebtmM+H3GxTnPHYe4fWbukN0Uws4fzWBXfhAzNo3t8jnEStyY2qgqzZPbZ/m35/KgawB7l3Gx7B7eJ6Nq+buL08Za5ekun2ZFpvtZVpTp72X4ZDeV4c0gc3BDPxePtiJefpY5pEWlw2Ny+1HoYluL75vkV5W84TtJ9xvxLtl5ZvD9oF6Kt8nI/1p8qhiR3T68lzGWV+67t/IT7dlyFevvIqBIei6Tw+SBklzj6Xn//oRnrods67rQpp0DAJwe2gVgHOhT4kjFjrkAHQgYlJ6I2+edeA4addQVmjqJ37wqh5+8elM9yLP6nAyozO7fZirDJvuMiXOBMw5KzD434ru6lsVP4oUj+Px1MvwklumodGwaW+ZzCJMPMiPExyb5GEJWanqcLTMQ57tL2ty97rzr2MGGn91/rAg/F29tQ1+6zdlj8kKWakFEOvwm4kVpx1Xc4btK9/T2nR4kHcsg5Px1Eh//3dv168A3NnsppubHav2WyUHzIO0Ur8Vd2AzOERqwrVPsuoGOu+OTu1Xk36rnhFq0c5aJQ3Ic2QlVj2zaNeOyy9DY+CRb60dIHeuXu/bZVdyy+ykdu2LJHFs+mc25NI8J5/pb8iiu/Fvo3J4Nn26t8xrAUbH1Du0C7YJBu3Cs6FNSd2TY8slsY607YsdctLhySNKXzROZKBtffU+kXiJE/92xlEdkfrrKvf25hy5Fv+iwWvVgrKxVxZukVv0m/nCdN/q580KF3G6fsdxxaMoTp+lL3bikYtPYf57ofFD1Ub+P36cD9Gb21+Z/8e7ijU5waUkVHxv+J2cG7aUN/bc/wiomu/ZuYaAyNB1++w7Jy6ARUHf47tJtB0nHMgg5FzqLHcukKGYSoDyZ1NRWPFzruxbCr4H+y2TYPMiLvlZOWgd1sH1qZn0nrrMdKdmBSjpki6fh7kL4LDttySObe2oNw8uHh6STaR/hS8j4Tpt25JLO4ZWe8Myq2mdXcVP7KR17Ka4cXyKSLyW5HWv9revoeQeFSk/AWvMATgTtwh7tAu3C2aBP2ej6oe7waFd3xI65NCqHT9fOPAnRKD8d5Z7EL3SEH73rdlDaM2AXxq6F+kbkxoNb7TOWJw7RpuJl0nisxd11+eKwj+ikgzuxaew9T2IHSFuYv9VLHqi1cldmmYPSzFw3A7atqRk2U6HN3rzKD1QGpcMvXYM88Nxzh+823ZOR3S3tXiZFaz+ZpDoSspFLt6nMX89jSx5DlEm/eVDDPiXgulMj6ehk809tJ/ySio7q4PmjXrZlvw75yiybtBBPAz4Xt1zKY2bWBd+vj36XdDLT9eTStQ3r1javItNmjqO3zb7udOyzq7gV95MeV+4l91JX+wVO7k1d/2k80/0XvvB1IX2yxrVO/ViWUQIwBNoFtdEu0C6cEfqU1B1dalV3NP3eGlcO67WMYDb/5Pmpl4S173TK5ldmmdiG+ZmUVzaONvxJL0t5XDq+U7oFu2xGcbBvSJ3FYSJu9dvvkoujOFijL6Yx88/Y5h5rSbc2g082r9bi7koN+MpKpnR3cc0MsldA+JiBNjvDJivR8pImIenIUC+Ny+xbz2bKytL3Yrio8C3TnZqLRz3tPo67pe2dAsUGbhs/CRBGpls9OuRrvA9RJoPnAfqVfyLBrgne193uXqpjmDlv0wkpSXXQ0+8ymWVcQta+L5k/ys5gca3CiXilT2r3PruKm+qc565NWWd/1J3S9acv6SRP+pTQU+FdCXL/z7qnnAvfnn3/gKw7Cl8a03XqeToBOCO0C6p+pl2gXUAs6g51DVN3tKk7Goy5dFAOoRrnpzpeNo4yvB6qa3juoXOjGZTu/S6/AJ3GIblAzcvLcmQlYWdnfnoRfTEOw97p3Xz5jyj2LmPFOajWND4B4SNnp1WDlW+EMmrTUUXN+BUr9CpV4TtMt03T8ip4Dav+7Bu47Mv+7NpXwY8ZOcnr0s6elmZRr4RznaqSIcqkzzxoIWnsC/nX8AWo5ybtJMrzLJnYkHnZ2zr+HuWJWFvn+tcn/9a4cdCPFdrJHLWVHjHM6DVupYkg87SUb99mXffqybxY9gtA8WkNtaknNuSfOj0egLGjXaBdoF1AE9Qd1B3t6g6bH7FjLnHl0GwMrEV+Oo431QnFSPQzKF17cRVmX+xdflVLF8TuM1ZIHKLNxWNpoOZRzDffkwGkWfG5iNg09p0nMpbF2aP5Yz49ZlKqJTvQ5siTVgJmv0xZOCtHx0BbYdKxICId2UdqkkxUd+VW3HEeFb5lunPsHeCyeev1rc9h7Iz2/mV/K/EhafT8nYnG6mZdD1Qmg+ZBVkePF56UTurg/TWm9L2O/0GpJZBsp3gUbOe7wHuOe8IDQKdoFw6HdgEHQp8yDnXHOAxdDtTFJ6nbQWk7Q+SbXdl+EZ8cJ6y9y688eyU13Gesyjh0zD56kL74LDaNvefJfnB1DAORKj4v9NRj7u5QPxte5lDNNN9WL5wk67cDDrPNH806T/pxq1re8D2lO10v+06ERM+psqNlZ3VDFF72Z5fc6evRNDvrWmfQMhk4D4wh68jR67QOtmv+acurU32B0TZ9eejsfrOf0JGbXdNveJ66x1tfxdRVkZxPG9gt5ikaAMePdoF2QaJdOA/0KRug7qjUuO6IHXM5QDkcIj/Ru47vlLaDJe4T2Q5qiMXrzMWwFV+SmnYh3jkfL2myz1h1ceiQvSM7d1djbBr7z5N0jaU+FuBvYK4TLKNjX95QbR/e3k3qIMviOpnWO+yyMUqa38vPQZ0HX/h+0r1fJ2v5/oP4rn8ZyM5aFl78kGUGVf0zn3k2jcv3N+JGP97QX/nZu4MDDFkmg+aBMqJrZRy6q4Ptmn9qaSDdgTvVFxjZzuIA7WyoUt2zr6+SCZ8iG95RruvGi9KZY3peBgPg/NAuHBDtAgZHnzIedYdb+7pj/701ZMxlyHJonp8Yv86X7/CeyKsbs7ZM4QVwdvav4gSK3mesgDhEW63KA1AyvvZlecW7GmPT2HueyNjplyWoY0zFxYVrptW+oXUA80ezVIhniYStenTkYr/ucbq+s1pTyRE+Uxbx6z/3wXZIKgZvczzh+0q3fSHAeimWyYdD7R8jU+dRaW1mFR8zox/8iFl657aJS1/lp84pe70G3R08YJkMlQfS9uFyZNfKOHRSB9vB/tm9UEH3Exun+DZod2dSnV86v3q2vBIXl9knf/Z3E+2v78xTQleFa1XVB7auyq6TM30pS1qS+89+71MvBQ5L136d+LtpuZ1V+wlb0x7ASaBdoF2gXTg79CljUXe4dVB3RI259FUOrgmaBvmJ4/H3P//u7Pbrb7/vyja7+5nYyaDebXa/MWGV6vD5sDL0/Sz5/eLJ/MIpbp+xce4iDmpz7dO5OQ/UbRrL4f3+s/3T/FRWmY50m+3yh3vaybrMEU5vrrjZ41THu3q/astnbX142XDLnCwyn3P+rVptOjb3O1mdus8B+zexkDEwYsMnekp3ejy1+Y5Z/L0mG7f9sV2b85rwxyd7XpY/aq8Nd1zyGuTVSMqkWR54yilXtp6tMr2+LaQMhueu8+Lq+Lrw9XWw/Xyh/nxa6H34rsNUbHwdzLHK4Xznj/yLq47z7icve866ttwp1nHcvFspn2vy1XEd+Oq32UzHpz5d1cesy1cAx6ncFtm6gHbBbrQL7q0uXzEc+pRGx9dn3fGoOyRnuqqPWZevWv33VhuPJuXg/E5plfI4e05H5mfF8Wy8q6KC4fTwosOJuH12ryMjC108526z2y+bUT2pEbPPWKFxiJPOTubMhLyoxM75trzYNPaZJ3uT2+dkXSA9Y1YmKzb59+eB7p7UL450pdnmbT5r68Pvnkf0AojJK6EnAD2PpRR5w/eU7smt+OjcZ73kBZkbvQRIXtU14Td59cbsq9+X+6lrKSqvBiyTTvMgXc/Owa5LFllGp69dHbx9uNYvBSnefW7vUBjJ0kldUu1JKb/UC0N9DUyX1HGKdZD6Xem6qy5X13Wg6rd8EvQ1/fzOe1UV6GO6sqHL9hzAuNEuGLQLEu3CeaFPGYu6w6eLuiN8zKXzckjv1LayL/iMz08chwt1h7T5WXz9+lX8cvWz+d8A1K326rFwdeIe6iQaQxwObPPnX2L64w/mfwBw2qjzzohdIuiM23gA40RbdCC0C+gQ1/EZoe4AetHDndLhVh/0OqWHXPtlDHEAAAAAAAAAgHNxwEHplfis1iM3i/EfxhjiAAAAAAAAAADn44CD0nqtmth1VLs1hjgAAAAAAAAAwPk46PIdAAAAvZk/Ji/rZe0/AECCdgFAE9QdQC8YlAYAAAAAAAAADIZBaQAAAAAAAADAYC5+/e33nfk58fLFj+YnAAAAAAAAAAC6dfH3P/+mg9Jfv34Vv1z9bP6Hc7H58y8x/fEH8z8AOG3UeQCAQ6MtAo4f1zEAtMPyHQAAAAAAAACAwTAoDQAAAAAAAAAYDIPSAAAAAAAAAIDBMCgNAAAAAAAAABgMg9IAAAAAAAAAgMEwKA0AAAAAAAAAGAyD0gAAAAAAAACAwTAoDQAAAAAAAAAYDIPSAAAAAAAAAIDBMCgNAAAAAAAAABgMg9IAAAAAAAAAgMEwKA0AAAAAAAAAGAyD0gAAAAAAAACAwTAoDQAAAAAAAAAYDIPSAAAAAAAAAIDBMCgNAAAAAAAAABgMg9IAAAAAAAAAgMEwKA0AAAAAAAAAGAyD0gAAAAAAAACAgQjx/wNSEVcr1FIZMgAAAABJRU5ErkJggg==
    As you can (hopefully) see the quantity text column (renamed) contains numbers and text , I tried just delimiting the quantity_text column to give me the correct quantity that I can use in pivots etc but this came with its own issue in that if you look at the first row we have an issue of 2x10pack ampoules and if you then look at the fourth row we have an issue of 10xampoules. This represents the issuer issuing packs or single ampoules (occurs a lot).
    If I delimit this column I get:
    2
    1
    10
    10
    Which totals at 23 ampoules , when infact it is 50ampoules (the 2 and 1 are packs of 10)
    In Crystal syntax this is the solution, create a containers and a dose units field:

    The following two formulas convert the quantity field into doseunits or containers and net the value of any returns.

    Net quantity in containers (xdailyissues)

    NumberVar qty;
    if instr({xdailyissues.quantity},{xdailyissues.drug_packsize})>0 thenqty:=val({xdailyissues.quantity}) else
    qty:=val({xdailyissues.quantity})/{xdailyissues.doseunit_per_pack};
    qty-{xdailyissues.container_returns}-({xdailyissues.doseunit_returns}/{xdailyissues.doseunit_per_pack})

    Net quantity in dose units (xdailyissues)

    NumberVar qty;
    if instr({xdailyissues.quantity},{xdailyissues.drug_packsize})=0 thenqty:=val({xdailyissues.quantity}) else
    qty:=val({xdailyissues.quantity})*{xdailyissues.doseunit_per_pack};
    qty-({xdailyissues.doseunit_per_pack}*{xdailyissues.container_returns})-{xdailyissues.doseunit_returns}


    This is how the tables/fields look in SQL:
    Select

    [quantity] AS [quantity_text]

    ,[doseunit_per_pack]

    ,[drug_packsize]

    ,[drug_name]

    FROM xdailyissues

    I guess the basic principle of the formula is to look at xdailyissues_quantity , minus the xdailyissues.drug_packsize text (thus grabbing the value) then if the remaining value is over 0 it returns the value. Otherwise the result is xdailyissues_quantity divided by the xdailyissues.doseunit_per_pack which would give us the dose units (albeit in a decimal - but then this dose make it easily distinguishable)

    Any help would be greatly appreciated - have a few good people really stuck on translating this to SQL.

    Cheers,

  • I am not quite sure what you are doing but the following may help.

    -- *** Test Data ***
    CREATE TABLE #t
    (
        quantity_text varchar(255) NOT NULL
    );
    INSERT INTO #t
    VALUES ('2 x 10 X 1 ml ampoule Carton')
        ,('1 x 10 X 1 ml ampoule Carton')
        ,('10 X 1 ml ampoule');
    -- *** End Test Data ***

    SELECT T.quantity_text
        ,REVERSE(RTRIM(LEFT(R.Rquantity_text, X1.Pos - 1))) AS drug_doseunit
        ,R.Rquantity_text
        ,CASE
            WHEN X2.Pos = 0
            THEN T.quantity_text
            ELSE REVERSE(RTRIM(LEFT(R.Rquantity_text, X2.Pos - 1)))
        END AS drug_packetsize
        ,V.packsize
        ,V.packno
        ,V.packsize * V.packno AS ampoules
    FROM #t T
        CROSS APPLY (VALUES(REVERSE(T.quantity_text))) R(Rquantity_text)
        CROSS APPLY (VALUES(CHARINDEX('X', R.Rquantity_text))) X1(Pos)
        CROSS APPLY (VALUES(CHARINDEX('X', R.Rquantity_text, X1.Pos + 1))) X2(Pos)
        CROSS APPLY
        (
            VALUES
            (
                CAST(REVERSE(SUBSTRING(R.Rquantity_text, X1.Pos + 1, CASE X2.Pos WHEN 0 THEN 255 ELSE X2.Pos END - X1.Pos - 1)) AS int)
                ,CASE
                    WHEN X2.Pos = 0
                    THEN 1
                    ELSE CAST(REVERSE(SUBSTRING(R.Rquantity_text, X2.Pos + 1, 255)) AS int)
                END
            )
        ) V (packsize, packno);

Viewing 2 posts - 1 through 1 (of 1 total)

You must be logged in to reply to this topic. Login to reply