{ "disks": { "1": { "dirs": [ { "path": "/", "files": [ { "name": "ANIMATE @XE", "size": 3091, "date": "1991-04-08", "time": "5:25" }, { "name": "BRIEF @NI", "size": 3767, "date": "1990-06-01", "time": "14:01" }, { "name": "CBL-CMPT DOC", "size": 28226, "date": "1991-07-02", "time": "13:31" }, { "name": "CCI @BJ", "size": 10508, "date": "1991-05-31", "time": "16:54" }, { "name": "COBFP87 @LE", "size": 21147, "date": "1991-06-28", "time": "5:33" }, { "name": "COBFP87 @LL", "size": 21148, "date": "1991-06-28", "time": "5:33" }, { "name": "COBFP87D @IB", "size": 37782, "date": "1991-06-28", "time": "5:33" }, { "name": "COBFP87O @IB", "size": 37645, "date": "1991-06-28", "time": "5:33" }, { "name": "COBIFN @LL", "size": 3544, "date": "1991-04-08", "time": "5:25" }, { "name": "COBLIB DLE", "size": 122768, "date": "1991-06-28", "time": "11:12" }, { "name": "COBLIB DLL", "size": 118690, "date": "1991-06-28", "time": "11:12" }, { "name": "COBOL @XE", "size": 3072, "date": "1991-04-08", "time": "5:25" }, { "name": "COBOL INI", "size": 51464, "date": "1991-07-02", "time": "11:28" }, { "name": "GENERATE @BR", "size": 142847, "date": "1991-06-28", "time": "11:11" }, { "name": "HNFDC @LL", "size": 2304, "date": "1991-06-28", "time": "5:33" }, { "name": "HNFDC @XE", "size": 2206, "date": "1991-04-08", "time": "5:25" }, { "name": "HYHELP @BR", "size": 29558, "date": "1991-06-28", "time": "5:33" }, { "name": "HYHELP @NF", "size": 16565, "date": "1991-06-28", "time": "5:33" }, { "name": "HYHELP @XE", "size": 4403, "date": "1991-04-08", "time": "5:25" }, { "name": "MFCOMPAT DOC", "size": 16399, "date": "1991-06-01", "time": "15:05" }, { "name": "MSHELP @LL", "size": 5656, "date": "1990-10-02", "time": "16:39" }, { "name": "MSHIF @LL", "size": 2053, "date": "1991-06-28", "time": "5:33" }, { "name": "MSHIF @XE", "size": 11909, "date": "1991-06-12", "time": "12:00" }, { "name": "OPTIMIZE DOC", "size": 12581, "date": "1991-06-01", "time": "15:04" }, { "name": "PACKING LST", "size": 36156, "date": "1991-07-02", "time": "13:45" }, { "name": "PKUNZIP EXE", "size": 35258, "date": "1991-04-08", "time": "5:25" }, { "name": "README DOC", "size": 19563, "date": "1991-08-05", "time": "9:21" }, { "name": "SCREENS @BR", "size": 64133, "date": "1991-04-08", "time": "5:25" }, { "name": "SCREENS @XE", "size": 4490, "date": "1991-04-08", "time": "5:25" }, { "name": "SETUP EXE", "size": 102928, "date": "1991-05-01", "time": "8:56" }, { "name": "TIMEOUT DOC", "size": 7150, "date": "1991-06-01", "time": "15:03" }, { "name": "_SORT @LL", "size": 4683, "date": "1991-04-08", "time": "5:25" }, { "name": "_SQLPRE @LL", "size": 2075, "date": "1991-04-08", "time": "5:25" } ] } ], "volume": "COB450" }, "2": { "dirs": [ { "path": "/", "files": [ { "name": "ADIS @BJ", "size": 27942, "date": "1991-06-28", "time": "5:33" }, { "name": "ADIS DEF", "size": 330, "date": "1991-04-08", "time": "5:25" }, { "name": "ADISCF @BR", "size": 31936, "date": "1991-04-08", "time": "5:25" }, { "name": "ADISCF @XE", "size": 4333, "date": "1991-04-08", "time": "5:25" }, { "name": "ADISCTRL @", "size": 1024, "date": "1991-04-08", "time": "5:25" }, { "name": "ADISDYNA @BJ", "size": 2495, "date": "1991-06-28", "time": "5:33" }, { "name": "ADISINIT @BJ", "size": 2961, "date": "1991-06-28", "time": "5:33" }, { "name": "ADISKEY @BJ", "size": 4387, "date": "1991-06-28", "time": "5:33" }, { "name": "C6DOSIF @BJ", "size": 826, "date": "1991-04-08", "time": "5:25" }, { "name": "C6DOSLB @BJ", "size": 1562, "date": "1991-04-08", "time": "5:25" }, { "name": "C6OS2IF @BJ", "size": 829, "date": "1991-04-08", "time": "5:25" }, { "name": "C6OS2LB @BJ", "size": 1382, "date": "1991-04-08", "time": "5:25" }, { "name": "CBLBIND @IB", "size": 3987, "date": "1991-06-28", "time": "5:33" }, { "name": "CBLBIND NOT", "size": 86, "date": "1991-04-08", "time": "5:25" }, { "name": "CBLDC001 @BJ", "size": 1904, "date": "1991-06-28", "time": "5:33" }, { "name": "CCIAPPC @LL", "size": 3202, "date": "1991-04-08", "time": "5:25" }, { "name": "CCIIPX @XE", "size": 9992, "date": "1991-06-28", "time": "5:33" }, { "name": "CCINAMP @LL", "size": 3160, "date": "1991-06-28", "time": "5:33" }, { "name": "CCINAMP2 DLL", "size": 561, "date": "1991-06-28", "time": "5:33" }, { "name": "CCINETB @LL", "size": 3252, "date": "1991-06-26", "time": "5:33" }, { "name": "CCINETB @XE", "size": 7634, "date": "1991-06-26", "time": "5:33" }, { "name": "CNVCOMP6 @BJ", "size": 1377, "date": "1991-04-08", "time": "5:25" }, { "name": "COBAPI @IB", "size": 11409, "date": "1991-04-08", "time": "5:25" }, { "name": "COBINTFN @BJ", "size": 14926, "date": "1991-06-26", "time": "5:33" }, { "name": "COBLIB @IB", "size": 37000, "date": "1991-04-08", "time": "5:25" }, { "name": "COBOL @LP", "size": 321934, "date": "1991-06-28", "time": "12:51" }, { "name": "CONVERT3 @XE", "size": 77126, "date": "1991-04-08", "time": "5:25" }, { "name": "CONVERT5 @XE", "size": 74806, "date": "1991-04-08", "time": "5:25" }, { "name": "EXTERNL @BJ", "size": 2225, "date": "1991-06-28", "time": "5:33" }, { "name": "EXTERNL DEF", "size": 248, "date": "1991-04-08", "time": "5:25" }, { "name": "EXTFH @BJ", "size": 34840, "date": "1991-06-28", "time": "5:33" }, { "name": "EXTFH DEF", "size": 394, "date": "1991-04-08", "time": "5:25" }, { "name": "HELPADCF @BR", "size": 5826, "date": "1991-04-08", "time": "5:25" }, { "name": "KEYBCF @XE", "size": 4154, "date": "1991-04-08", "time": "5:25" }, { "name": "LCOBOL @IB", "size": 103973, "date": "1991-06-30", "time": "10:56" }, { "name": "LINITC31 @BJ", "size": 1314, "date": "1991-04-08", "time": "5:25" }, { "name": "LINITC31 @SM", "size": 4523, "date": "1991-04-08", "time": "5:25" }, { "name": "LINITC32 @BJ", "size": 1544, "date": "1991-04-08", "time": "5:25" }, { "name": "LINITC32 @SM", "size": 6272, "date": "1991-04-08", "time": "5:25" }, { "name": "LINITIO @", "size": 969, "date": "1991-04-08", "time": "5:25" }, { "name": "LINITIO @BJ", "size": 610, "date": "1991-04-08", "time": "5:25" }, { "name": "MCS @BJ", "size": 6493, "date": "1991-04-08", "time": "5:25" }, { "name": "MCSETUP @XE", "size": 7596, "date": "1991-06-28", "time": "11:13" }, { "name": "MFC6INTF @BJ", "size": 667, "date": "1991-04-08", "time": "5:25" }, { "name": "MINITC @BJ", "size": 1050, "date": "1991-04-08", "time": "5:25" }, { "name": "MINITC @SM", "size": 3139, "date": "1991-04-08", "time": "5:25" }, { "name": "MINITF @BJ", "size": 1111, "date": "1991-04-08", "time": "5:25" }, { "name": "MINITF @SM", "size": 3582, "date": "1991-04-08", "time": "5:25" }, { "name": "MINITP @BJ", "size": 1101, "date": "1991-04-08", "time": "5:25" }, { "name": "MINITP @SM", "size": 3567, "date": "1991-04-08", "time": "5:25" }, { "name": "REBUILD @XE", "size": 97308, "date": "1991-06-28", "time": "11:12" }, { "name": "REFORM5 @XE", "size": 10693, "date": "1991-04-08", "time": "5:25" }, { "name": "RMSTAT @BJ", "size": 1754, "date": "1991-06-28", "time": "5:33" }, { "name": "RTSBIN @SM", "size": 2130, "date": "1991-04-08", "time": "5:25" }, { "name": "RTSCALL @BJ", "size": 491, "date": "1991-04-08", "time": "5:25" }, { "name": "SPLIT78 @XE", "size": 36058, "date": "1991-06-28", "time": "11:16" }, { "name": "SQLINIT @BJ", "size": 1460, "date": "1991-06-28", "time": "5:33" }, { "name": "TABX @XE", "size": 10338, "date": "1991-04-08", "time": "5:25" }, { "name": "_CLASS @BJ", "size": 1194, "date": "1991-06-28", "time": "5:33" }, { "name": "_CODESET @BJ", "size": 1675, "date": "1991-06-28", "time": "5:33" } ] } ], "volume": "COBOL450" }, "3": { "dirs": [ { "path": "/", "files": [ { "name": "ADMOUSE @BL", "size": 1110, "date": "1991-04-08", "time": "5:25" }, { "name": "ANIMATOR @BR", "size": 22489, "date": "1991-06-28", "time": "5:33" }, { "name": "ANIMRTNS @LL", "size": 3319, "date": "1991-06-28", "time": "5:33" }, { "name": "ANIMRTNS @XE", "size": 3310, "date": "1991-06-28", "time": "5:33" }, { "name": "ANIMUSER @XE", "size": 8626, "date": "1991-06-28", "time": "5:33" }, { "name": "APPC @EM", "size": 57972, "date": "1991-04-08", "time": "5:25" }, { "name": "ASM @EM", "size": 2292, "date": "1991-04-08", "time": "5:25" }, { "name": "CALC @BL", "size": 2124, "date": "1991-04-17", "time": "12:56" }, { "name": "CALENDAR @BL", "size": 1808, "date": "1991-06-11", "time": "15:19" }, { "name": "CASE @BL", "size": 9164, "date": "1991-04-08", "time": "5:25" }, { "name": "CHECK @BR", "size": 237536, "date": "1991-06-28", "time": "11:11" }, { "name": "COBCLI @BR", "size": 31537, "date": "1991-06-28", "time": "11:11" }, { "name": "DDE @EM", "size": 73280, "date": "1991-04-08", "time": "5:25" }, { "name": "DECLARE @BL", "size": 774, "date": "1991-04-08", "time": "5:25" }, { "name": "DIOPHANT @BL", "size": 1556, "date": "1991-04-08", "time": "5:25" }, { "name": "EXPAND @BL", "size": 773, "date": "1991-04-08", "time": "5:25" }, { "name": "EXTFILE @BL", "size": 1228, "date": "1991-04-08", "time": "5:25" }, { "name": "FUNKEY @BL", "size": 804, "date": "1991-04-08", "time": "5:25" }, { "name": "HELP @BR", "size": 10033, "date": "1991-04-08", "time": "5:25" }, { "name": "HELPNAME @BR", "size": 4461, "date": "1991-04-08", "time": "5:25" }, { "name": "LOGOPER @BL", "size": 2093, "date": "1991-04-08", "time": "5:25" }, { "name": "MUDEMO @EM", "size": 14263, "date": "1991-04-08", "time": "5:25" }, { "name": "NAME @BR", "size": 23467, "date": "1991-04-08", "time": "5:25" }, { "name": "NESTED @BL", "size": 786, "date": "1991-04-08", "time": "5:25" }, { "name": "PMCALC @EM", "size": 24642, "date": "1991-04-08", "time": "5:25" }, { "name": "PMHELLO @BL", "size": 4653, "date": "1991-04-08", "time": "5:25" }, { "name": "POPUP @BL", "size": 2156, "date": "1991-04-08", "time": "5:25" }, { "name": "PRINTESC @BL", "size": 840, "date": "1991-04-08", "time": "5:25" }, { "name": "REPORT @BL", "size": 936, "date": "1991-04-08", "time": "5:25" }, { "name": "SMPLACCP @BL", "size": 699, "date": "1991-04-08", "time": "5:25" }, { "name": "SORTDEMO @EM", "size": 19298, "date": "1991-04-08", "time": "5:25" }, { "name": "SQLDEMO @EM", "size": 21185, "date": "1991-05-10", "time": "8:08" }, { "name": "SSCNTRL @BL", "size": 987, "date": "1991-04-08", "time": "5:25" }, { "name": "STATUS @BL", "size": 1013, "date": "1991-04-08", "time": "5:25" }, { "name": "TICBUG @BL", "size": 2180, "date": "1991-04-08", "time": "5:25" }, { "name": "TICTAC @EM", "size": 5301, "date": "1991-05-24", "time": "8:41" }, { "name": "TSTDEBUG @BL", "size": 1393, "date": "1991-04-08", "time": "5:25" }, { "name": "UTILERR @LP", "size": 94539, "date": "1991-03-18", "time": "14:20" }, { "name": "UTILS @BR", "size": 116286, "date": "1991-06-28", "time": "5:33" }, { "name": "UTILS @LP", "size": 138868, "date": "1991-02-20", "time": "11:56" }, { "name": "WINDOWS @EM", "size": 45073, "date": "1991-06-10", "time": "15:05" } ] } ], "volume": "COBOL450" }, "4": { "dirs": [ { "path": "/", "files": [ { "name": "API @IB", "size": 43552, "date": "1989-03-20", "time": "10:22" }, { "name": "BIND @XE", "size": 25398, "date": "1990-03-27", "time": "6:42" }, { "name": "CBLSSEG @LL", "size": 1127, "date": "1991-06-13", "time": "16:16" }, { "name": "CBLWINB @BJ", "size": 816, "date": "1991-03-19", "time": "10:39" }, { "name": "CBLWINC @BJ", "size": 487, "date": "1991-04-15", "time": "9:45" }, { "name": "CBLWING @BJ", "size": 414, "date": "1991-03-19", "time": "15:10" }, { "name": "CBLWINL @BJ", "size": 361, "date": "1991-03-19", "time": "10:39" }, { "name": "COBAPIDW @IB", "size": 30017, "date": "1991-07-01", "time": "8:56" }, { "name": "COBAPIW @IB", "size": 15570, "date": "1991-06-28", "time": "6:48" }, { "name": "DWSKEL DEF", "size": 222, "date": "1991-05-22", "time": "14:08" }, { "name": "EXEHDR @XE", "size": 28550, "date": "1990-03-27", "time": "6:46" }, { "name": "EXP @XE", "size": 27003, "date": "1990-02-20", "time": "5:22" }, { "name": "FIXSHIFT @OM", "size": 700, "date": "1987-10-06", "time": "10:49" }, { "name": "HELPMAKE @XE", "size": 41326, "date": "1991-01-24", "time": "14:18" }, { "name": "HIMEM @YS", "size": 5582, "date": "1990-04-06", "time": "10:24" }, { "name": "ILINK @XE", "size": 64986, "date": "1990-02-20", "time": "17:14" }, { "name": "ILINKSTB @VL", "size": 2954, "date": "1990-02-13", "time": "9:08" }, { "name": "LDLLCEW @IB", "size": 87340, "date": "1991-05-21", "time": "13:22" }, { "name": "LIB @XE", "size": 35066, "date": "1991-02-26", "time": "14:16" }, { "name": "LIBENTRY @BJ", "size": 360, "date": "1990-06-01", "time": "3:00" }, { "name": "LIBW @IB", "size": 38772, "date": "1990-06-01", "time": "3:00" }, { "name": "LINK @XE", "size": 88529, "date": "1991-04-18", "time": "12:09" }, { "name": "LLIBCEW @IB", "size": 92796, "date": "1991-05-21", "time": "13:20" }, { "name": "LRFMERGE @XE", "size": 23479, "date": "1990-08-06", "time": "9:58" }, { "name": "NMAKE @P", "size": 51244, "date": "1991-03-22", "time": "15:53" }, { "name": "NMAKE @R", "size": 48432, "date": "1991-03-22", "time": "15:55" }, { "name": "NMK @OM", "size": 2635, "date": "1990-06-14", "time": "8:52" }, { "name": "PWBRMAKE @XE", "size": 35691, "date": "1990-06-14", "time": "8:36" }, { "name": "RAMDRIVE @YS", "size": 3180, "date": "1990-02-05", "time": "14:16" }, { "name": "RC @XE", "size": 35076, "date": "1990-06-01", "time": "3:00" }, { "name": "RCPP @RR", "size": 4855, "date": "1990-06-01", "time": "3:00" }, { "name": "RCPP @XE", "size": 78619, "date": "1990-06-01", "time": "3:00" }, { "name": "RM @XE", "size": 21670, "date": "1990-02-20", "time": "5:22" }, { "name": "SBR-LOAD @NT", "size": 3574, "date": "1991-02-25", "time": "9:55" }, { "name": "SDKPAINT @XE", "size": 48888, "date": "1990-06-01", "time": "3:00" }, { "name": "SDKPAINT DAT", "size": 92, "date": "1990-06-01", "time": "3:00" }, { "name": "SMARTDRV @YS", "size": 5268, "date": "1990-10-31", "time": "3:00" }, { "name": "TOOLS @RE", "size": 1593, "date": "1990-08-06", "time": "13:45" }, { "name": "UNDEL @XE", "size": 27497, "date": "1990-02-20", "time": "5:23" }, { "name": "WINSTUB @XE", "size": 243, "date": "1990-06-01", "time": "3:00" } ] } ], "volume": "COBOL450" }, "5": { "dirs": [ { "path": "/", "files": [ { "name": "CANOS2 @LL", "size": 33152, "date": "1990-09-06", "time": "14:02" }, { "name": "COBOS2 @LL", "size": 25478, "date": "1990-09-05", "time": "16:14" }, { "name": "CVP @XE", "size": 203895, "date": "1990-09-07", "time": "16:18" }, { "name": "CVPACK @XE", "size": 30704, "date": "1990-09-05", "time": "13:01" }, { "name": "IMPLIB @XE", "size": 27166, "date": "1991-04-07", "time": "14:26" }, { "name": "MOUSE @OM", "size": 16723, "date": "1990-02-16", "time": "8:25" }, { "name": "OS2 @IB", "size": 46380, "date": "1989-03-20", "time": "11:05" }, { "name": "PMCVAID @XE", "size": 8257, "date": "1990-09-06", "time": "15:05" }, { "name": "PWB @OM", "size": 2674, "date": "1990-06-14", "time": "8:51" }, { "name": "PWB @XE", "size": 201061, "date": "1990-06-14", "time": "8:40" }, { "name": "PWBC @P", "size": 11065, "date": "1990-08-17", "time": "8:43" }, { "name": "PWBC @R", "size": 11427, "date": "1990-08-17", "time": "8:42" }, { "name": "PWBCOBOL @P", "size": 11839, "date": "1991-06-19", "time": "17:46" }, { "name": "PWBCOBOL @R", "size": 12408, "date": "1991-06-19", "time": "17:47" }, { "name": "PWBED @XE", "size": 214163, "date": "1990-12-10", "time": "15:19" }, { "name": "PWBHELP @P", "size": 10717, "date": "1990-06-14", "time": "8:43" }, { "name": "PWBHELP @R", "size": 16244, "date": "1990-06-14", "time": "8:49" }, { "name": "PWBROWSE @P", "size": 19611, "date": "1990-06-14", "time": "8:42" }, { "name": "PWBROWSE @R", "size": 19804, "date": "1990-06-14", "time": "8:49" }, { "name": "PWBUTILS @P", "size": 8399, "date": "1990-06-14", "time": "8:43" }, { "name": "PWBUTILS @R", "size": 10569, "date": "1990-06-14", "time": "8:50" }, { "name": "QH @P", "size": 38991, "date": "1991-02-07", "time": "10:48" }, { "name": "QH @R", "size": 44017, "date": "1991-02-07", "time": "10:49" } ] } ], "volume": "COBOL450" }, "6": { "dirs": [ { "path": "/", "files": [ { "name": "COBOL1 HLP", "size": 234911, "date": "1991-06-28", "time": "12:51" }, { "name": "CV @LP", "size": 246240, "date": "1990-09-06", "time": "17:17" }, { "name": "H2CPY @XE", "size": 47145, "date": "1991-06-28", "time": "11:13" }, { "name": "LINK @LP", "size": 85848, "date": "1991-03-15", "time": "11:09" }, { "name": "PWB @LP", "size": 343614, "date": "1991-06-28", "time": "12:51" }, { "name": "PWB2 HLP", "size": 32752, "date": "1991-06-28", "time": "12:51" }, { "name": "QH @LP", "size": 22968, "date": "1990-07-22", "time": "9:22" } ] } ], "volume": "COBOL450" } }, "desc_file": "README.DOC", "desc_text": "\r\n\t\t\t README.DOC File\r\n\r\n\t\t Release Notes for the Microsoft(R) COBOL\r\n\t\t Professional Development System\r\n\t\t\t Version 4.5\r\n\r\n\t\t (C) Copyright Microsoft Corporation, 1991\r\n\r\n This document contains essential information for version 4.5 of the\r\n Microsoft COBOL Professional Development System for MS-DOS(R) and the\r\n Microsoft Operating System/2 (MS(R) OS/2(R)). The information in this\r\n document is more up to date than that in the manuals.\r\n\r\n Microsoft improves its languages documentation at the time of reprinting,\r\n so some of the information in this file may already be included in your\r\n manuals.\r\n\r\n\r\n NEW FEATURES\r\n\r\n o Support for Windows 3.0\r\n\r\n The following types of programs are supported under Windows 3.0 :\r\n\r\n - Existing DOS applications can be linked with a new runtime library\r\n\t(COBAPIDW) to produce an application that runs under Windows.\r\n\r\n - Programs that call the Windows API can now be written in \r\n\tCOBOL. Note that if you do not have the Windows Software \r\n\tDevelopment Kit (SDK) and plan to create true COBOL Windows\r\n\tapplications by calling the Windows API directly, you may be\r\n\tinterested in using the Dialog Editor from the SDK. The Dialog\r\n\tEditor is available through PSS by calling 637-7096.\r\n\r\n - Dynamic-link libraries that can be called from programs written\r\n\tin other programming languages can be written in COBOL.\r\n\r\n o Intrinsic Functions\r\n\r\n The 1989 Addendum to the ANSI 85 COBOL Standard introduced a set of\r\n intrinsic functions. These functions are fully supported in\r\n Microsoft COBOL 4.5. Functions are provided for Trigonometric,\r\n Financial, Statistical and String handling.\r\n\r\n o Floating Point\r\n\r\n COMP-1 (32 bit Real) and COMP-2 (64 bit Real) data types have been\r\n added to this release of COBOL. The syntax support is the same as\r\n defined for IBM OSVS COBOL and IBM VS COBOL II, and an Intel Floating\r\n Point Co-Processor will be used if available.\r\n\r\n o Table Sort\r\n\r\n The SORT verb can now apply to a Data Division table, which will be\r\n sorted in place.\r\n\r\n o EXIT PERFORM\r\n\r\n Control of program flow is enhanced with a new EXIT PERFORM statement.\r\n\r\n o 'IF 78-level DEFINED' syntax for conditional compilation\r\n\r\n o Support for X/Open XPG3 COBOL definition\r\n\r\n o Compilation up to 10% faster\r\n\r\n o General performance improvements in generated code\r\n\r\n o Save and Restore Environment enables you to save the break-points and\r\n monitors from one Animator session and reload them next time.\r\n\r\n o Breakpoint when data value changes.\r\n\r\n o Monitoring a subscripted item will follow a changing subscript.\r\n\r\n o Data compression\r\n\r\n You can supply your own data compression routines, which can be\r\n tuned to the data that will be in the file.\r\n\r\n o OS/2 Database Manager (SQL) enhancements\r\n\r\n Support for: qualified host variables; more than 100 host variables in\r\n one SQL statement; EXEC SQL WHENEVER SQLWARNING.\r\n\r\n o Screens index program\r\n\r\n The Screens program will generate an index program which can be used\r\n for simple data entry applications.\r\n\r\n\r\n NEW DIRECTIVES\r\n\r\n These are the new compiler directives introduced in this product:\r\n\r\n ALIAS Subscripts\r\n BROWSE Create .SBR file\r\n CHECKDIV Allow divide by zero\r\n DEFAULTCALLS CALL convention\r\n DETECTLOCK Detect record locks\r\n DLL DLL or EXE\r\n FLAGAS Show flags as errors etc.\r\n HIDEMESSAGE Set message to hide\r\n INFORETURN Info msg return value\r\n INTLEVEL Portability level\r\n LOCKTYPE Read locked records\r\n MF(7) Micro Focus COBOL syntax\r\n SQLDB2 Mainframe compatibility\r\n SQLFORMAT Define date format\r\n SQLPROT Protect database\r\n WRITETHROUGH Unbuffered writes\r\n XOPEN X/Open\r\n\r\n\r\n THE COBOL SOFTWARE\r\n\r\n Compatibility with Previous Releases\r\n ====================================\r\n This product is generally compatible with previous releases, However,\r\n there are some differences. These are described in the ASCII text file,\r\n CBL-CMPT.DOC, supplied with this product. Before you use this product with\r\n programs created with earlier versions, we recommend that you read\r\n CBL-CMPT.DOC.\r\n\r\n\r\n Restrictions in the COBOL Software\r\n ==================================\r\n o Cooperative Animation only allows 4 breakpoints to be set.\r\n\r\n o In general, the components in this product support the High\r\n Performance File System complex filenames. However, the directory\r\n facility in some components will not work correctly when complex names\r\n are present. Also, names are restricted to a maximum of 65 characters.\r\n\r\n o NODYNAM currently impacts both CALL literal and CALL identifier. To\r\n get mainframe-type link-edit, use NOLITLINK with DYNAM and LITLINK\r\n with NODYNAM when compiling to OBJ.\r\n\r\n o The ANIMATOR Do command will not work with:\r\n\r\n - the CHAIN verb when parameters are supplied\r\n - CALL procedure-pointer\r\n - CALL .... BY VALUE\r\n - CANCEL of nested program\r\n - EXIT PERFORM/PARAGRAPH/SECTION\r\n - intrinsic functions.\r\n\r\n o The program-id of a called subprogram must be the same as the name\r\n used for the .OBJ file created by the compiler. Otherwise, a new copy\r\n will be loaded whenever the program is called.\r\n\r\n o Under OS/2 you cannot redirect input to the compiler or Animator.\r\n\r\n o On OS/2, any DLL that is to be loaded by the shared run-time that is\r\n not specified with a path must exist on a path given in the COBDIR\r\n environment variable, as well as on the OS/2 LIBPATH.\r\n\r\n o EXTERNAL data items are limited to a maximum of 64K bytes each.\r\n\r\n o The DISPLAY UPON PRINTER syntax does not work on OS/2.\r\n\r\n o Any computation which has an intermediate result greater than 18\r\n digits may give an incorrect final result. This will affect arithmetic\r\n expressions such as those used in COMPUTE statements.\r\n\r\n o Floating-point data is currently not supported in QuickWin applications.\r\n\r\n o When interfacing with Microsoft C programs, the following C graphics\r\n library routines should not be called as this will corrupt the COBOL\r\n environment:\r\n\r\n - _outtext\r\n - _outmem\r\n - _floodfill\r\n - any routine that uses floodfill where you specify the\r\n\t _GFILLINTERIOR option (namely _ellipse and _pie)\r\n\r\n o You should not use cross-session animation on a network server since\r\n this can prevent cross-session animation operating on other machines\r\n on the network.\r\n\r\n o You cannot have more than ten files in the USING or GIVING phrase of a\r\n MERGE statement.\r\n\r\n o In VS COBOL II Releases 1 and 2, and OS/VS COBOL, the \"PERFORM stack\"\r\n is preserved between calls to a program. Thus, on re-entry to the\r\n program, the PERFORM state will be as it was when the program was last\r\n exited. This means that the code to return to the PERFORM statement\r\n which exists at the end of any piece of code that had been performed\r\n but had not exited when the program itself was exited will remain\r\n active, and may cause unexpected program flow when the program is\r\n re-entered.\r\n\r\n This COBOL behaves the same way as VS COBOL II Release 3 and\r\n initializes the PERFORM stack each time a program is called\r\n irrespective of the existence of the VSC2(1), VSC2(2) or OSVS\r\n directives.\r\n\r\n o When interfacing with a C program, floating point items may only be\r\n passed as BY REFERENCE parameters, not as BY VALUE or BY CONTENT\r\n parameters.\r\n\r\n\r\n\r\n Restrictions in Related Software\r\n ================================\r\n\r\n Novell(R) network\r\n -----------------\r\n o When sharing files across a Novell network, it is essential that all\r\n the workstations using the network are configured so that they do not\r\n use local buffering (CACHE DATA BUFFERING). Failure to do this may\r\n result in loss of data.\r\n\r\n Novell version 2.0A, and prior to 2.15 are all configured with local\r\n buffering on by default. To disable this buffering, in version 2.0A\r\n you require a patch from Novell. In other versions, insert the line:\r\n\r\n\t CACHE BUFFERS = 0\r\n\r\n into the file SHELL.CFG on each workstation.\r\n\r\n o Use of the NETBIOS option on a Novell network can cause loss of data\r\n on files shared across the network. (NETBIOS is activated by entering\r\n the NETBIOS command after connecting to the network. To avoid loss of\r\n data, do not use this command.)\r\n\r\n o When creating multi-user programs to run on a Novell network, it is\r\n necessary to ensure that all disk mapping assignments are beyond E:.\r\n i.e. do not use assignments A: thru E:.\r\n\r\n\r\n\r\n DOCUMENTATION\r\n\r\n On-disk Documentation\r\n =====================\r\n The disks supplied with this product contain additional documentation.\r\n\r\n The following on-disk documents should be regarded as additional chapters,\r\n or additions to chapters, in your Operating Guide:\r\n\r\n MFCOMPAT.DOC - Compatibility with Micro Focus COBOL\r\n OPTIMIZE.DOC - Creating Optimized Programs\r\n TIMEOUT.DOC - Timeout Support in ACCEPT\r\n\r\n\r\n Omissions and Errors\r\n ====================\r\n This section contains information that is either incorrect or missing from\r\n your Microsoft COBOL manuals. This information is organized according\r\n to the manual in which it appears. You may want to mark the changes in\r\n your manuals.\r\n\r\n\r\n Language Reference\r\n ------------------\r\n Page 5-24. There is an optional phrase within the WITH DUPLICATES phrase\r\n of the ALTERNATE RECORD KEY clause of the SELECT statement for an indexed\r\n file. Its syntax is:\r\n\r\n SUPPRESS [WHEN] { ZEROS }\r\n\t\t\t{ SPACES }\r\n\t\t\t{ [ALL] literal }\r\n\r\n SUPPRESS, ZEROS, SPACES, and ALL are all keywords.\r\n\r\n\r\n Page 5-32. Insert a new General Rule (13a) between rules 13 and 14:\r\n\r\n \"If a file is defined as EXTERNAL and the operating system file name is\r\n assigned by means of a file name (for example, by use of either the\r\n DYNAMIC directive or keyword, using data-name-1 in the SELECT/ASSIGN\r\n statement, or using format 2 of the VALUE OF phrase of an FD), then the\r\n following rules should be followed:\r\n\r\n 1) An identifier with the same name should be used to contain the\r\n physical file name in all programs which reference the file.\r\n\r\n 2) Each definition of the identifier which contains the physical file\r\n name should also contain the EXTERNAL attribute.\r\n\r\n Any violation of these rules will not be detected at compile time.\r\n However, if any program in the run-unit violates these rules, the results\r\n at run time are unpredictable. That is, they may or may not execute as\r\n expected.\"\r\n\r\n\r\n Page 5-83. After General Rule 27, add:\r\n\r\n \"28. The I-O phrase permits the opening of a file for both input and\r\n output operations (except for file with ORGANIZATION LINE SEQUENTIAL). If\r\n the file does not exist it will be created and used as an empty file for\r\n input unless NOT OPTIONAL was specified in the SELECT statement. An\r\n attempt to WRITE it will cause an error.\"\r\n\r\n \r\n Page 5-120. Add a new General Rule 13a:\r\n\r\n \"The phrases ADVANCING PAGE and END-OF-PAGE must not both be specified in\r\n a single WRITE statement.\"\r\n\r\n\r\n Page 10-11, replace the entire second boxed extension with the following:\r\n\r\n \"If a file is defined as EXTERNAL and the operating system file name is\r\n assigned by means of a file name (for example, by use of either the\r\n DYNAMIC directive or keyword, using data-name-1 in the SELECT/ASSIGN\r\n statement, or using format 2 of the VALUE OF phrase of an FD), then the\r\n following rules should be followed:\r\n\r\n 1) An identifier with the same name should be used to contain the\r\n physical file name in all programs which reference the file.\r\n\r\n 2) Each definition of the identifier which contains the physical file\r\n name should also contain the EXTERNAL attribute.\r\n\r\n Any violation of these rules will not be detected at compile time.\r\n However, if any program in the run-unit violates these rules, the results\r\n at run time are unpredictable. That is, they may or may not execute as\r\n expected.\"\r\n\r\n\r\n Page 15-34, General Rule 4 of the FOREGROUND-COLOR clause. In the first\r\n sentence, change \"contains a BACKGROUND-COLOR clause\" to \"contains a\r\n FOREGROUND-COLOR clause\".\r\n\r\n\r\n Page 16-43, before the description of the ORD-MAX function insert a\r\n description of the ORD-MIN function. Its description is exactly the same\r\n as that of ORD-MAX, but replacing \"ORD-MAX\" by \"ORD-MIN\", \"maximum\" by\r\n \"minimum\" and \"greatest\" by \"least\" everywhere that they occur.\r\n\r\n\r\n Operating Guide\r\n ---------------\r\n\r\n General\r\n\r\n A number of the executable files are supplied with .PIF files for use\r\n with Microsoft Windows 3.0 or later. Using these .PIF files, the\r\n components of this system can be run as Windows applications, and can\r\n be added to a group for direct execution from Program Manager. From\r\n the DOS command line, these applications can be invoked using the\r\n command\r\n\r\n WIN prog.PIF\r\n\r\n where prog is the name of the relevant component.\r\n\r\n Chapter 9 (Packaging and Shipping Applications):\r\n\r\n There is a module RMSTAT.OBJ, which must be linked into your\r\n application if you want to get RM file statuses.\r\n\r\n Chapter 19 (SQL):\r\n\r\n There is no support for using COMP-1 items with SQL.\r\n\r\n Chapter 34 (Converting C Header Files with H2CPY)\r\n\r\n There is a utility called SPLIT78. It splits the constants file\r\n produced by H2CPY into several files.\r\n\r\n It uses the first set of characters before the first hyphen to name\r\n the files. For example, if OS2.78 contains:\r\n\r\n\t 78 ABB-COLOR VALUE H\"01\".\r\n\t 78 ABB-BACK-COLOR VALUE H\"02\".\r\n\t 78 ABB-MIX-MODE VALUE H\"04\".\r\n\t 78 ABB-BACK-MIX-MODE VALUE H\"08\".\r\n\t 78 ABB-SET VALUE H\"10\".\r\n\t 78 ABB-SYMBOL VALUE H\"20\".\r\n\t 78 ABB-REF-POINT VALUE H\"40\".\r\n\r\n\t 78 AF-CHAR VALUE H\"01\".\r\n\t 78 AF-VIRTUALKEY VALUE H\"02\".\r\n\t 78 AF-SCANCODE VALUE H\"04\".\r\n\t 78 AF-SHIFT VALUE H\"08\".\r\n\t 78 AF-CONTROL VALUE H\"10\".\r\n\t 78 AF-ALT VALUE H\"20\".\r\n\t 78 AF-LONEKEY VALUE H\"40\".\r\n\t 78 AF-SYSCOMMAND VALUE H\"0100\".\r\n\t 78 AF-HELP VALUE H\"0200\".\r\n\r\n\t 78 HWND-DESKTOP VALUE 1.\r\n\t 78 HWND-OBJECT VALUE 2.\r\n\t 78 HWND-TOP VALUE 3.\r\n\t 78 HWND-BOTTOM VALUE 4.\r\n\t 78 HWND-THREADCAPTURE VALUE 5.\r\n\t 78 HWND-PARENT VALUE 0.\r\n\r\n then typing the command, \"SPLIT78 OS2.78\" will create 3 files:\r\n\r\n\t\t ABB.78\r\n\t\t AF.78\r\n\t and HWND.78\r\n\r\n The contents of OS2.78 will be unaffected. If any of the output files\r\n already exist they will be extended, so make sure your working\r\n directory contains no \".78\" files other than the source file before\r\n you enter the command SPLIT78.\r\n\r\n Appendix B (Compiler Directives):\r\n\r\n The default for the directive CHECKDIV is NOCHECKDIV, not CHECKDIV as\r\n stated in the manuals.\r\n\r\n There is an additional directive FLAGCD. Its syntax is [NO] FLAGCD.\r\n When it is set, selecting flagging for the dialect SAA, ANS85, OSVS or\r\n VSC2 release 2 or 3 will not only flag syntax outside that dialect,\r\n but will also flag any directive settings that cause behavior\r\n incompatible with that dialect. The default is NOFLAGCD.\r\n\r\n There are two additional directives, HOST-NUMCOMPARE and ZWB which\r\n direct the results of comparing a numeric display field with SPACE,\r\n \" \" and \"0\". The directives are provided to ensure compatibility with\r\n mainframe COBOL operation. If NOHOST-NUMCOMPARE or ZWB are specified,\r\n the results of comparing are as now. If HOST-NUMCOMPARE and NOZWB are\r\n specified together, the results are the exact opposite. Hence, if\r\n PIC-9 contains spaces, the results of the comparison with SPACES, \" \"\r\n and \"0\" are:\r\n\t\t\t\t PIC-9 = SPACE PIC-9 = \" \" PIC-9 = \"0\"\r\n NOZWB and HOST-NUMCOMPARE TRUE TRUE FALSE\r\n ZWB or NOHOST-NUMCOMPARE FALSE FALSE TRUE\r\n\r\n These results are the same independent of the setting of the F\r\n run-time switch.\r\n\r\n There is an additional generator directive SIGNCOMPARE. Its syntax is\r\n [NO] SIGNCOMPARE. When it is set in an EBCDIC program, it changes the\r\n way some numeric comparisons are performed so that, for example, an\r\n unsigned data item containing 1234 is equal to a signed data item\r\n containing +1234. This does, however, cause these comparisons to be much\r\n less efficient. The default is NOSIGNCOMPARE. If you are using an\r\n add-on product, note that the behavior in intermediate code is the\r\n same as you get in generated code with SIGNCOMPARE; thus with the\r\n default setting of this directive, the behavior in intermediate code\r\n and generated code is different.\r\n\r\n There is an error in the example given for STICKY-LINKAGE. The name\r\n of the data item referenced in the Procedure Division code should be\r\n HOURLY-RATE, not RATE.\r\n\r\n There is an additional directive ZEROLENGTHFALSE. Its syntax is\r\n [NO] ZEROLENGTHFALSE. When it is set, all class tests of zero length\r\n group items return false. Otherwise they all return true. The default\r\n is NOZEROLENGTHFALSE. For conformance to ANSI and SAA you must set\r\n ZEROLENGTHFALSE.\r\n\r\n Appendices C and D (COBOL System Library Routines)\r\n\r\n The following passage is relevant to both these appendices:\r\n\r\n The COBOL system library routines generally supply features that\r\n cannot be accessed using COBOL syntax, such as operating system\r\n functions. Under OS/2, many of the features can be accessed directly\r\n by calling the OS/2 API functions. However, this ties the program to\r\n OS/2, with DOS capability available only for those API calls which are\r\n part of the Family API, and only then when the program is bound.\r\n\r\n Parameters to the call-by-name routines can be defined anywhere\r\n provided they do not cross a segment boundary. (See the CHIP \"16\" and\r\n FLAG-CHIP compiler directives.) Parameters to the call-by-number\r\n routines must not be defined in the Linkage Section or Local-Storage\r\n Section of your program, and must be in the first 64K of the Data\r\n Division.\r\n\r\n\r\n Error Messages\r\n --------------\r\n\r\n Page 2-2. The reference to the E switch is only appropriate if you have\r\n the Toolset or Workbench add-on products. Consequently, the effect of the\r\n E switch is not documented in the Operating Guide as stated.\r\n\r\n\r\n Pocket Guide\r\n ------------\r\n\r\n Reserved Words List\r\n\r\n The words SECONDS is shown as a reserved word. This is incorrect." }