IF isnull (as_pathname) THEN return -1
IF isnull (abl_blob) THEN return -1
IF as_pathname = "" THEN return -1
li_FileNum = FileOpen(as_pathname, StreamMode!, Write!, LockWrite!,
Replace!)
IF li_FileNum = -1 THEN return -2
IF isnull (li_filenum) THEN return -2
ll_len = Len (abl_blob)
ll_pos = 1 //position on the blob
DO WHILE ll_len > 0
lbl_temp = BlobMid (abl_blob, ll_pos, 32765)
li_return = FileWrite (li_FileNum, lbl_temp)
IF IsNull (li_return) THEN return -3 //error happens
IF li_return = -1 THEN return -3 //error happens
ll_len = ll_len - li_return
ll_pos = ll_pos + li_return
LOOP
li_return = FileClose (li_fileNum)
IF IsNull (li_return) THEN return -4 //error happens
IF li_return = -1 THEN return -4 //error happens
return 1
I am using:
Sybase ASE 12.5.1 build 1823(EBF 11426).
HP9000-879 (64-bit)
HP-UX 11.0
I have done some experimenting from version 9 to 10 and notice that the blob
length is double the size in 10.
In PB 9 ll_len = 244
In PB 10 ll_len = 488
Any help would be appreciated.
Let us know,
Terry [TeamSybase] and Sequel the techno-kitten
On 22 Nov 2005 11:18:23 -0800,
in sybase.public.powerbuilder.general
*********************************
Click once a day to help the hungry
http://www.thehungersite.com
*********************************
User Manual
===========
TeamSybase <> Sybase employee
Forums = Peer-to-peer
Forums <> Communication with Sybase
IsNull (AnswerTo (Posting)) can return TRUE
Forums.Moderated = TRUE, so behave or be deleted
*********************************
Sequel's Sandbox: http://www.techno-kitten.com
Home of PBL Peeper, a free PowerBuilder Developer's Toolkit.
Version 3.0.02 now available at the Sandbox
PB Futures updated Nov 14/2005
See the PB Troubleshooting & Migration Guides at the Sandbox
^ ^
o o
=*=
"Terry Voth" <seq...@techno-kitten.com> wrote in message
news:43837bd5$1@forums-1-dub...
ls_temp = string (abl_blob,EncodingANSI! )
"Terry Voth" <seq...@techno-kitten.com> wrote in message
news:43837bd5$1@forums-1-dub...