I'll look into it more as soon as I get a chance. In the meantime, here
is some code I wrote to append strings to build large arrays by
sequentially appending substrings. This is the format used by th VistA
HL7 package to represent long strings and it is NOT the same as the
format of WP fields, but the same idea can be used here.
APPEND(PRCBUF,PRCSTR,PRCLIM) ;
N HASCHD,LAST,VAL,L1,L2,L3
S:+$G(PRCLIM)'>0 PRCLIM=245 ;default
S HASCHD=$S($D(@PRCBUF)'<10:1,1:0)
I HASCHD S LAST=$O(@PRCBUF@(" "),-1)
S L1=$S(HASCHD:$L($NA(@PRCBUF@(LAST))),1:$L(PRCBUF))
S L2=$L(PRCSTR)
I HASCHD S VAL=$G(@PRCBUF@(LAST))
I 'HASCHD S VAL=$G(@PRCBUF)
S L3=$L(VAL)
I L1+L2+L3<PRCLIM D
.S:'HASCHD @PRCBUF=VAL_PRCSTR
.S:HASCHD @PRCBUF@(LAST)=VAL_PRCSTR
I L1+L2+L3'<PRCLIM D
.S LAST=$S(HASCHD:LAST+1,1:1)
.S @PRCBUF@(LAST)=PRCSTR
Q
--- Maury Pepper <[EMAIL PROTECTED]> wrote:
> awk!
>
> ----- Original Message -----
> From: "Kevin Toppenberg" <[EMAIL PROTECTED]>
> To: "Hardhats Sourceforge" <[email protected]>
> Sent: Friday, February 25, 2005 10:24 AM
> Subject: [Hardhats-members] Grrrr!!! FTG^%ZISH looses data for
> strings>255 characters
>
>
> > OK, I'm frustrated.
> >
> > My transcriptionists are using a wordprocessors that
> > automatically wrap lines. Thus a paragraph is stored
> > in a text file as one long line. This is often longer
> > than 255 characters. I was under the impression that
> > FTG^%ZISH was aware of this limitation and would wrap
> > the line when uploading strings.
> >
> > It doesn't.
> >
> > This means that I now have many progress notes that
> > have been erroneously truncated.
> >
> > Any thoughts?
> >
> > Kevin
> >
> >
> >
> >
> >
> > __________________________________
> > Do you Yahoo!?
> > Yahoo! Mail - You care about security. So do we.
> > http://promotions.yahoo.com/new_mail
> >
> >
> > -------------------------------------------------------
> > SF email is sponsored by - The IT Product Guide
> > Read honest & candid reviews on hundreds of IT Products from real
> users.
> > Discover which products truly live up to the hype. Start reading
> now.
> > http://ads.osdn.com/?ad_id=6595&alloc_id=14396&op=click
> > _______________________________________________
> > Hardhats-members mailing list
> > [email protected]
> > https://lists.sourceforge.net/lists/listinfo/hardhats-members
>
>
> -------------------------------------------------------
> SF email is sponsored by - The IT Product Guide
> Read honest & candid reviews on hundreds of IT Products from real
> users.
> Discover which products truly live up to the hype. Start reading now.
> http://ads.osdn.com/?ad_ide95&alloc_id396&op=click
> _______________________________________________
> Hardhats-members mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/hardhats-members
>
=====
A practical man is a man who practices the errors of his forefathers.
--Benjamin Disraeli
====
Greg Woodhouse
[EMAIL PROTECTED]
[EMAIL PROTECTED]
-------------------------------------------------------
SF email is sponsored by - The IT Product Guide
Read honest & candid reviews on hundreds of IT Products from real users.
Discover which products truly live up to the hype. Start reading now.
http://ads.osdn.com/?ad_id=6595&alloc_id=14396&op=click
_______________________________________________
Hardhats-members mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/hardhats-members
