Re: Calling RPGILE program from C

Here is the code that should work. (Sorry had the wrong declaration for the
decimal pointer.)

#include <stdio.h>
#include <string.h>
#include <decimal.h>
#include <stdlib.h>

#pragma linkage(RGTRIGCNTL,OS)
void RGTRIGCNTL(char *, decimal(10,0)*);

int main(int argc, char **argv)
{
decimal (10,0) *len;

len = (decimal(10,2)*)argv[2];
RGTRIGCNTL(argv[1],len);
}

I assume you are passing a decimal into the program and are sending a
pointer to the RPG program?? If no you need to get the contents of the
argv[2] parameter and pass as a value.
-----Original Message-----
From: C400-L [mailto:c400-l-bounces@xxxxxxxxxxxx] On Behalf Of Tony Cate
Sent: October 28, 2014 4:02 PM
To: C400-L@xxxxxxxxxxxx
Subject: [C400-L] Calling RPGILE program from C

First the code:

*#include <stdio.h>*
*#include <string.h>*

*#include <decimal.h>
#include <stdlib.h>

typedef void RGTRIGCNTL(char[80], decimal(10,0));

#pragma linkage(RGTRIGCNTL,fetchable)

int main(int argc, char *argv[])
{
char *triggerInfo;
decimal (10,0) triggerLen;

triggerInfo = argv[1];
triggerLen = argv[2];

RGTRIGCNTL(triggerInfo, &triggerLen);
}*

*What's going on: trying to write a small C program to attach to file
triggers.*

Problems:

pragma linkage won't allow 'OS' for a parameter. Everything I've read
indicates that's what I want. The only "ID' compiler didn't barf on is
'fetchable', which is why its there.

It compiles, but nothing happens when I try to step into RGTRIGCNTL.

The Dev box is V5R4 (long story).

The questions:

Why can't I use 'OS' in linkage? Why isn't my program getting called?

The last time I wrote a C program was in college, a looong time ago.
--
*Tony Cate* | Senior Programmer/Analyst | 704.872.2458 x 126
[image: Auction Edge, Inc.] <http://www.auctionedge.com/> *AUCTION EDGE,
INC.* | *Powering Independent Auctions* STATESVILLE, NC | 704.872.2458
--
This is the Bare Metal Programming IBM i (AS/400 and iSeries) (C400-L)
mailing list To post a message email: C400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/c400-l
or email: C400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/c400-l.