home *** CD-ROM | disk | FTP | other *** search
/ Black Box 4 / BlackBox.cdr / lan / xql211.arj / XQLP.211 < prev    next >
Text File  |  1991-03-21  |  8KB  |  503 lines
  1. .       patch #20
  2. .      xDescribe (option 3) does not return secondary field count if the
  3. .      join type is cartesion product join.
  4. a cs:100
  5. mov ax,cs
  6. add ax, 1000
  7. mov ds, ax
  8.  
  9. r sp
  10. 110
  11. g =100 107
  12. e cs:100 4d 5a 20 00 67 01 ec 0b 00 03 a2 00 ff ff e4 29
  13.  
  14. a ds:d0fb
  15. mov     bx,[bp-16]
  16. mov     bx,[bx]
  17. mov     [bp-4],bx
  18. mov     bx,[bp-16]
  19. mov     ax,[bx+2]
  20. mov     [bp-2],ax
  21. add     word ptr [bx],2
  22. mov     bx,[bp-82]
  23. add     word ptr [bx],2
  24. mov     ax,[bx]
  25. cmp     ax,[bp-84]
  26. jl      d123
  27. mov     word ptr [bp-c],d2
  28. mov     bx,[bp-e]
  29. mov     si,[bx+2d]
  30. cmp     byte ptr [bx+4],2
  31. je      d154
  32. cmp     word ptr [bp-c],0
  33.  
  34. .       end of patch #20
  35.  
  36.  
  37. .       patch #22 - ddCreate with record sizes 512 and 511 return status 28
  38.  
  39. a cs:9ad0
  40. ;patch 22 - in ddextend
  41. mov bx, cs
  42. sub bx, 63f
  43. push bx
  44. mov bx, 242
  45. push bx
  46. retf
  47. nop
  48. nop
  49.  
  50. a cs:3342
  51. ;patch 22
  52. MOV     BX,CS
  53. ADD     BX,63f ; diff to seg of ddextend
  54. PUSH    BX
  55. MOV     BX,5ee ; offset to L63
  56. PUSH    BX
  57. mov     ax,[bp-1a]
  58. add     ax,6
  59. cmp     ax,[bp-16]
  60. jle     335e
  61. add     byte ptr [bp-15],2
  62. jmp     3353
  63. retf
  64.  
  65. .       end of patch #22
  66. .
  67. .       patch #23  Autoinc field on INSERT  INTO subquery
  68. a b75a
  69. push  cs
  70. mov   bx,cs
  71. sub   bx,84a
  72. push  bx
  73. mov   bx,25f
  74. push  bx
  75. retf
  76. nop
  77. nop
  78.  
  79. a 335f
  80. cmp   al,2
  81. jne   3368
  82. mov   bx,23f
  83. jmp   3392
  84. cmp   al,5
  85. je    3374
  86. cmp   al,6
  87. je    3374
  88. cmp   al,8
  89. jne   3379
  90. mov   bx,274
  91. jmp   3392
  92. cmp   al,9
  93. jne   3382
  94. mov   bx,388
  95. jmp   3392
  96. cmp   al,f
  97. je    338a
  98. cmp   al,1
  99. jne   338f
  100. mov   bx,1cc
  101. jmp   3392
  102. mov   bx,3aa
  103. push  bx
  104. retf
  105.  
  106. .       end of patch #23
  107. .
  108. .       patch #24  status 282 from xValidate for ZSTRING to be checked
  109. .                  which is smaller than size indicated in data buffer size
  110. .                  parameter
  111.  
  112. a cs:ea74
  113. mov  bx, cs
  114. sub  bx, 0b0b
  115. push bx
  116. mov  bx, 294
  117. push bx
  118. retf
  119. nop
  120. mov     bx,[bp-38]
  121.  
  122. a cs:3394
  123. ;patch 24
  124. MOV     BX,CS
  125. ADD     BX,0b0b ; diff to seg of validdata
  126. PUSH    BX
  127. MOV     BX,8d1  ; offset to L13 - 3
  128. PUSH    BX
  129. mov     bx, [bp-38]
  130. cmp     byte ptr [bx+6], b
  131. jne     33bc
  132. mov     ax, word ptr [bp - 3a]  ; call strlen
  133. push    cs
  134. mov     bx, 2bc
  135. push    bx
  136. mov     bx, cs
  137. add     bx, 27a3
  138. push    bx
  139. mov     bx, 5a
  140. push    bx
  141. retf
  142. cmp     byte ptr [bx+6], c
  143. jne     33c3
  144. dec     ax
  145. retf
  146.  
  147. .       end of patch #24
  148.  
  149. .           patch #25 - When searching for all values in a ZSTRING field
  150. .                       on a BEGINS WITH restriction all records that
  151. .                       begin with all but the last chracter in the
  152. .                       specified string are returned.
  153. .                       If want records that begin with 'abc' then all
  154. .                       records beginning with 'ab' are returned.
  155.  
  156. a cs:100
  157. mov ax,cs
  158. add ax, 1000
  159. mov ds, ax
  160.  
  161. r sp
  162. 110
  163. g =100 107
  164. e cs:100 4d 5a 20 00 67 01 ec 0b 00 03 a2 00 ff ff e4 29
  165.  
  166. a ds:f780
  167. mov  bx, cs
  168. sub  bx, 1c0a
  169. push bx
  170. mov  bx, 2f4
  171. push bx
  172. retf
  173. nop
  174.  
  175. a cs:33f4
  176. ;patch 25
  177. MOV     BX,CS
  178. ADD     BX,1c0a ; diff to seg of cmpValues
  179. PUSH    BX
  180. MOV     BX,5ed  ; offset to L79
  181. PUSH    BX
  182. test   dx,dx
  183. jz     340f
  184. cmp    dx,ax
  185. ja     340f
  186. mov    bx, [bp-16]
  187. add    bx, dx
  188. dec    bx
  189. inc    byte ptr [bx]
  190. retf
  191.  
  192. .       end of patch #25
  193. .       ========================================
  194. .       patch #26 *** OPTIONAL ***
  195. .
  196. .       Allows use of european format of decimal comma instead of decimal
  197. .       point.
  198. .
  199. .       This patch is NOT applied unless this patch file is modified.
  200. a cs:100
  201. mov ax,cs
  202. add ax, 2000
  203. mov ds, ax
  204.  
  205. r sp
  206. 110
  207. g =100 107
  208. e cs:100 4d 5a 20 00 67 01 ec 0b 00 03 a2 00 ff ff e4 29
  209.  
  210. . DELETE THE SEMI-COLON FROM THE BEGINNING OF THE NEXT LINE TO ENABLE PATCH.
  211. ;e ds:bf32 2c
  212.  
  213. .       end of patch #26
  214.  
  215. .       patch #29 Fixes problems removing supplemental indexes
  216. a cs:a251
  217. mov al,20
  218. mov dx,si
  219. mov bx,[bp-30]
  220.  
  221. a cs:a1e6
  222. push ax
  223. nop
  224.  
  225. a cs:a264
  226. mov di,[si]
  227. mov [bp-2],di
  228.  
  229. a cs:a28f
  230. cmp di,[bp-2]
  231. jne a2bb
  232. test byte ptr [bp-6], 80
  233. je a2b6
  234.  
  235. a cs:a2bb
  236. pop ax
  237. nop
  238.  
  239. .       end of patch #29
  240.  
  241. .       patch #30  prevents workstation from crashing when restrict
  242. .                  contains equal comparisons of string fields
  243. .                  of different sizes from different files.
  244. a cs:100
  245. mov ax,cs
  246. add ax, 1000
  247. mov ds, ax
  248.  
  249. r sp
  250. 110
  251. g =100 107
  252. e cs:100 4d 5a 20 00 67 01 ec 0b 00 03 a2 00 ff ff e4 29
  253. a ds:531d
  254. mov al, [di+8]
  255.  
  256. a ds:534d
  257. cmp word ptr [bp+e], 0
  258. jne 535b
  259. nop
  260. nop
  261. nop
  262. nop
  263. nop
  264.  
  265. a ds:5338
  266. ja 535b
  267. cmp dx,bx
  268. jne 535b
  269. nop
  270.  
  271. .       end of patch #30
  272.  
  273.  
  274. .           patch #32   - *** OPTIONAL ***
  275. .                       - xValidate causing memory to be over written
  276. .                         when an invalid field value is given and a view
  277. .                         has not yet been created
  278. .                       - if this patch is applied, a view is created
  279. .                         and an invalid field value is given then the
  280. .                         XQLStatus will not provide the field name associated
  281. .                         with the invalid value
  282. .
  283. .
  284. .       This patch is NOT applied unless this patch file is modified.
  285.  
  286.  
  287. .
  288. .
  289. .  DELETE THE SEMI-COLON FROM THE BEGINNING OF THE FOLLOWING LINES TO
  290. .  ENABLE PATCH.
  291.  
  292. ;a cs:eb33
  293. ;jmp eb45
  294.  
  295. .       end of patch #32
  296.  
  297. .       patch #34 Status 328 on xRestrict
  298. a cs:100
  299. mov ax,cs
  300. add ax, 2000
  301. mov ds, ax
  302.  
  303. r sp
  304. 110
  305. g =100 107
  306. e cs:100 4d 5a 20 00 67 01 ec 0b 00 03 a2 00 ff ff e4 29
  307. a ds:477c
  308. mov ax,cs
  309. push ax
  310. sub ax,2092
  311. push ax
  312. mov ax,2c4
  313. push ax
  314. retf
  315.  
  316. a cs:33c4
  317. MOV     AX,CS
  318. PUSH    AX
  319. MOV     ax,2dc
  320. PUSH    ax
  321. mov     ax,cs
  322. ADD     AX,2092
  323. PUSH    AX
  324. MOV     AX,0CF8
  325. PUSH    AX
  326. MOV     AX,[SI+06]
  327. LEA     DX,[BP-04]
  328. RETF
  329. MOV     DX,AX
  330. CMP     CX,0110
  331. JZ      33ea
  332. CMP     CX,0111
  333. JNZ     33ef
  334. MOV     AX,def
  335. JMP     33f2
  336. MOV     AX,d68
  337. PUSH    AX
  338. RETF
  339.  
  340. .       end of patch #34
  341. .
  342. .       patch #35  EMS conflict between Btrieve and XQL
  343. a 4872
  344. mov  es,bx
  345. mov  ah,49
  346. int  21
  347. es:
  348. mov  bx,[2c]
  349. mov  es,bx
  350. mov  ah,49
  351. int  21
  352. cs:
  353. mov  bx,[12]
  354. cs:
  355. mov  dx,[10]
  356.  
  357. a 3825
  358. cs:
  359. call far [10]
  360.  
  361. a 3622
  362. cs:
  363. call far [10]
  364.  
  365. a 48e3
  366. cmp  al,33
  367. je  48ec
  368. mov  ax,3c6
  369. jmp  493c
  370. mov  ax,[d7e]
  371. mov  es,ax
  372. mov  ax,[ef6]
  373. es:
  374. mov  [12],ax
  375. mov  ax,[eea]
  376. es:
  377. mov  [10],ax
  378.  
  379. .       end of patch #35
  380.  
  381. .       beginning of patch #36 - Owner name ignored by xRecall
  382. a cs:100
  383. mov ax,cs
  384. add ax, 1000
  385. mov ds, ax
  386.  
  387. r sp
  388. 110
  389. g =100 107
  390. e cs:100 4d 5a 20 00 67 01 ec 0b 00 03 a2 00 ff ff e4 29
  391. e ds:a166 90 90
  392. .       end of patch #36
  393. .
  394. .       beginning of patch #37 - xUpdall does not work with BREQUEST
  395. a cs:100
  396. mov ax,cs
  397. add ax, 1000
  398. mov ds, ax
  399.  
  400. r sp
  401. 110
  402. g =100 107
  403. e cs:100 4d 5a 20 00 67 01 ec 0b 00 03 a2 00 ff ff e4 29
  404. a ds:7a7d
  405. mov cx,21
  406. jmp 7a8b
  407.  
  408. .       end of patch #37
  409. .
  410. .       patch #38  *** OPTIONAL ***
  411. .
  412. .   patch to allow XQL to process requests from Windows interface
  413. .
  414. .  DELETE THE SEMI-COLON FROM THE BEGINNING OF THE FOLLOWING LINES TO
  415. .  ENABLE PATCH.
  416. .
  417. ;e cs:4b89 30
  418. .
  419. ;a 35f1
  420. ;jmp  3410
  421. ;cs:
  422.  
  423. ;a 3410
  424. ;cmp  si,6666
  425. ;jne  341c
  426. ;cmp  di,bbbb
  427. ;je   3428
  428. ;cmp  si,5555
  429. ;jne  342a
  430. ;cmp  di,aaaa
  431. ;jne  342a
  432. ;mov  ds,ax
  433. ;mov  si,dx
  434. ;push cs
  435. ;pop  es
  436. ;jmp   35f4
  437.  
  438. .       end of patch #38
  439.  
  440. .       patch #40 Field to field comparisons may not return correct records
  441. a cs:100
  442. mov ax,cs
  443. add ax, 1000
  444. mov ds, ax
  445.  
  446. r sp
  447. 110
  448. g =100 107
  449. e cs:100 4d 5a 20 00 67 01 ec 0b 00 03 a2 00 ff ff e4 29
  450. a ds:4979
  451. mov si,cs
  452. push si
  453. sub si, 1170
  454. push si
  455. mov si, 310
  456. push si
  457. retf
  458.  
  459. a cs:3410
  460. mov cx,[bx+5]
  461. and cx,0040
  462. jne 341e
  463. mov cx,[bx+1]
  464. jmp 3421
  465. mov cx,2
  466. add cx,7
  467. add ax,cx
  468. add bx,cx
  469. dec dx
  470. mov si, 189
  471. push si
  472. retf
  473.  
  474. a ds:53bf
  475. XOR     AX,AX
  476. JMP     53C8
  477. MOV     AL,[DI+08]
  478. XOR     AH,AH
  479. MOV     DI,[BP-16]
  480. MOV     BX,[BX+04]
  481. MOV     [DI],AL
  482. INC     DI
  483. MOV     [DI],BX
  484. INC     DI
  485. INC     DI
  486. MOV     [BP-16],DI
  487. MOV     DI,[BP-10]
  488. MOV     BX,[DI+06]
  489. MOV     DI,[BP-16]
  490. MOV     [DI],BX
  491. ADD     WORD PTR [BP-16],+02
  492. NOP
  493. NOP
  494. NOP
  495.  
  496. .       end of patch #40
  497.  
  498.  
  499. .       END OF PATCH FILE FOR XQLP.EXE
  500. .       DO NOT REMOVE THE NEXT TWO LINES!
  501. w
  502. q
  503.