Fix for DDR2 for Fileman 22.3...

Jim Bell found a bug in the Fileman Delphi Components server side routines, where subfile entries were not correctly retrieved under certain conditions. George Timson gave me these examples: Try this in FOIA Vista: K A,SAM S A("FILE")=19,A("IENS")="9",A(" FIELDS")="10*",A("FLAGS")="E" D GETSC^DDR2(.SAM,.A) ZW SAM SAM(1)="[Data]" That's bad. Where's the 'data'?? Here how it should work: K A,SAM S A("FILE")=19,A("IENS")="9",A("FIELDS")="10*",A("FLAGS")="E" D GETSC^DDR2(.SAM,.A) ZW SAM SAM(1)="[Data]" SAM(2)="19.01^1,9^.01^^XUPROG" SAM(3)="19.01^1,9^2^^" SAM(4)="19.01^1,9^3^^25" SAM(5)="19.01^10,9^.01^^XTMENU" SAM(6)="19.01^10,9^2^^" SAM(7)="19.01^10,9^3^^" SAM(8)="19.01^11,9^.01^^XTCM MAIN" SAM(9)="19.01^11,9^2^^" SAM(10)="19.01^11,9^3^^" SAM(11)="19.01^12,9^.01^^DIUSER" SAM(12)="19.01^12,9^2^^FM" SAM(13)="19.01^12,9^3^^" SAM(14)="19.01^2,9^.01^^XUTIO" SAM(15)="19.01^2,9^2^^" SAM(16)="19.01^2,9^3^^5" SAM(17)="19.01^3,9^.01^^XUSER" SAM(18)="19.01^3,9^2^^" SAM(19)="19.01^3,9^3^^50" SAM(20)="19.01^4,9^.01^^XUMAINT" SAM(21)="19.01^4,9^2^^" SAM(22)="19.01^4,9^3^^20" SAM(23)="19.01^5,9^.01^^XUCORE" SAM(24)="19.01^5,9^2^^" SAM(25)="19.01^5,9^3^^1" SAM(26)="19.01^6,9^.01^^XUTM MGR" SAM(27)="19.01^6,9^2^^" SAM(28)="19.01^6,9^3^^45" SAM(29)="19.01^7,9^.01^^XUSITEMGR" SAM(30)="19.01^7,9^2^^" SAM(31)="19.01^7,9^3^^30" SAM(32)="19.01^8,9^.01^^XU-SPL-MGR" SAM(33)="19.01^8,9^2^^" SAM(34)="19.01^8,9^3^^35" SAM(35)="19.01^9,9^.01^^XUSPY" SAM(36)="19.01^9,9^2^^" SAM(37)="19.01^9,9^3^^40" Sam
like0