× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



the program exists in the production lib as - I am trying to make a copy in
mylib.

I am not familiar with what QTEMP is doing here. I see we have one module
and 5 service programs.

I am not clear how to make this for my testing.



Program . . . . . . . : T1R116 Library . . . . . . . :
T11665AP
Owner . . . . . . . . : IBS6OWN

Program attribute . . : RPGLE

Detail . . . . . . . . : *BASIC





Program creation information:

Program creation date/time . . . . . . . . . . : 1/6/15 09:06:00

Type of program . . . . . . . . . . . . . . . : ILE

Program entry procedure module . . . . . . . . : T1R116

Library . . . . . . . . . . . . . . . . . . : QTEMP

Activation group attribute . . . . . . . . . . : *CALLER

Shared activation group . . . . . . . . . . . : *NO

User profile . . . . . . . . . . . . . . . . . : *USER

Use adopted authority . . . . . . . . . . . . : *YES

Coded character set identifier . . . . . . . . : 65535

Number of modules . . . . . . . . . . . . . . : 1
Number of service programs . . . . . . . . . . : 5
Number of unresolved references . . . . . . . : 0
Number of copyrights . . . . . . . . . . . . . : 1
All creation data . . . . . . . . . . . . . . : *YES
Observable information compressed . . . . . . : *NO
Run time information compressed . . . . . . . : *NO
Allow update . . . . . . . . . . . . . . . . . : *YES
Allow bound *SRVPGM library name update . . . : *NO
Profiling data . . . . . . . . . . . . . . . . : *NOCOL
Teraspace storage enabled PEP . . . . . . . . : *YES
Teraspace storage enabled modules . . . . . . : *ALL




On Tue, Feb 2, 2016 at 6:36 PM, Glenn Gundermann <glenn.gundermann@xxxxxxxxx
wrote:

What makes you think you should be using PDM option 14? Maybe you should
be using PDM option 15 and then later issue the CRTPGM command.

Are you using the default values with PDM option 14? Maybe you should be
using F4=Prompt and specifying certain values.

Have you done a DSPPGM <program-name> and viewed the output? Do so and
take note of what you see, such as:
- activation group attribute
- shared activation group
- list of modules
- list of service programs


Yours truly,

Glenn Gundermann
Email: glenn.gundermann@xxxxxxxxx
Work: (416) 675-9200 ext. 89224
Cell: (416) 317-3144


On 2 February 2016 at 17:32, Hoteltravelfundotcom <
hoteltravelfun@xxxxxxxxx>
wrote:

HI - I am looking at a working program that is not compiling. I use
option
14. It will compile successfully as a module but not 14. I must be
leaving
out a step in the compile?
1.
7503+D* I: Pointer to instance

RNF3788 30 7498 059600+ DFTACTGRP(*NO) must be specified for a
prototype
that does
not have the EXTPGM keyword.
A650AP/QASWCPYPRC(SROARL)

7504+D this_object * CONST



2. there is also an error here maybe its' connected
*RNF3788 30 994 DFTACTGRP(*NO) must be specified for a prototype that
does
not have the EXTPGM keyword.


1002+ * RETURN type: Business object attribute

*RNF3788 30 992 028100+ DFTACTGRP(*NO) must be specified for a
prototype th
not have the EXTPGM keyword.

1003+D ASWLDA_getCodeForNo...

1004+D PR EXTPROC('ASWLDA-

1005+D _getCodeForNo')

1006+D LIKE(ASWLDA...
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.