&Rec = CreateRecord(Record.process_table);
&Rec.OPRID.Value = %UserId;
&Rec.RUN_CNTL_ID.Value = &ProcessName;
If (&Rec.SelectByKey()) Then
&Rec.field1.Value = table1.field1;
&Rec.field2.Value = table1.field2;
&Rec.field3.Value = table1.field3;
&Rec.field4.Value =table1.field4;
&Rec.Update();
Else
&Rec.SetDefault();
&Rec.OPRID.Value = %UserId;
&Rec.RUN_CNTL_ID.Value = &ProcessName;
&Rec.field1.Value = table1.field1;
&Rec.field2.Value = table1.field2;
&Rec.field3.Value = table1.field3;
&Rec.field4.Value =table1.field4;
End-If;
/*specify your desired output format and destination*/
&ProcessType = "SQR Report";
&OutDestFormat = "PDF";
&OutDestType = "Web";
&MYRQST = CreateProcessRequest();
&MYRQST.RunControlID = &ProcessName;
&MYRQST.ProcessName = &ProcessName;
&MYRQST.ProcessType = &ProcessType;
&MYRQST.OutDestFormat = &OutDestFormat;
&MYRQST.OutDestType = &OutDestType;
&MYRQST.RunDateTime = %Datetime;
&RETURN = &MYRQST.Schedule();
Subscribe to:
Post Comments
(
Atom
)
loading..
Greetings, do you have a Twitter page that I may follow? Thanks
ReplyDeleteWith all the doggone snow we have had lately I am stuck indoors, fortunately there is the internet, thanks for giving me something to do.
oh cool, this information is really useful and definately is comment worthy! hehe. I'll see if I can try to use some of this information for my own blog. Thanks!
obst und gemüsereiniger