Focal Point Banner


As of December 1, 2020, Focal Point is retired and repurposed as a reference repository. We value the wealth of knowledge that's been shared here over the years. You'll continue to have access to this treasure trove of knowledge, for search purposes only.

Join the TIBCO Community
TIBCO Community is a collaborative space for users to share knowledge and support one another in making the best use of TIBCO products and services. There are several TIBCO WebFOCUS resources in the community.

  • From the Home page, select Predict: WebFOCUS to view articles, questions, and trending articles.
  • Select Products from the top navigation bar, scroll, and then select the TIBCO WebFOCUS product page to view product overview, articles, and discussions.
  • Request access to the private WebFOCUS User Group (login required) to network with fellow members.

Former myibi community members should have received an email on 8/3/22 to activate their user accounts to join the community. Check your Spam folder for the email. Please get in touch with us at community@tibco.com for further assistance. Reference the community FAQ to learn more about the community.


Focal Point    Focal Point Forums  Hop To Forum Categories  WebFOCUS/FOCUS Forum on Focal Point     [SOLVED]PACKED Fields

Read-Only Read-Only Topic
Go
Search
Notify
Tools
[SOLVED]PACKED Fields
 Login/Join
 
moyer1dl
Platinum Member
posted
I have a USAGE P14.2 ACTUAL Z14 field in a file that I have read successfully but when I report these and store them in a hold file either alpha or binary I cant get this field to report from the hold file. Does anybody know what the USAGE and ACTUAL should be when I have them stored as ALPHA. BINARY would be secondary preference because it has the padding in it. These are mainframe fixed files.

Any Help

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


IBM Main Frame: MVS, FIX, VSAM

Windows SQL

WF 7.7
 
Posts: 147 | Registered: June 24, 2006Report This Post
Don Garland
Guru
posted Hide Post
How are you holding it?

I'm not familiar with MainFrame but I would take a look at the hold file field formats and see how it's being stored. 

  TABLE FILE CAR
PRINT
     'CAR.ORIGIN.COUNTRY'
     'CAR.COMP.CAR'
     'CAR.CARREC.MODEL'
	 ON TABLE HOLD AS CARTEST
END
-RUN

CHECK FILE CARTEST HOLD
TABLE FILE HOLD
PRINT
FILENAME
FIELDNAME/A100 AS 'Field'
TITLE AS 'Description'
USAGE AS 'Format'
ACTUAL AS 'WebFocus Format'
END


WebFOCUS Administrator @ Worldpay FIS
PROD/DEV/TEST: 8204, SANDBOX: 8206 soon - BIP, Reportcaster, Resource Manager, EUM, HyperStage soon, DB: HIVE,Oracle,MSSQL
 
Posts: 291 | Location: Greater Cincinnati  | Registered: May 11, 2005Report This Post
Waz
Expert
posted Hide Post
If you hold as FORMAT ALPHA, then each row will be a line, and all fields will be stored as alpha.

For BINARY, I think you will find that the rows will be stored without an end of line marker (Can't remember what it is on MF), Numerics will be stored as binary.

Are you holding this, and trying to read the files in another program ?, it may all be related to the allocation of the file.


Waz...

Prod:WebFOCUS 7.6.10/8.1.04Upgrade:WebFOCUS 8.2.07OS:LinuxOutputs:HTML, PDF, Excel, PPT
In Focus since 1984
Pity the lost knowledge of an old programmer!

 
Posts: 6347 | Location: 33°49'23.0"S, 151°11'41.0"E | Registered: October 31, 2006Report This Post
Danny-SRL
Virtuoso
posted Hide Post
quote:
TABLE FILE CAR
PRINT
'CAR.ORIGIN.COUNTRY'
'CAR.COMP.CAR'
'CAR.CARREC.MODEL'
ON TABLE HOLD AS CARTEST
END
-RUN

I would add after the END:
?FF CARTEST
You will see the formats of your fields

If this doesn't help, then tell us: Are you on a M/F? If so, VM? MVS? If not, what machine?
Are you maybe using the name of another file the Master of which precedes your HOLD file name in the PATH?


Daniel
In Focus since 1982
wf 8.202M/Win10/IIS/SSA - WrapApp Front End for WF

 
Posts: 1980 | Location: Tel Aviv, Israel | Registered: March 23, 2006Report This Post
moyer1dl
Platinum Member
posted Hide Post
OK I have gotten the packed amount field to display correctly under binary hold file format USAGE P14.2 Actual p8. The problem now is I am pulling the system date with.

-SET &YESTERDAY=AYMD(&YMD,-1,'I8YYMD');
DEFINE FILE BCMSTRN
DATE/YYDM=&YESTERDAY;

When I go to report off of the this hold file the format is stored with USAGE: YYMD ACTUAL: I4. It seems to truncate the field and I get meaningless numbers.

We are using MVS. Is there another way to display this date.


IBM Main Frame: MVS, FIX, VSAM

Windows SQL

WF 7.7
 
Posts: 147 | Registered: June 24, 2006Report This Post
j.gross
Virtuoso
posted Hide Post
I presume you actually coded

DATE/YYMD=&YESTERDAY;



The I4 integer stored for DATE is not truncated -- it's a date offset. Quite meaningful -- just the meaning is not so obvious.

[Incidentally, that's exactly how Excel stores a date value, but they use a different base date.]

If you are "reporting off this hold file" within Focus, there should be no problem.

If you are trying to read the file outside of the IBI environment, you'd probably do better with

DATE/I8YYMD=&YESTERDAY;

which will store a +yyyymmdd value as I4.

This message has been edited. Last edited by: j.gross,
 
Posts: 1925 | Location: NYC | In FOCUS since 1983 | Registered: January 11, 2005Report This Post
moyer1dl
Platinum Member
posted Hide Post
J Gross,

That seemed to help. Thanks much.

I also noticed pulling my variable in with a &yymd helped also.


IBM Main Frame: MVS, FIX, VSAM

Windows SQL

WF 7.7
 
Posts: 147 | Registered: June 24, 2006Report This Post
  Powered by Social Strata  

Read-Only Read-Only Topic

Focal Point    Focal Point Forums  Hop To Forum Categories  WebFOCUS/FOCUS Forum on Focal Point     [SOLVED]PACKED Fields

Copyright © 1996-2020 Information Builders