Article 0

You can write your parameters to the connected query run control table PSCONQRSRUNPRMX. I have made the following code work;

Local PSXP_RPTDEFNMANAGER:ReportDefn &ReportDefinition;
Local Record &recQueryParameters;
Local string &ReportName, &TemplateName, &LanguageCode, &OutputFormat, &RunControl;
Local string &ConnectedQueryName, &QueryName, &QueryBindName;
Local date &AsOfDate;
Local boolean &result;

&ReportName = "COCGL1025";
&TemplateName = "COCGL1025_1";
&LanguageCode = "ENG";
&OutputFormat = "PDF";
&RunControl = "1";
&ConnectedQueryName = "COCGL1025_ONLINE_JOURNAL_PRINT";
&QueryName = "COCGL1025_JRNL_PRINT_HEADER";
&QueryBindName = "COCGL1025";

&ReportDefinition = create PSXP_RPTDEFNMANAGER:ReportDefn(&ReportName);
&ReportDefinition.Get();

SQLExec("DELETE FROM PSCONQRSRUNPRMX WHERE OPRID =:1 AND RUN_CNTL_ID =:2 AND CONQRSNAME=:3", %OperatorId, &RunControl, &ConnectedQueryName);

&recQueryParameters = CreateRecord(Record.PSCONQRSRUNPRMX);
&recQueryParameters.OPRID.Value = %OperatorId;
&recQueryParameters.RUN_CNTL_ID.Value = &RunControl;
&recQueryParameters.CONQRSNAME.Value = &ConnectedQueryName;
&recQueryParameters.QRYNAME.Value = &QueryName;
&recQueryParameters.BNDNUM.Value = "1";
&recQueryParameters.FIELDNAME.Value = "BUSINESS_UNIT";
&recQueryParameters.BNDNAME.Value = &QueryBindName;
&recQueryParameters.BNDVALUE.Value = JRNL_HEADER.BUSINESS_UNIT;
&recQueryParameters.Insert();

&recQueryParameters.OPRID.Value = %OperatorId;
&recQueryParameters.RUN_CNTL_ID.Value = &RunControl;
&recQueryParameters.CONQRSNAME.Value = &ConnectedQueryName;
&recQueryParameters.QRYNAME.Value = &QueryName;
&recQueryParameters.BNDNUM.Value = "2";
&recQueryParameters.FIELDNAME.Value = "JOURNAL_ID";
&recQueryParameters.BNDNAME.Value = &QueryBindName;
&recQueryParameters.BNDVALUE.Value = JRNL_HEADER.JOURNAL_ID;
&recQueryParameters.Insert();

&ReportDefinition.RunControlId = &RunControl;

&ReportDefinition.ProcessReport(&TemplateName, &LanguageCode, &AsOfDate, &OutputFormat);
DoSaveNow();

&ReportDefinition.DisplayOutput();

Hope it helps.