Hello Forum:
I want to convert oGv.pnBurialPlotId = 'transtab'+ALLTRIM(STR(lnReturn-1))+'.'+'burialplotid' to the format
oGv.pnBurialPlotId = transtab.burialplotid. How is it done? The code I have doesn't work. I have tried it several ways.
The result I get is in quotes: 'transtab1.burialplotid'
lnReturn = SQLEXEC(oGv.pnConnhandle, 'EXEC MCRevenue.Sundries.TentativeTransferGravePlotSP ?oGv.pnBurialPlotId,?@lnOutput','transtab')
IF lnReturn > 0
IF lnReturn > 1
SELECT 'transtab'+ALLTRIM(STR(lnReturn-1))
oGv.pnBurialPlotId = EVALUATE('transtab'+ALLTRIM(STR(lnReturn-1))+'.'+'burialplotid')
oGv.pnBurialPlotId = EVALUATE('transtab'+ALLTRIM(STR(lnReturn-1))+'.'+'transferdate')
ELSE
SELECT transtab
oGv.pnBurialPlotId = transtab.burialplotid
oGv.pdTransferDate = transtab.transferdate
ENDIF
I want to convert oGv.pnBurialPlotId = 'transtab'+ALLTRIM(STR(lnReturn-1))+'.'+'burialplotid' to the format
oGv.pnBurialPlotId = transtab.burialplotid. How is it done? The code I have doesn't work. I have tried it several ways.
The result I get is in quotes: 'transtab1.burialplotid'
lnReturn = SQLEXEC(oGv.pnConnhandle, 'EXEC MCRevenue.Sundries.TentativeTransferGravePlotSP ?oGv.pnBurialPlotId,?@lnOutput','transtab')
IF lnReturn > 0
IF lnReturn > 1
SELECT 'transtab'+ALLTRIM(STR(lnReturn-1))
oGv.pnBurialPlotId = EVALUATE('transtab'+ALLTRIM(STR(lnReturn-1))+'.'+'burialplotid')
oGv.pnBurialPlotId = EVALUATE('transtab'+ALLTRIM(STR(lnReturn-1))+'.'+'transferdate')
ELSE
SELECT transtab
oGv.pnBurialPlotId = transtab.burialplotid
oGv.pdTransferDate = transtab.transferdate
ENDIF