[Also see Kevin Handy's str.tgz which has an (older?) version of these routines. There may be more information/links at http://www.cyclic.com/~kingdon/free-vms.html -kingdon] From: paulnank@au1.ibm.com To: kingdon@cyclic.com Date: Tue, 22 Dec 1998 18:10:31 +1100 Subject: New version of VMSTIME routines Content-type: multipart/mixed; Boundary="0__=grc4zv2EjG7mjTVXcS9a7sPkr4MQg7ixlxHSTGfsOsoYKBahMfmxP9re" Content-Disposition: inline --0__=grc4zv2EjG7mjTVXcS9a7sPkr4MQg7ixlxHSTGfsOsoYKBahMfmxP9re Content-type: text/plain; charset=us-ascii Content-Disposition: inline Jim, Hi! Please find attached a new version of my VMSTIME routines. Please use these to replace the version on your web site as they have become a little out of date (the new version has lots of cleanups and a few bug fixes). Thanks Paul Nankervis paulnank@au1.ibm.com (See attached file: vmstime.zip) --0__=grc4zv2EjG7mjTVXcS9a7sPkr4MQg7ixlxHSTGfsOsoYKBahMfmxP9re Content-type: application/zip; name="vmstime.zip" Content-Disposition: attachment; filename="vmstime.zip" Content-transfer-encoding: base64 Content-Description: .ZIP File UEsDBBQAAAAIAPtLKyXRzeibIAIAAAsHAAAJAAAAdm1zdGltZS5ovVVBa9swFL4H8h9euxxSkyVk l432sh0KG6yj0NFLKUa2nhMRRwqW5LWM/fc9WY5lR8loe5gOQf70fZ/ee9JTFsl4NB6BH/c3dz+/ 3VzPvwLUy/myt/LFmrWqLuGW2RJ+MLnBqha6R7gtkWkEjZJDZldQ4U5VRoNRjcZJPjO7nItsO8/V 1imThfsdj96JQnIsIE3b/dOUQEKExD4IpWIcuZfIvLQc4Zyjziuxm6/PvZk2lc0NOAX89tFZqcVK Iod8zSowYosPnx6vfNiLBO4aha0QVNGsggvsT0s4NUj4XakNKGvgWkhtUMizM7h8fwHgE9tnUIps wjhPnbVu1YSlHRZRn/obtdSnISuvTVpjTvrACtiQy9nzIHTHJSwipapIfyFu+qQ9NiRvbWlSjqVh TQYN+QAbCrTNovw7LKJG+TsssPSznjAdcneDsNRjQ14mZMTz2JC3QhPxPDbkSbuNeB7z16+7a8Fg 2r+SCQGMVxdXPerw7KbBgjrOuBuZ2eLh4+PsJT50ZFNKDxKa6GOK2X61qf1AH3J5ewyhvvu0uc4n bZMaVTUi8nqRkT/Qw2Acu0Q5+7d/9zANxrGChOehNkW5OlbSfRccO8qgTxyF2JGDa99prQRRaMqk mXUfiO28Qk0N5E+HsqOlyMZ1QWtD02BDH6+x6d6dKBtcRseCH05U8rCYfuNjMf+/zQ6eIN8IDhS7 Ek/dOOpv+s8SxXj0F1BLAwQUAAAACAB8g5YlWr/AonUWAABiVAAACQAAAHZtc3RpbWUuY908a3Pb RpLfU5U/cJ9G3ljmCxJJUbJkmtpVZDlRzpZylp293JZLBZFDEmsS4OIhhZf4fvv1Y2YwGACUbGez V4eUI3DQ09PTr+nuGWC39fVXX38l+Prp9dXb89dnO6dC3PZ29qwnJ1k6j+Jn4kc/W4gLP/wg49sg sQDET72dvvDEeCH9MFuJNBJJGq3EOFqugoWMxZ0fh0E4c/vsQZ9E3srYXwDsRGoESQ6lrm9mMk2D JWLOEikW0dhfwG9ZAkyipRQrGU+jeOmHYymC5SqObuVShmkZ7SQKn6TCT5IMep1cnZ6fi/Hcj/1x CkQnMrXo/RFIg5ETGU7ETTYTsVxFcZqIKIbbf2QygXsYVMhwjuPieKYvNFtkiNvAF3LpBwuYzjNG DpxFxv7Fz3o7wc1yBziHYxsMb+dBIpbRJFsAk6Iw9YMwEcC4JIjgJpqKdC5RggKZIuIoS4NQ5vNN 1sk3YbaEh41mh375yZh+CR/mM40DmFays7MDA8m18OOcsUGYwjM5QdbfSBKpnwY3QMddkM5pXD2c piPxLcGE8ENEofCJPBg6lUvRSCIxkck4DlZpFAPjpJ9mMWCSs2zhx4v1VtOdPOlHLBcBjhMCKaBP wkc6gDAQdbBaZH4qxcRfC5jqDfDGIMA5ImMSUB7sttcXNwHIPYYZLGUajBHHGMT+QZH5j8yf3EXx xGC4WQPqmzX93RHnU7GOslic5ho+iWSCujT3b6XGj6ybydggSdcrIAE4FIpZAGBgKWF0tyUukTsH A+rDDEIoPedxlC0sQiSqQTANWCKTSHeMQOlBMKgOkyCW43SxBnnuWGy8DKXwJ7c+aM9MoqwmEfEw DhQT7EmKAGnwcx1GwRI9OFOgOwUBrtAYQBh3ACiewI/AD58QZOrHM5l3XvrjOWgIIvUEEHsXLBbC X9z5axglBuHTmAlwzCgQGM1ExlsGReN7mOE0WyzWuZ5zJxsZsKeMw9alE+TnakHzT9JsFUwEGS8x Dhg6i2hCoBjPvIK7iMTlv3fEuZbclvgrTpq4BDwJplMZS/Q3NzK9kxIl+t8yjhyPM0ENRW3kp8DC RerTXP7sDHYSriNgGPA5AKQoCRoInR9Q3jsgmaOKItOcUXJrB4NJ0jgYg2/Kh6J5Huzv7+2jsSR/ tp3yPVd5BWjtsp/6UxCOFxmox/MknQTRzvzYbhuj6jttS7mM4nWx8dHtMkESd+aP7GF3W+ISzG0u fRCnmILBbQkeOEfH3Y4dgqHnS/C++BB8Hfb5UzAFdzYVF5fXry5PT17hmketwKEp6OikAerVFNvb 5vf19XcX706vr5vucDel8dRw352eCg25CG5iMDH2Wqi5jSSYzbcUMXKRyALz1sluGbVCO7WngdY2 zf9qKfDkrq6+ub64fPP65BW08TysNtErtp7/hEwQe4eHefur82+/ub68OHtxhhwSvUGv2+13i+Np WOz97cnVmQAYuGyye12xBPMMEgmr1kRkYZCSlWsHy3Ox8Fyd/9eZODwY2Ihw+rAkAwe0caEdJWJb qbNSBYXlP96dvLg+Pbt4++7Nz9cvTn6+AuIPukdPv/4K8IAfAdStvYP9pmjT/e6gCT6J7oD8vBXv RYG8Ak64AEl/oLH2LKw9g7WnsTqoiMafz07eKGRAYc/Ql1OHWJyeViehiFAd4U4zzO5w+fLl1dnb vMvRoHdoeNHoHe4fXvcOur2mGdVqU7OwW3A25C5cSObdHuqIJoOHFi/fXIIC7cJ/ACneXore090e /ILORVJRh4grqj/Ca80GepVvuEbhXytTAP/rh7TQxiEEkSoSwYhOLik2QOeMTreRxwVMv44JUBvZ L+ZK6YkbPwkgxITFBjFEq1WUBCm5XrBnoGCtzPDrr7IQ7BncRAV5QBZ52A744Gyckn6LFjzyJ3HH 9AMIAgeyfmXegS9q6FZxPDJ20RS/5syNJURMoWW/Q372UaBPQcgcFpj3Y5YSI3bVnGEJsAMdZMBN NsUIkKeVDzMLEoyGDb2wfsK8RuKwQ4wd8RQJ7chMpjP243gNDd3hRlwQbIvWKo0BkvniHWN3qxNE ONas8aKh2iPkEYy/Lbq/vHwJ0jBsGhbBFZUMfXwsDpsOAJOKCAlzESHq5LBifA1dhRAn1G4DCGGu HA26843b/yMEU7C+iYbnMaOPRRefVwqe3bkW/NdffbSsBfV0fJte30oV6Kf+B4qwJsFtMMnAWHJ1 gGhyAYHENI6WwidsmJWFFF9AsoOxDdnLMgtnHMEuWYUcw8nVp2QVSwx7J397DzP/tdvZ63UOup2j XqfXh3/7/U7vsN/p9/Y6/cGg03866Ox19zt7e/Dv4ODjsIDQmZdpTyBFTZUa/+3p+yqbyy2srIkU HnXW0o87S8iv5h3UasP3Ej/FCpIFjv2YVTkzMSWA0C2khY54VGYP4kQrV+TuvQcx9/fEb7/pCQyw Zf8IWnLBq0f75pFuOcCWo6NmpU/g/jgxtjHs0H2vdIammrf3dDtOPm/uvx/aRDMuMG0MkhQG+FXw ThxtjkSv5JU0RC5Q6a/8yd8dX2EGei5ooYDZ0k+c6FGRL3gxGQCLgPzjWPT6+IvmAk+q2eMSbNNA PcEvODrM6D1huKXpNeM2XZdlZvNYDEoP8cqZ0BsWn5Y5py9EqrFSkKFlokfCtg2ILadTnAfN+7hy 2u9LnG8YDehT0Lypr6fJaW4Whs3MfpNxeiPd2QKkmcITEzlUSI9gWlbg1OamXTEAgtQt8M9qhx9e md902eGUl6s3/7GEVPYwSZpY1GG5aFQRM+jFFEOE3Du0ILqjiLhdQ5Z15R6kJQ6oj+U5WmqmxnM0 HbY3kLBtVGG2aSWmnPiPuSMgm2mWQo2/Sq6CgO/rP0nIHy648GXnoJ6gPGjrE+INvXTamvw7xRQa tYoFgA//gyiaOhpwbOefscLTM/5TtcTbaztkiddcEMUQWLMX5j6XMVVw6GE4E6cq/VybUJcTMS6N JQEWLHreD37o9Y6eds0aj13r1vdTiLexCkHayqE0AP49S1IcVeMXVroKjyG8n5hHVDekrNBTTTuE xhR1Oa6HQSambxiFXjSdJpKWeLkjLqJUlUWo4muybMLEZV2Qsh+uuSgJ+FZ+nAZjLi+KO7lYbLmx isXW2ugBMuxy9QBlRnacinEWY3gwYv5cvHv1SstWCbVs8oPu/uFT0DnVdZfTX+0E7jH4hur1mHs1 2cJxTFVbQCA1GxztBv9/6y+GxSdL0VqMF6DVqr0urFKPWbTbjEpPkBHA1HNBKogd/KHBUh2DICR1 AftcXpPvbYveUbdbBOw5gLAwIFwRqO8CgR8tQuw5EPMoi4sQAxdHEBYB9h0A0N4iwMF7FjxOmRQ8 XdLaUtQAJ4LlvkrcLDgusbjRPGedmPGaPNeUrVPbTE3gmee8RIBOeXfEOVUuddUyRTx6A0FtKnAZ 1S/4bEZCZXqcCGhHKGd+igXRJLKhYf4Zbwf0BwIZTf5gIRNGMfaxfg/DJ+iksiCZywknH1TXqcgi 9PQxo27VptT6qZNOmyUi0EtQUfkJx138AXoNnR7OopLEYzYRBgO5nE/BNTH3k5Ucc10e/SCYJXGW NxyMsy6F/0A3rrTkKD49frA81jbP4L713Fn3Sss7XlY4WBUWMxegkUck4waLfGr4UlOCOJ1L0NSc TdQPt8xokHLpgcjXBChe8VIOjogW5sNu05pXcWaGSrtjgcw6UhW5XxTG4PWpoUxNH9K8SZKWeD58 wIQdmHLgg1dV8MPY2u26CAgvRVVtIGTjrgmG8Lq/5IHXBq0ziJT6sdfEWxDj2S8p7ufmlUBT+COP g83V+flGYywVwbq6AtatLH3VR5yKMc+fA2PEb9rHeJ7DJIWdi04auKE675pSVZ24GO7xqK6mVSiS GfQ02G5ef6yi6XFen7RFca9MQTRv2PnEMskWaVLtAPIcwx65pQoUHq4ITaLeoa1QQ93SDtasDnlf x0qq02093mcN5I5gaSnePCTY13v3qojn1qtRpW9i6X9IBG87R+UyHvXgWl7FAmsN8oUVNS56p7Kj pm0M8V0i9TruxC1EsCmg1VqhKadr3lpMfdhyqcOIbTvL3jYRgwX/eyydeXXcAlA64Uzho8WnF7S6 4LIICMolQ7ZQ0VX1P7ov0JZa8XV3KMwFqH+mUshuCbZXAfua6i8VwBRqe2QJBvgFmocDSzZWUIKa uOAFzsgDF7XA7AzuMRWgTWpUcDGGJTeL1xu2JlAxsI/tbxFPe2SXa6ynqhqa7ze1FV93y7uHmFEN ul0XN7i9Eqjr304mk3wuahpYA/MhV9Y/1V4ohuOLKJzJuBRKlNTOmrXGwp4JyHfIsTui8hj4EdYh 89579bCV5UpO1kYGAyWdwzIcUeXZcBsILBYk6zlJ/MJfZZXQdBWkaSp/JMo6QRooV4ovg5A3AiMT 1HPZkQVJ918mRUQBWYQRok2K3UlXkRGWBGg6VsmPH24UH4NskJsaoFVL0kaZUVEIA3wWHUQE4znH 1IDzpbwR/SPlYvKOSHm7zXt1Yv/o0yvp2LXddsn8siJ6Nc7C1PUtKcwMz7JBiq52InB5ju+Jder0 w6xneqvGzRhUnKU4Vll3b3JnmkGxs71WkAcV1euEBUtrBeEb1qwTFjCtFaxMG3ZRVJ+qdcQNlvKo sRwqpMUijGSJDjXu77NwEstJOs9HIKjdkeW8UqvSo3AcdPN17kqVMF0EB07/QU3/10GYpbLQ39Sm GFcB/HsqneQz3BAqUuBApyjMYYgUT0daqkaZpJbCKgvHKW3HPnr2bOfR0Hk8CWZBmvDzbq+/N9g/ eHp4VAIjISow74eTC+/l2bfe65M33smPb+Dvz94P7y7g3yvv5N133tXZj97l6Vvv4vIn78XZqfdo qAjX2GYyhRgUa1zueQ70vVF4KyEe9VVFi86jgmvGVSWfXsvBZTYDOnwHmpefvGixNVoNCQQhVZUj AwE4b4GuPLmrCDwRBwNpW1U2ivnrc4FnJsG/BAnxuEHbDNWlHyKZoAAXbzkMK8DMyMCOInF4lTNP iiIZ68gVOKMAj0HphIXGJHTtthrmOZiNHTIb1qgbOvzVVkRZcIY/rVFeGlV2riRikKinLBdo1X0N 88keuCaXGwImMzBsWsiYVjG08HlhNDT0yUqlKGkqb3ZUpUgKq8qEJsn4m/wUM+VEWMndmCc52RUX M/LCelH2rfE8NjUdQO0d45D+9SoiC6nuA/rFfVTndqHz3fVChjNw3g45LKYOMdgsE+jxPgQr2kZJ Vv5YOguXUgk1EKk23oB2G8pH4ol40lS0WCsQoP5O6qqMrlKXs50K1MZw+FnRdgzDSn4A2zuMpbOt ZrvN9q51sBQkaLWztNRQz9VMjG54JUvkyo991INH3iM85TyFhxnWmvC8950qJvq0Gm7dP0ubgd6T ijk6q7nip45QSZO5tjr1PzPiyEvMqjLAytqxN7X09aCtY7zcKBGrArkCIB5TIK4uCLHItOFQgGFc TAHzlZTY4Q63K8bRLAwSPg5I4qrGbSymXymLrbIs8Hp4rMYGCgFQUUd5FbU2tfRVXa6lnYMoW61k rCiGAI6YzpgxnNveLvfDy+nXK/TrPbhfv9CvX7Fe6EtNFpKNgfPUWlHU6R1gWL9UuFQiKec4SgOs eLSgZfoWNOEiuoO0LPpgcpGN0n+gFeJlWaLd/DmOq4jy8xyYfSnudAv2YQOU05ea8oxroaG1/1Fm pD2uLSE7JKm0XefhnoVgYN3vW/cHNmLbN/8TFy2znUAOls5NIno8jvAMfQ0fPYjJ88/zjINKnImV PTBCSwHKXoSwPyia+1crG9LA1D4Xe5Uj4aWkxoBtsVermnjVZ+x4mUhX3VD9qQvZk45fqjohlSZ2 PTrab+re4Fz2a/rYmqagrQ19+/pYbHJ+3s+h+z1QMXUjbO9rmV3jmvC6h7U1jrx+fpYj11McWAea /girPJ8i4nSOe+0LOU3doGsVRxD5L++NLz/xhL0D6RzsUOFSag52KIYUExXzIqbJRtw8hHxHnr7g m604kar8RCFzkgxMQiDq72xOW6rVYeOrCzDZ6WL26ckNla5xWxCZY6dzf1zyY1TnZRAnKZ1oyyNd ehFQ5nvG9in5T9gkrjuxUQyni/qB1xduPhVszgTBd745uUCbmbUbTCzUqmMVJusBMCrq6bMbNbEA YjPxQMURDcpZQnxtFSLzu0iVOoC6MipD3AZ7teEarFh5rIAxKnruanbqq6WdiyBn88nO0+7vVFYU QUjD+yq8xaaPJU7hFgjHyfRGNR2inK9X6OdM6lmR5eH1UMbdT/3jCuorVrqGPh7RUPboCROGHIv9 pjk+4S67S7kcr9Y6/ijlRw2tTj08S96j/Zxmh5DV5w302Hnqakc3f8MBrw2ngjDJzq2omt9l3Ssa adGioiWeaKRXq3V+omNtLFLlg22JK1o4wRGByyoPrZlKb2E67kSR9JyByomM1dVhVf3CXMSJLfqo R/kFCLzuNy7uvzsqR1i1my1v0QBYSSuSkVra80MpLqUPMWHq7dqBkbqxlSrNq56iqxT4tp7PcVLh ndf8COdDMthmBcu5g+Ihbd/c4ucZ0sjNaHLsWjk0wcUcxFV2hsbwfngPcZ/B+KL3+fh7D+C6N3cA mhoE8KRBnzEaR+4l7TH5t9ZXBICOmCoYke3iicQnt5RhSqxYeybspJimvJCnFPVZZ5JUw8iwyhNq g6RZHWPlo2/eeVLnaq6j6TWo6gcKZpcr2unCykGEAYj8oA7c2bFtxUkkF9fGALSFIABtvTurDgkN Nd3VQZnhaeWppOoDgRvOENklUSpS6uDNUgpNK/KfX7Fq48tNj8XTplX6+1jgNxObM9qfTH4BxEl2 84s4vXz36gUFrpWfM8G3H/jkl5+qlGJHfJvxNznohYgoxBchovgDfZoA9GByh4e79TZ9kn9GQ9KX PYRq+unkP/mzHI1zUJKFQoF7j1tb4pnXFE1xFfEQ+jA5gxS+L0LDEBpIFjLIGhFGfyMBfV2CwgOi 8Ng4fa2DPx2jaPHETUYB+ppw0DdALi7f6k//2MwYRzF/DwWxA2ZffYiFJ4pT1u93EyoeYGur9HoI Sh4F0LiNAlA9uIWQumN+SKnu1a4inUYHe4NHNcfk7PWh4oipc4y07miwz5GW09oUTN89naWs6yvl PV1hmpV9efqWMTAPKk+5m2O0WvtL0bWGUJy0TvCYNdP2mp5XWtQ1H5FR4FTb+sRtG2ffbtuBI86p 8jRz8YQ0HmKuNNcq91hQHzRcpT5wm6sP/Pi/pj5M3+epD03n/6f6eF+iPvYheFwfhk48tvEosOuH 6PxoUlofZa+0AS379W+RFWCZ98UPURDK0msXNoc0VH8jFF5WnYwcKZPLFCq1dzcXq/NtCxGZFKNg dHWI6lTks8g3o34J+cVv7FTQWid9GP0Pkn6d+LdGdUyrKqE+VOBVlVXb4S1XHW3Q9nsf1ZsiDQAX o6ICc+gNRmzTzo3N5oZDL+YthpEonHmhrACGcc9g4/V7a8vnKHudAi2h0zVVFvIv1bSwMVgt5Kd+ OsN44dKbLwXpTfkTTqN8IBfKWQtWuvhrv83EXQrnL+pKkMqwq94aK9U1MQ3wb5JoAUmLorQ6xVaz IIGbGXl8N3SQvuZ5rjcWSeveDGrzkS9YsQxyG+hf9I2Zuq2P8iYJqd6//S9QSwMEFAAAAAgA+Esr JZSljTvHAQAALwMAAAkAAABkZXNjcmlwLmh9Um1r2zAQ/m7wf7ixUJKQOU0/ttvYiMs21rWhzgb7 ZBTrbIvYUtBJMVnZf9/5JbgrY7KN4Z4XPXfScg4xUmbVISrhuIqugFeMudLKKaMJcmNB9gxnLMF8 GQZhsJyHAQxrWyoCfg/COjA5PMTJFTRWOYcadifYCF/BvdB7tEdFi1GItVAVCCktEl1DR9TM+yD8 KlK7OspM3W525nfGvJFU5KzaeYcScotYnbqUoqqgxnqHnJJjuBJH6Y9vCbBb7bmtEzgDnjCCz6bB I/ZKiVYd2bAxdk+jsPbkgHNqx19ngdpxu7r1VxbIeJth6yiyvTZNhbJ4ti+TWKRdm5bHOeQCY1Wh tODmvSuNjcKgH2sYvFY5R+Hxo5xy6BlcXMCrcyFNP91/X6fprGfqrPIS4a08H+D7ro4V4WClWQlx sp58TePtz81tuuVy7/Z3GS5fAuu7j0mSJi0QBjxvnzmQlE3GuwBPfZ9ekyo4HhC30pOatEJduPLm BSMrhR0I7nTA/8BZJYgGvCvP27pID4aPAi0jv2+6JofQk/g2WT9+2WwfHqft7dDFQosaZ/Dv6C0G 7+CJ1C80+ZRawezNanHJTy8f7FFLlY//P1BLAQIUABQAAAAIAPtLKyXRzeibIAIAAAsHAAAJAAAA AAAAAAEAIAC2gQAAAAB2bXN0aW1lLmhQSwECFAAUAAAACAB8g5YlWr/AonUWAABiVAAACQAAAAAA AAABACAAtoFHAgAAdm1zdGltZS5jUEsBAhQAFAAAAAgA+EsrJZSljTvHAQAALwMAAAkAAAAAAAAA AQAgALaB4xgAAGRlc2NyaXAuaFBLBQYAAAAAAwADAKUAAADRGgAAAAA= --0__=grc4zv2EjG7mjTVXcS9a7sPkr4MQg7ixlxHSTGfsOsoYKBahMfmxP9re--