HP3000-L Archives

August 2006, Week 2

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Michael Berkowitz <[log in to unmask]>
Reply To:
Date:
Mon, 14 Aug 2006 12:54:23 -0700
Content-Type:
text/plain
Parts/Attachments:
text/plain (45 lines)
Ron Horner writes



The challenge in using COBOL is that you can't change the intrinsic
library that the program uses.  That's why Pascal or C are preferred
with working with AIF's.

Ron Horner 
Ecometry Manager
 
A-Three Services
Full Service Customized Fulfillment
3125 Commercial Avenue 
Northbrook, IL 60062
Certified Women owned Business
www.a-three.com
 
---------------------------------------------------------
You can't change the intrinsic file within the program itself, but you can 
use a different intrinsic file with a file equate :FILE 
SYSINTR=AIFINTR.PUB.SYS.  To do this your AIF calls must be within a 
subprogram that doesn't need to do any standard intrinsic calls.

:cob85xl main
:file sysintr=aifintr.pub.sys
:cob85xl aifsub
:reset sysintr
:cob85xl othersub
:link all together

Michael Berkowitz
Project Manager, CGS Application Solutions
707 Wilshire Blvd  Suite 1900
Los Angeles, CA  90017-3509
T: 213 614-1308
F: 213 614-2028
[log in to unmask]
www.cgsinc.com



* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2