- Community Home
- >
- Servers and Operating Systems
- >
- Operating Systems
- >
- Operating System - OpenVMS
- >
- need help with dispaying the lines on screen
Categories
Company
Local Language
Forums
Discussions
Forums
- Data Protection and Retention
- Entry Storage Systems
- Legacy
- Midrange and Enterprise Storage
- Storage Networking
- HPE Nimble Storage
Discussions
Discussions
Discussions
Forums
Forums
Discussions
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
- BladeSystem Infrastructure and Application Solutions
- Appliance Servers
- Alpha Servers
- BackOffice Products
- Internet Products
- HPE 9000 and HPE e3000 Servers
- Networking
- Netservers
- Secure OS Software for Linux
- Server Management (Insight Manager 7)
- Windows Server 2003
- Operating System - Tru64 Unix
- ProLiant Deployment and Provisioning
- Linux-Based Community / Regional
- Microsoft System Center Integration
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Community
Resources
Forums
Blogs
- Subscribe to RSS Feed
- Mark Topic as New
- Mark Topic as Read
- Float this Topic for Current User
- Bookmark
- Subscribe
- Printer Friendly Page
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
тАО07-30-2010 11:39 AM
тАО07-30-2010 11:39 AM
need help with dispaying the lines on screen
When user press "DELETE KEY" So
WHEN FDV$K_FK_E3 ANY
perform until ( current_line) > 12
move CP_INT_DATA(CURRENT_LINE + 1) to
CP_INT_DATA(CURRENT_LINE)
add 1 to current_line
end-perform
Current_line is the line user want to delete so i am taking current_line+1 data and moving it to current_line data this is keep doing until total 12 lines done then on last line i am moving zeroes.
When i run in Debug and see it has correct value but on the screen it does not work the way I am expecting. Do i need to put some thing to refresh the screen or reload the screen after these steps...
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
тАО07-30-2010 09:12 PM
тАО07-30-2010 09:12 PM
Re: need help with dispaying the lines on screen
May we assume this is a 'scrolled array' on the form?
We see the Cobol code to manage the array, but that's just memory. The program will also need to push the change to the screen through calls to FDV$PUTSC and FDL$PFT, probably within the same perform.
In the FDV Ref Manual, check out the beginning of chapter 3, 'scrolling'. Be sure to peruse the FMS$EXAMPLES for suggestions, and read FDV$PFT attentively.
Good luck!
Hein
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
тАО08-02-2010 05:33 AM
тАО08-02-2010 05:33 AM
Re: need help with dispaying the lines on screen
I modified mycode and added below lines:
CALL "FDV$PUTSC"
USING
BY DESCRIPTOR "INT_BEGIN_DATE"
BY DESCRIPTOR CP_INT_DATA(CURRENT_LINE)
GIVING STATUS_RESULT
This started display data on the screen. It took next line of data and put on the line i deleted so that is correct. But i want below lines to adjust it self one line up. Right now if i delete one line below line comes on place of deleted line and now there are duplicate.
Please help..
I think i need to put FDV$PFT as you said by do not know where. I read into the manual and it says this will move the cursor to the next line...
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
тАО08-02-2010 05:47 AM
тАО08-02-2010 05:47 AM
Re: need help with dispaying the lines on screen
You call FDV$PFT as if the end user is hitting the up, or down, arrow.
Be sure to carefully check the manual, the examples, and perhaps other parts of your own application.
Create yourself a minimalistic example with the a few fields and a few lines with simple recognizable initial contents like "one", "two", ... "ten" and a 5 line window.
If you can not get that to work, then maybe you can post the entire attempt here for someone to try to help (probably not me... too busy and some vacation coming up :-).
Be sure to describe the form to us in simple terms.
Hein
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
тАО08-02-2010 08:35 AM
тАО08-02-2010 08:35 AM