[SOLVED] -READ A MFD

Focal Point

This topic can be found at:
https://forums.informationbuilders.com/eve/forums/a/tpc/f/7971057331/m/7337044386

August 15, 2016, 03:53 PM

Doug

[SOLVED] -READ A MFD

This should be simple, maybe I just have a bit of brain-freeze going on.

What I want to do is to read an existing mas file, such as car.mas (/u/ibi/apps/ibisamp/car.mas) and display the contents to the screen, eventually to an ALPHA file for subsequent -READs.

This message has been edited. Last edited by: Doug,

In FOCUS Since 1983 ~ from FOCUS to WebFOCUS.
Current: WebFOCUS Administrator at FIS Worldpay | 8204, 8206

August 15, 2016, 04:06 PM

Tony A

Monday brain freeze I guess Doug?

Just query SYSCOLUM

SET ALL = PASS
TABLE FILE SYSCOLUM
PRINT *
WHERE TBNAME EQ 'CAR'
END

In FOCUS since 1986	WebFOCUS Server 8.2.01M, thru 8.2.07 on Windows Svr 2008 R2
	WebFOCUS App Studio 8.2.06 standalone on Windows 10

August 16, 2016, 08:23 AM

Doug

Thanks Tony , Ahh... "SYSCOLUM" thawed things out...

August 16, 2016, 08:37 AM

BabakNYC

FILEDEF mytest DISK ibisamp/car.mas (LRECL 80 RECFM F
-RUN
? FILEDEF
-RUN
-READ mytest &LINE.A80
-TYPE  &LINE
-READ mytest &LINE.A80
-TYPE  &LINE
-READ mytest &LINE.A80
-TYPE &LINE
-READ mytest &LINE.A80
-TYPE &LINE

WebFOCUS 8206, Unix, Windows

August 16, 2016, 03:16 PM

Doug

Thanks BabakNYC, But, I needed something a bit more dynamic than that. I need to read existing MFDs based on an incoming variable, via a loop (Many MFDs).

Tony A provided the perfect solution (Thanks for the Brain Thaw Dude). All I needed to do was to replace "'CAR'" with "'&NameOfMFDToRead'".

August 16, 2016, 03:24 PM

Tom Flynn

Doug,
APP QUERY would probably work as well...
Just offering another path...

or SYSFILES?

Tom Flynn
WebFOCUS 8.1.05 - PROD/QA
DB2 - AS400 - Mainframe