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     Need Details on the FOCUS Conversion function DDRNBDF

Read-Only Read-Only Topic
Go
Search
Notify
Tools
Need Details on the FOCUS Conversion function DDRNBDF
 Login/Join
 
rb4u
Silver Member
posted
Hi All,
Can any one give me details on the FOCUS function DDRNBDF,

The code shows the below conversion,

//* code starts
DEFINE FILE TBRMAST
CB/A2=;
HT/A2=;
I6PROC/I6YMD=PROCDATE;
CURYMD/YMD=I6PROC;
CURYM/YM=CURYMD;
CURYMD_F/YMD=CURYM;
IFIRSTD/I6YMD = CURYMD_F;
FD/D6 = IFIRSTD;
FDN/D6 = DDRNBDF(CB,HT,FD,FDN);
FDP/D6 = DDRNBDF(CB,HT,FD,FDP);
FIRSTD/D6 = DDRNBDF(CB,HT,FDP,FIRSTD);
FDY/I6L = IF FIRSTD EQ FD THEN FDN E
FIRSTDAY/A8 = EDIT(FDY,'99/99/99');
//*code ends
green

thanks


Focus Core 7.1.1 & 7.6.4
XP
MainFrames
 
Posts: 38 | Registered: November 20, 2007Report This Post
ptp
Silver Member
posted Hide Post
quote:
DDRNBDF

I don't think this is an out-of-the-box FOCUS function. I strongly suspect it's a USER written subroutine and as such will be very difficult for viewers of the FORUM to detail it's functionality.

Plus, there appears to either be an error in your post or in the code itself:

quote:
FDY/I6L = IF FIRSTD EQ FD THEN FDN E


There appears to be a truncation....I suspect the Sub-Routine attributes a business day to a financial posting date. If the original posting date is a working day then this date is taken else either the last working day before the posting date or first working day after the posting date is used. I guess this is a financial report for a bank, financial institution or Trust company?


Good Luck,
P

This message has been edited. Last edited by: ptp,
 
Posts: 42 | Location: UK | Registered: October 23, 2005Report This Post
Tony A
Expert
posted Hide Post
I would suggest that Paul is right, I have never come across a FOCUS function called DDRNBDF.

I would also agree that your guess at a bank is correct Paul, probably Royal Bank of Scotland who have moved their support out of the UK.

T


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 
 
Posts: 5694 | Location: United Kingdom | Registered: April 08, 2004Report This Post
GamP
Virtuoso
posted Hide Post
quote:
DDRNBDF

There must be someone in your organisation who knows what this function does, because it is quite certainly a locally developped function. It is not a part of the focus uws suite. Ask around with the other focus users and/or developers in your company.


GamP
- Using AS 8.2.01 on Windows 10 - IE11.
in Focus since 1988
 
Posts: 1961 | Location: Netherlands | Registered: September 25, 2007Report This Post
Waz
Expert
posted Hide Post
I would suggest tracking down where the module exists, which library it is in, perhaps it will lead you to the source, if it is not in the IBI libraries.


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
  Powered by Social Strata  

Read-Only Read-Only Topic

Focal Point    Focal Point Forums  Hop To Forum Categories  WebFOCUS/FOCUS Forum on Focal Point     Need Details on the FOCUS Conversion function DDRNBDF

Copyright © 1996-2020 Information Builders