Download a Natural-ADABAS code in a text file

Hi guys,

I am very new to the Natural-Adabas world and I have a requirement to download all the natural-adabas code from a specific library into a notepad. Is there a way to do this (like the OPTION 6 in the TSO) from the Natural menu?

I tried writing an emulator script which again dint work.

I tried googling on this, but was unable to find a way. Also tried searching the older posts but no luck. Sadly, there is no one is around. :shock:

Please help.

What is the purpose of this task?

If it is just to archive all the code, use SYSOBJH.

Is it possible, since no one is there, that you were given this assignment as a “fools errand”?

Hi Steve, we need to feed them(codes in the notepad) to a software that checks for security compliance and this software is a non-mainframe one.

As Steve said, use the SYSOBJH utility to unload the code to a flat file and then FTP it etc.

However, the code will be unloaded in an “internal” format so you would probably have to
split it to get one file per module etc., but this will still leave you with incomplete code with
references to copycodes, LDAs, PDAs etc.

I am rather doubtful that a software package that is not specific to Natural can assess security compliance of Natural code.
In particular, are you familiar with Ampersand “variables” that allow one Natural program to effectively alter the functioning of another Natural program?
Then, there are the varied means to pass data between Natural objects, including the Stack, which can also be used to alter the sequence of executed programs.
Lets not forget MOVE INDEXED which could be used play all sorts of games.

To repeat my first sentence; if you are serious about security, a generic software package will not suffice.

I am curious what this “security compliance” software is going to look for, exactly.

in any case…one option to look at is the “LIST” command - there are options there that might help

  • LIST SEQ - lists selected programs - use selection like “list seq ab*” or “list seq p ab*” (list all programs starting with ab) or just “list seq *” for everything
  • LIST SEQ EXPAND - lists programs selected (see above) and expands INCLUDE and USING data-area statements - e.g. “list seq * expand”

Run these in batch and send the output to a sequential file or PDS to capture it, download it and feed into your magical security scanner.

1 Like

@Steve: Very true, I had flagged this earlier but I was later told that this is being tested on a trial basis. And our’s is the only application that has Nat-Ada. :roll:

@Brian: It sort of checks for specific key-words and looks for fields that contain customer data patterns. But I am not sure on what all it can churn out. As a first step we wanted to feed some nat-ada code to it and see how well it works and a detailed feedback will be given on the areas that ran amuck.

Thanks Doug et all, LIST SEQ EXPAND command seem to work well. The magical scanner should now feel very happy. :slight_smile:

Cheers!