text TO lcSql noshowwith
TEXT TO sqltxt noshow pretext 15 TEXTMERGEand you won't have to use the
sqltxt = CHRTRAN(lcSql, CHR(13), CHR(10), '')the PRETEXT 15 parameter does it for you.
>lcSql = "" >text TO lcSql noshow >select myPrimaryId, mySecondayId,cDtTitle, > cEnTitle, cDtMaterial, cEgMaterial,ceDtFormat, ceEgFormat, > coalesce(DtPrtcopy,'') as DtPrtcopy, > coalesce(EgPrtcopy,'') as EgPrtcopy, > coalesce(DtSPrice,'') as DtSPrice > from HORSART_WORKS >endtext >sqltxt = CHRTRAN(lcSql, CHR(13), CHR(10), '') >lcResult = sqlexec(lnRet, lcSql,"curHorsart_Works") >IF lcResult < 0 > * Error >ENDIF >>>
>>sqltxt='' >>text TO sqltxt noshow >> sqlexec(lnRet,"select myPrimaryId, mySecondayId,cDtTitle, >> cEnTitle, cDtMaterial, cEgMaterial,ceDtFormat, ceEgFormat, >> coalesce(DtPrtcopy,'') as DtPrtcopy, >> coalesce(EgPrtcopy,'') as EgPrtcopy, >> coalesce(DtSPrice,'') as DtSPrice >> from HORSART_WORKS","curHorsart_Works") >>endtext >>sqltxt = strtran(sqltxt,chr(10), '') >>sqltxt = strtran(sqltxt,chr(13), '') >>&sqltxt >>>>cursor gets loaded.
>>sqltxt='' >>text TO sqltxt noshow >> sqlexec(lnRet,"select myPrimaryId, mySecondayId,cDtTitle, >> cEnTitle, cDtMaterial, cEgMaterial,ceDtFormat, ceEgFormat, >> coalesce(DtPrtcopy,'') as DtPrtcopy, >> coalesce(EgPrtcopy,'') as EgPrtcopy, >> coalesce(DtSPrice,'') as DtSPrice, >> coalesce(EgSPrice,'') as EgSPrice >> from HORSART_WORKS","curHorsart_Works") >>endtext >>sqltxt = strtran(sqltxt,chr(10), '') >>sqltxt = strtran(sqltxt,chr(13), '') >>&sqltxt >>>>will result in Error : "Command contains unrecognized phrase/keyword"