Program.SqlQueryResults Field

This field contains a collection representing the query results.

Syntax

BegProp SqlQueryResults Access(*Public)Type(System.Collections.Generic.Dictionary)

Field Value

System.collections.Generic.Dictionary. A collection representing the query results (string and object) allowing values for a particular column to be accessed by names.

Example

The following legacy source:

0296.00     C/EXEC SQL
0297.00     C+ Select wddate, wdseq#, wdemp# Into :F1Date, :F1Seq#,:F1Emp#
0298.00     C+ From wfmmst Join wfmdet On wmemp# = wdemp#
0299.00     C+ Where wdmsc4 <> 'A' and wdetim = 0 and wdord#= :F1Ord# and
0300.00     C+       wdmsc1 = 'P'
0301.00     C/END-EXEC

Generates

SqlQueryResults = ExecuteSQL_Query ( +
"Select wddate, wdseq#, wdemp#                          " + +
" From wfmmst Join wfmdet On wmemp# = wdemp#"  + + 
" Where wdmsc4 <>  'A' and wdetim = 0 and wdord# = @sql_parm_1 and" + +
"       wdmsc1 = 'P';", + 
*New  DBStrParm(DbType.String, F1Ord#, %Len(F1Ord#)) + 
)
F1Date = SqlQueryResults["WDDATE"] *AsFld F1Date
F1Seq# = SqlQueryResults["WDSEQ#"] *AsFld F1Seq#
F1Emp# = SqlQueryResults["WDEMP#"] *AsFld F1Emp#

Requirements

Namespace: ASNA.Monarch
Assembly: ASNA.VisualRPG.Runtime.DLL
Platforms: Windows Server 2012, Windows Server 2012 R2, Windows Server 2016, Windows 7, Windows 8 Pro, Windows 10 Pro