RE: Encapsulation - Service Programs, Procedures, SQL, LDA, etc.

["Terry Anderson" <terrya@xxxxxxxxxxxx>]

If you want to add F specs to the procedure, define them globally. In
other words, before the PR line.

 *********************************************************************  
 *  PURPOSE OF PROGRAM: TO RETRIEVE THE CUSTOMER NAME FROM THE CUSTOMER 
 *                      MASTER FILE.                                    
 *                                                                      
 ********************************************************************** 
 * FILES USED IN PROGRAM.                                               
 ********************************************************************** 
FBLLCUST1  IF   E           K DISK    USROPN                            
 ********************************************************************** 
 * PROTOTYPE FOR PROCEDURE                                              
 ********************************************************************** 
D  RTVCUSTNAM     PR            35                                      
D  CUSTOMER_NUMBER...                                                   
D                                8                                      


Terry Anderson
Programming Manager
Citation Corporation
Switchboard 1.251.867.5481 ext 212
Direct Line 1.251.809.2312
Fax 251.867.0525
Cell  1.251.363.4975



> > message: 2
> > date: Thu, 14 Feb 2008 15:19:37 -0800 (PST)
> > from: nike@xxxxxxxxxxxxxx
> > subject: Re: Encapsulation - Service Programs, Procedures, SQL, LDA,
> > 	etc.
> >
> > When I asked the question I did not expect you to write a 
> > whole article on the subject :)
> >
> > In reading through the article, I see one thing I had not 
> > considered. 
> > Currently our service programs consist of nothing but 
> > exported procedures.  No F-Specs at all.  You cannot add an 
> > F-Spec to a procedure and I had not really considered adding 
> > F-Specs to the Service Program source member before the procedures...
> >
> > That is something we will explore for future use.
> >
> > Thanks!