RE: [MI400] How do you call a service program in MI

["Njål Fisketjøn" <n.f@xxxxxxx>]

> > I was looking in Leif's book, where does it show how to call a service
> > program?
> >
>
> it doesn't, but the CALLX instruction can be used to call the
> program entry procedure of a bound. See the manual for
> the details.
>

Call the API QZRUCLSP

1.7 Call Service Program Procedure (QZRUCLSP) API

??????????????????????????????????????????????????????????????????????????
?                                                                        ?
?                                                                        ?
? Required Parameter Group:                                              ?
?                                                                        ?
?                                                                        ?
?                                                                        ?
?                                                                        ?
? ?????????????????????????????????????????????????????????????????????? ?
? ?  1 ? Qualified service program name           ? Input  ? Char(20)  ? ?
? ?????????????????????????????????????????????????????????????????????? ?
? ?  2 ? Export Name                              ? Input  ? Char(*)   ? ?
? ?????????????????????????????????????????????????????????????????????? ?
? ?  3 ? Return Value Format                      ? Input  ? Binary(4) ? ?
? ?????????????????????????????????????????????????????????????????????? ?
? ?  4 ? Parameter Formats                        ? Input  ? Array(*)  ? ?
? ?    ?                                          ?        ? of        ? ?
? ?    ?                                          ?        ? Binary(4) ? ?
? ?????????????????????????????????????????????????????????????????????? ?
? ?  5 ? Number of Parameters                     ? Input  ? Binary(4) ? ?
? ?????????????????????????????????????????????????????????????????????? ?
? ?  6 ? Error code                               ? I/O    ? CHAR(*)   ? ?
? ?????????????????????????????????????????????????????????????????????? ?
?                                                                        ?
?                                                                        ?
?                                                                        ?
?                                                                        ?
?                                                                        ?
? Optional Parameter Group:                                              ?
?                                                                        ?
?                                                                        ?
?                                                                        ?
?                                                                        ?
? ?????????????????????????????????????????????????????????????????????? ?
? ?  7 ? Return Value                             ? Output ? Char(*)   ? ?
? ?????????????????????????????????????????????????????????????????????? ?
? ?  8 ? Parameter 1                              ? I/O    ? Char(*)   ? ?
? ?????????????????????????????????????????????????????????????????????? ?
? ?  9 ? Parameter 2                              ? I/O    ? Char(*)   ? ?
? ?????????????????????????????????????????????????????????????????????? ?
? ? 10 ? Parameter 3                              ? I/O    ? Char(*)   ? ?
? ?????????????????????????????????????????????????????????????????????? ?
? ? 11 ? Parameter 4                              ? I/O    ? Char(*)   ? ?
? ?????????????????????????????????????????????????????????????????????? ?
? ? 12 ? Parameter 5                              ? I/O    ? Char(*)   ? ?
? ?????????????????????????????????????????????????????????????????????? ?
? ? 13 ? Parameter 6                              ? I/O    ? Char(*)   ? ?
? ?????????????????????????????????????????????????????????????????????? ?
? ? 14 ? Parameter 7                              ? I/O    ? Char(*)   ? ?
? ?????????????????????????????????????????????????????????????????????? ?
?                                                                        ?
?                                                                        ?
?                                                                        ?
?                                                                        ?
?                                                                        ?
? Threadsafe: No                                                         ?
?                                                                        ?
??????????????????????????????????????????????????????????????????????????

The Call Service Program Procedure (QZRUCLSP) API allows an unbound call to an 
ILE procedure exported by a service program.