Code for single button which acts for add,find,update

I have created one btns- (acting for add,find, update etc having same unique id )using VB.NET code.I want to write code according to the captions of the button...I mean for diff caption of the btn , diff action should perform?
So , plz anyone tell me how to code for it using VB.NET(for Business One)
Thnxs in advance..
Chetan

Chetan,
You have posted your question in the SAP Business One integration for SAP NetWeaver forum. Your question relates to the SAP Business One SDK and you need to post your question in the SAP Business One forum. You should get a response by posting it in that forum.
Eddy

Similar Messages

I have a Lion content code for the free update. Is there a time limit on how long I have to download it

I received a web order number and content code for my free update of Lion. Is there a time limit on how long I have before I must actually download the application? Thanks. JVC

There is a time limit.
http://www.apple.com/macosx/uptodate/

Firefox "check for add-on updates" checks even when not selected, request website list for firewall blocking purposes

I work for the Tech Department in a school district. Our student computers are locked down and all settings are reset after a restart. We have set firefox to always allow all add-ons to run and to never check for updates (we update them on a schedule we control). However, since the latest release, we have been prompted after EVERY flash AND EVERY java update that they are out of date and need to be updated. Having the students click on this every time for every affected webpage is no longer an option. We are also not interested in white-listing pages individually; instead, we would like to prevent firefox from finding the update server to prevent any further prompts.
Please provide me with all of the websites/web addresses that "check for add-on updates" uses so we can block them at the firewall level.
Thanks

Part of the problem may be the recent flurry of required updates to FlashPlayer. As I understand it Mozilla took the exceptional step of blocklisting some of those FlashPlayer versions after fixes were released because there were known exploits in the wild.
* See the blocklist
* And flashplayers bulletins https://helpx.adobe.com/security.html#flashplayer
Possibly you are having difficulty in keeping the software updated and so seeing valid warnings from Firefox. You appear (System info aside) to be posting using Firefox 34. The current Release is Fx35.0.1
Possibly it would be worth you considering using Firefox ESR, that still has regular updates including backported critical security fixes, but the major version stays the same for longer and there are less frequent feature changes.
* https://www.mozilla.org/en-US/firefox/organizations/faq/
I will send links for a couple of other articles by Private Message.
Steps that may be safe for an IT department may not be recommended for the average reader of this forum.

What should be my code for EDIT, if my codes for ADD is just like this?

Private Sub BT_ADD_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT_ADD.Click
If CB_link.Checked = True Then
Dim dt As New DataTable
dt.Columns.Add("Link", GetType(String))
dt.Columns.Add("Type", GetType(String))
dt.Columns.Add("Time/Duration", GetType(String))
dt.Columns.Add("Repetition", GetType(String))
Dim currentLink As String
Dim currentTime As String
Dim currentInterval As Integer
Dim currentRepetition As String
If RB_Time.Checked = True Then
Dim d1 As DateTime = DTP_Now.Value
Dim d2 As DateTime = DTP_Now1.Value
Dim result As TimeSpan = d1.Subtract(d2)
Dim days As Integer = result.TotalDays
currentLink = TB_link.Text
currentTime = days
currentRepetition = "Today"
If TimeOption(currentInterval) = True Then
dt.Rows.Add(currentLink, True, currentInterval, currentRepetition)
Else
dt.Rows.Add(currentLink, False, currentTime, currentRepetition)
End If
DGV_running.DataSource = dt
DGV_running.Columns(1).Visible = False
DGV_running.Columns(0).Width = 300
DGV_running.Columns(2).Width = 150
DGV_running.Columns(3).Width = 150
If RB_Daily.Checked = True Then
'Dim d1 As DateTime = DTP_Now.Value
'Dim d2 As DateTime = DTP_Now1.Value
'Dim result As TimeSpan = d1.Subtract(d2)
'Dim days As Integer = result.TotalDays
currentLink = TB_link.Text
currentTime = days
currentRepetition = "Daily"
If TimeOption(currentInterval) = True Then
dt.Rows.Add(currentLink, True, currentInterval, currentRepetition)
Else
dt.Rows.Add(currentLink, False, currentTime, currentRepetition)
End If
End If
If RB_Weekly.Checked = True Then
'Dim d1 As DateTime = DTP_Now.Value
'Dim d2 As DateTime = DTP_Now1.Value
'Dim result As TimeSpan = d1.Subtract(d2)
'Dim days As Integer = result.TotalDays
currentLink = TB_link.Text
currentTime = days
currentRepetition = "Weekly"
If TimeOption(currentInterval) = True Then
dt.Rows.Add(currentLink, True, currentInterval, currentRepetition)
Else
dt.Rows.Add(currentLink, False, currentTime, currentRepetition)
End If
End If
If RB_Monthly.Checked = True Then
'Dim d1 As DateTime = DTP_Now.Value
'Dim d2 As DateTime = DTP_Now1.Value
'Dim result As TimeSpan = d1.Subtract(d2)
'Dim days As Integer = result.TotalDays
currentLink = TB_link.Text
currentTime = days
currentRepetition = "Monthly"
If TimeOption(currentInterval) = True Then
dt.Rows.Add(currentLink, True, currentInterval, currentRepetition)
Else
dt.Rows.Add(currentLink, False, currentTime, currentRepetition)
End If
End If
ElseIf RB_Interval.Checked = True Then
currentLink = TB_link.Text
currentInterval = NUD_interval.Text
currentRepetition = "N/A"
If TimeOption(currentInterval) = True Then
dt.Rows.Add(currentLink, True, currentInterval, currentRepetition)
Else
dt.Rows.Add(currentLink, False, currentTime, currentRepetition)
End If
DGV_running.DataSource = dt
DGV_running.Columns(1).Visible = False
DGV_running.Columns(0).Width = 300
DGV_running.Columns(2).Width = 150
DGV_running.Columns(3).Width = 150
End If
End If
End Sub
Here's the GUI of my project.
This project will call a website to be loaded.

Imports System.IO
Imports System.Text
Public Class frm_main
Public currentRunningTime As Integer = 0
Private Sub BT_ADD_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT_ADD.Click
If CB_link.Checked = True Then
Dim dt As New DataTable
dt.Columns.Add("Link", GetType(String))
'dt.Columns.Add("Type", GetType(String))
dt.Columns.Add("Time/Duration", GetType(String))
dt.Columns.Add("Repetition", GetType(String))
Dim currentLink As String
Dim currentTime As String
Dim currentInterval As Integer
Dim currentRepetition As String
If RB_Time.Checked = True Then
Dim d1 As DateTime = DTP_Now.Value
Dim d2 As DateTime = DTP_Now1.Value
Dim result As TimeSpan = d1.Subtract(d2)
Dim days As Integer = result.TotalDays
currentLink = TB_link.Text
currentTime = days
currentRepetition = "Today"
'currentInterval = DTP_Now.Text
'If TimeOption(currentInterval) = True Then
' dt.Rows.Add(currentLink, True, currentInterval, currentRepetition)
'Else
dt.Rows.Add(currentLink, currentTime, currentRepetition)
'End If
DGV_running.DataSource = dt
'DGV_running.Columns(1).Visible = True
DGV_running.Columns(0).Width = 100
DGV_running.Columns(1).Width = 90
DGV_running.Columns(2).Width = 68
If RB_Daily.Checked = True Then
currentLink = TB_link.Text
currentTime = days
currentRepetition = "Daily"
'currentInterval = DTP_Now1.Text
'If TimeOption(currentInterval) = True Then
' dt.Rows.Add(currentLink, True, currentInterval, currentRepetition)
'Else
dt.Rows.Add(currentLink, currentTime, currentRepetition)
'End If
End If
If RB_Weekly.Checked = True Then
currentLink = TB_link.Text
currentTime = days
currentRepetition = "Weekly"
'currentInterval = DTP_Now1.Text
' If TimeOption(currentInterval) = True Then
' dt.Rows.Add(currentLink, True, currentInterval, currentRepetition)
' Else
dt.Rows.Add(currentLink, currentTime, currentRepetition)
' End If
End If
If RB_Monthly.Checked = True Then
currentLink = TB_link.Text
currentTime = days
currentRepetition = "Monthly"
'currentInterval = DTP_Now1.Text
'If TimeOption(currentInterval) = True Then
' dt.Rows.Add(currentLink, True, currentInterval, currentRepetition)
'Else
dt.Rows.Add(currentLink, currentTime, currentRepetition)
'End If
End If
ElseIf RB_Interval.Checked = True Then
currentLink = TB_link.Text
currentInterval = NUD_interval.Text
currentRepetition = "N/A"
'If TimeOption(currentInterval) = True Then
dt.Rows.Add(currentLink, currentInterval, currentRepetition)
'Else
' dt.Rows.Add(currentLink, False, currentTime, currentRepetition)
'End If
DGV_running.DataSource = dt
'DGV_running.Columns(1).Visible = True
DGV_running.Columns(0).Width = 100
DGV_running.Columns(1).Width = 90
DGV_running.Columns(2).Width = 68
End If
End If
TB_link.Clear()
CB_link.Checked = False
RB_Time.Checked = False
RB_Interval.Checked = False
RB_Daily.Checked = False
RB_Weekly.Checked = False
RB_Monthly.Checked = False
RB_Time.Enabled = False
RB_Interval.Enabled = False
RB_Daily.Enabled = False
RB_Weekly.Enabled = False
RB_Monthly.Enabled = False
NUD_interval.Value = 0
DTP_Now.Enabled = False
DTP_Now1.Enabled = False
End Sub
Private Sub BT_EDIT_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT_EDIT.Click
'Dim dt As New DataTable
DGV_running.BeginEdit(selectAll:=True)
'TB_link.Text = dt.Rows(0)("Link").ToString()
TB_link.Text = DGV_running.Rows(0)("Link").ToString() 'Class "System.Windows.Forms.DAtaGridViewRow" cannot be indexed because it has no default property.
End Sub
Private Sub BT_DEL_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT_DEL.Click
Dim dt As New DataTable
DGV_running.DataSource = dt
TB_link.Clear()
dt.Rows.Clear()
CB_link.Checked = False
RB_Time.Checked = False
RB_Interval.Checked = False
RB_Daily.Checked = False
RB_Weekly.Checked = False
RB_Monthly.Checked = False
RB_Time.Enabled = False
RB_Interval.Enabled = False
RB_Daily.Enabled = False
RB_Weekly.Enabled = False
RB_Monthly.Enabled = False
NUD_interval.Enabled = False
NUD_interval.Value = 0
Timer1.Stop()
End Sub
Function TimeOption(ByVal interval As Integer)
Dim result As Boolean = False
If interval > 0 Then
result = True
Else
result = False
End If
Return result
End Function
Sub CreateTimer(ByVal timerInterval As Integer)
Dim newTimer As New Timer
newTimer.Interval = timerInterval * 1000
newTimer.Tag = DateTime.Now
AddHandler newTimer.Tick, AddressOf TickHandler
End Sub
Sub TickHandler(ByVal sender As Object, ByVal e As EventArgs)
Dim currTimer As Timer = DirectCast(sender, Timer)
End Sub
Private Sub BT_Stop_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT_Stop.Click
Timer1.Stop()
Dim CloseApp As String
CloseApp = MsgBox("Do you want to EXIT this app?", MsgBoxStyle.YesNo, "Exiting")
If CloseApp = vbYes Then
Me.Close()
Application.Exit()
End
Else
Me.Refresh()
TB_link.Clear()
RB_Time.Checked = False
RB_Interval.Checked = False
RB_Daily.Checked = False
RB_Weekly.Checked = False
RB_Monthly.Checked = False
RB_Time.Enabled = False
RB_Interval.Enabled = False
RB_Daily.Enabled = False
RB_Weekly.Enabled = False
RB_Monthly.Enabled = False
NUD_interval.Value = 0
End If
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If Not File.Exists("C:\phptrigger.txt") Then
File.Create("C:\phptrigger.txt")
End If
Timer2.Interval = 1000
Timer2.Enabled = True
RB_Time.Enabled = False
RB_Daily.Enabled = False
RB_Weekly.Enabled = False
RB_Monthly.Enabled = False
RB_Interval.Enabled = False
NUD_interval.Enabled = False
DTP_Now.Enabled = False
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
currentRunningTime = currentRunningTime + 1
Dim currentTime As String = DateTime.Now.ToString("hh:mm:ss tt")
For Each row As DataGridViewRow In DGV_running.Rows
If row.Cells(1).Value = "False" Then
Dim sourcePath As String = row.Cells(0).Value
Dim runTime As String = row.Cells(2).Value
Dim dateRunTime As Date = CDate(runTime)
Dim dateCurrentTime As Date = CDate(currentTime)
If dateRunTime = dateCurrentTime Then
Try
My.Computer.Network.UploadFile("C:\phptrigger.txt", sourcePath & "/phptrigger.txt", "", "")
Catch ex As Exception
'MsgBox("Error: " & ex.ToString())
End Try
End If
End If
If row.Cells(1).Value = "True" Then
Dim sourcePath As String = row.Cells(0).Value
Dim intervalSeconds As Integer = row.Cells(2).Value
If (currentRunningTime Mod intervalSeconds) = 0 Then
Try
My.Computer.Network.UploadFile("C:\phptrigger.txt", sourcePath & "/phptrigger.txt", "", "")
Catch ex As Exception
'MsgBox("Error: " & ex.ToString())
End Try
End If
End If
Next
'MsgBox("The Link was SUCCESSFULLY loaded!")
End Sub
Private Sub BT_START_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT_START.Click
Timer1.Start()
'Dim headers = (From header As DataGridViewColumn In DGV_running.Columns.Cast(Of DataGridViewColumn)() _
' Select header.HeaderText).ToArray
Dim rows = From row As DataGridViewRow In DGV_running.Rows.Cast(Of DataGridViewRow)() _
Where Not row.IsNewRow _
Select Array.ConvertAll(row.Cells.Cast(Of DataGridViewCell).ToArray, Function(c) If(c.Value IsNot Nothing, c.Value.ToString, ""))
Using sw As New IO.StreamWriter("c:\link.txt")
'sw.WriteLine(String.Join(",", headers))
For Each r In rows
sw.WriteLine(String.Join(",", r))
Next
End Using
Process.Start("c:\link.txt")
End Sub
Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
Timer2.Interval = 1000
Timer2.Enabled = True
Label2.Text = Date.Now
End Sub
Private Sub RB_Time_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RB_Time.CheckedChanged
RB_Daily.Enabled = True
RB_Weekly.Enabled = True
RB_Monthly.Enabled = True
NUD_interval.Enabled = False
DTP_Now.Enabled = True
End Sub
Private Sub RB_Interval_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RB_Interval.CheckedChanged
NUD_interval.Enabled = True
RB_Daily.Enabled = False
RB_Weekly.Enabled = False
RB_Monthly.Enabled = False
End Sub
Private Sub CB_link_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CB_link.CheckedChanged
RB_Time.Enabled = True
RB_Interval.Enabled = True
End Sub
End Class
Here's my Full code for this project.
The aim of this project is to call a webpage or a website then a .txt will be created inside of it all the process that you made in this project.
Now if still you can't understand it, then try it to re-construct.

IOS7 set access code for IPad4 after update.

Why do I suddenly have an access code for my IPad4 after the ios7 update? I didn´t have an access code before, and I haven´t set one either. My wife says she hasen´t used the ipad since yesterday. I can access the ipad through Itunes on my Macbook, but I can´t reset the ipad because I need to turn off the "icloud search" in the ipad settings (which I can´t access because I don´t know the access code).
Can anyone help?
Thanks,
Rob

Hey robertdbuckley,
Thanks for the question. I understand you are experiencing issues with passcode lock. The following articles may help:
iOS: Understanding passcodes
http://support.apple.com/kb/HT4113
iOS: Forgotten passcode or device disabled after entering wrong passcode
http://support.apple.com/kb/HT1212
Thanks,
Matt M.

MDM Workflow - Split jobs for Adds and Updates

I am trying to set up a workflow where the inbound file contains Adds and Updates. I want the Adds to get added to a new workflow and the updated records to split off into a separate workflow branch where they will be automatically processed.
Any ideas on how to split these records?
Regards,
Brent

Have a Status field in the data model. This status field will have "Add" or "Change" as the possible values.
When record gets added, you set this flag to "Add".
When record gets changed, you set this flag to "Change".
Have a validation step. for Record = Add.
If the validation passes, then it is a "Add scenario". Use the branch step for the validation success branch and the validation failure branch.
You should now have two branches one for add and the other for change.

HT1339 I was looking for info on restoring an iPod Touch 4th Gen. But iTunes presents the same Restore button, which when pressed, offers to update, not restore, to iOS 6.0.1. Why?

I found this article when searching for info on restoring (to factory conditions) an iPod Touch 4th Generation. Now I thought this shipped with iOS 5.x (x unknown). But as mentioned too briefly in the header, when I click 'Restore' in iTunes, it offers not to restore, but to update. That is not what I want. I need to use this iPod Touch with Xcode 4.2 under Snow Leopard.
So the question is: what is really going on here and why? Is it really true that 4th G iPod Touches ship with 6.0.1 instead of 5.x? If not, how can I get it to really go back to the original? Why is iTunes failing to offer a restore when I press 'Restore'? If I guessed wrong about which of my several machines running iTunes (some under Windows7, one under Snow Leopard)I used when I upgraded to iOS 6.0.1, would that explain iTune's failure to offer a true Restore?

Restore will not replace an old iOS level. It will update the iOS level to the latest level. If you have to restore youre iPod that is what will happen. The iOS is not a part of a backup.

Link for source code for add-on not working

I followed this link: https://addons.mozilla.org/en-US/firefox/addon/sabnzbdfox/?src=search (with the source download) and got a "404" (https://addons.mozilla.org/en-US/firefox/files/browse/76042/)
Can I find the source code somewhere else and when I do, how do I update the broken link?

Hi,
You can also try after some time. To check for possible temporary network problems please see: http://status.mozilla.com/
If the problem persists, please also try [https://addons.mozilla.org/en-US/firefox/files/browse/76042/ the link] in a [https://support.mozilla.org/en-US/kb/Managing-profiles new profile].
[https://support.mozilla.org/en-US/kb/Profiles?s=profile&r=2&e=sph&as=s Profiles Howto]

Fct codes for PRINT , FIND ,FIND next

hi,
my requriement is I have to exclude PRINT,FIND and FFIND NEXT from my screen.
for that I need set pf-status excluding itab.
I have to take an internal table with these function codes.
help me its urgent

Hi sudha ,
List Events in an ABAP Program
After a user interaction on a list, the ABAP runtime environment checks whether it should process the function code itself (for example, %EX or %PC), or whether it should trigger the relevant event. Unlike normal screens, in which the PAI event is triggered, the runtime environment triggers three special events when list events occur. You can use the corresponding event blocks in your ABAP program to react to the user action. From within the program, you can use the SY-UCOMM system field to access the function code. There is no OK_CODE field that is filled.
Event Blocks for Function Codes PF<nn> (Obsolete)
When the user chooses a function code PF<nn> (<nn> can be between 01 and 24), the system always triggers the AT PF<nn> event. In the standard list status, the function keys F<nn> that are not reserved for predefined system functions all have the function code PF<nn> as long as a corresponding event block is defined in the program.
AT PF<nn>.
<statements>.
These event blocks are executed when the user chooses the corresponding function key. The position of the cursor in the list is irrelevant.
If you use these event blocks at all, it should only be for temporary test versions. In production programs, you should only use AT USER-COMMAND with a dialog status of your own to assign function codes to function keys. When you use your own interfaces, the system displays a function text explaining what the function does. This does not happen when you use AT PF<nn> event blocks.
Event Block for Function Code PICK
When the user triggers the function code PICK, AT LINE-SELECTION is always triggered if the cursor is positioned on a list line. The function code PICK is, by default, always linked with function key F2 and hence with the mouse double-click. Consequently, if you have a simple program that does not react to any further user actions, you only need to write this event block.
AT LINE-SELECTION.
<statements>.
As described in the section Dialog Status for Lists, the function code PICK is always added to the standard list status when you have an AT LINE-SELECTION event in your program.
If you assign PICK to other function keys or menu entries, AT LINE-SELECTION is also triggered when the user chooses then. You should avoid this for the sake of the semantics.
Conversely, if you have a more extensive program that does not react to line selection, you should not use the function code PICK. Instead you should assign a different function code to F2 , to ensure that as many events as possible trigger the AT USER-COMMAND event.
Event Block for User-Defined Function Codes
If the user chooses a function code during list processing that is neither processed by the system, or PICK or PF<nn>, the system triggers the event AT USER-COMMAND. For this event, you must define your own GUI status for a list. To react to your own function codes in a program, you must define the following event block:
AT USER-COMMAND.
<statements>.
In this event block, you can use an IF or CASE structure to tell the function codes apart. They are available in the system field SY-UCOMM. There are further system fields that are filled in list events, such as SY-LSIND and SY-PFKEY, that allow you to make further case distinctions.
Triggering a List Event from the Program
You can trigger a list event from the program as follows:
SET USER-COMMAND <fc>.
This statement takes effect after the current list is completed. Before the list is displayed, the event assigned to function code <fc> is triggered, regardless of the dialog status you are using.
The effect is the same as when the user chooses the function. In other words, predefined list function codes are trapped and processed by the runtime environment, the function codes PICK and PF<nn> trigger the AT LINE-SELECTION and AT PF<nn> events, and user-defined function codes trigger the AT USER-COMMAND event block.
Function code PICK triggers an event only if the cursor is located on a list line.
Using this statement in conjunction with the function codes reserved for system functions, you can call the system functions from the program. For example, you can use SET USER-COMMAND '%SC' to call the Find dialog box directly, or to position the list correctly before it is displayed.
If you use several SET USER-COMMAND statements while creating a list, the system executes only the last one.
Examples
Example for AT LINE-SELECTION.
REPORT demo_list_at_line_selection.
START-OF-SELECTION.
WRITE 'Basic List'.
AT LINE-SELECTION.
WRITE: 'Secondary List by Line-Selection',
/ 'SY-UCOMM =', sy-ucomm.
When you run the program, the basic list appears with the standard list status. The detail list shows that SY-UCOMM has the value PICK.
Example for AT PF<nn>.
REPORT demo_list_at_pf.
START-OF-SELECTION.
WRITE 'Basic List, Press PF5, PF6, PF7, or PF8'.
AT pf5.
PERFORM out.
AT pf6.
PERFORM out.
AT pf7.
PERFORM out.
AT pf8.
PERFORM out.
FORM out.
WRITE: 'Secondary List by PF-Key Selection',
/ 'SY-LSIND =', sy-lsind,
/ 'SY-UCOMM =', sy-ucomm.
ENDFORM.
After executing the program, the system displays the basic list. The user can press the function keys F5 , F6 , F7 , and F8 to create secondary lists. If, for example, the 14th key the user presses is F6 , the output on the displayed secondary list looks as follows:
Secondary List by PF-Key Selection
SY-LSIND = 14
SY-UCOMM = PF06
Example for AT USER-COMMAND.
REPORT demo_list_at_user_command NO STANDARD PAGE HEADING.
START-OF-SELECTION.
WRITE: 'Basic List',
/ 'SY-LSIND:', sy-lsind.
TOP-OF-PAGE.
WRITE 'Top-of-Page'.
ULINE.
TOP-OF-PAGE DURING LINE-SELECTION.
CASE sy-pfkey.
WHEN 'TEST'.
WRITE 'Self-defined GUI for Function Codes'.
ULINE.
ENDCASE.
AT LINE-SELECTION.
SET PF-STATUS 'TEST' EXCLUDING 'PICK'.
PERFORM out.
sy-lsind = sy-lsind - 1.
AT USER-COMMAND.
CASE sy-ucomm.
WHEN 'FC1'.
PERFORM out.
WRITE / 'Button FUN 1 was pressed'.
WHEN 'FC2'.
PERFORM out.
WRITE / 'Button FUN 2 was pressed'.
WHEN 'FC3'.
PERFORM out.
WRITE / 'Button FUN 3 was pressed'.
WHEN 'FC4'.
PERFORM out.
WRITE / 'Button FUN 4 was pressed'.
WHEN 'FC5'.
PERFORM out.
WRITE / 'Button FUN 5 was pressed'.
ENDCASE.
sy-lsind = sy-lsind - 1.
FORM out.
WRITE: 'Secondary List',
/ 'SY-LSIND:', sy-lsind,
/ 'SY-PFKEY:', sy-pfkey.
ENDFORM.
When you run the program, the system displays the following basic list with a the page header defined in the program:
You can trigger the AT LINE-SELECTION event by double-clicking a line. The system sets the status TEST and deactivates the function code PICK. The status TEST contains function codes FC1 to FC5. These are assigned to pushbuttons in the application toolbar. The page header of the detail list depends on the status.
Here, double-clicking a line no longer triggers an event. However, there is now an application toolbar containing five user-defined pushbuttons. You can use these to trigger the AT USER-COMMAND event. The CASE statement contains a different reaction for each pushbutton.
For each interactive event, the system decreases the SY-LSIND system field by one, thus canceling out the automatic increase. All detail lists now have the same level as the basic list and thus overwrite it. While the detail list is being created, SY-LSIND still has the value 1.
Example for SET USER-COMMAND.
REPORT demo_list_set_user_command NO STANDARD PAGE HEADING.
START-OF-SELECTION.
SET USER-COMMAND 'MYCO'.
WRITE 'Basic List'.
AT USER-COMMAND.
CASE sy-ucomm.
WHEN 'MYCO'.
WRITE 'Secondary List from USER-COMMAND,'.
WRITE: 'SY-LSIND', sy-lsind.
SET USER-COMMAND 'PF05'.
ENDCASE.
AT pf05.
WRITE 'Secondary List from PF05,'.
WRITE: 'SY-LSIND', sy-lsind.
SET CURSOR LINE 1.
SET USER-COMMAND 'PICK'.
AT LINE-SELECTION.
WRITE 'Secondary List from LINE-SELECTION,'.
WRITE: 'SY-LSIND', sy-lsind.
SET USER-COMMAND '%SC'.
This program creates one basic list and three detail lists. When the program starts, the third detail list is displayed immediately, along with a dialog box for searching in the list. The dialog box is displayed by setting the predefined function code %SC. To view the other lists, the user chooses Back.
Note that in the event AT PF05, the SET CURSOR statement is used to position the cursor on a list line in order to support the function code PICK.
I think this will solve u r problem.
Reward points if useful..
Regards
Nilesh

TRIED THis CODE for TO FIND THE FIBONACCI USING THREAD ,BUT SHOWING ERROR FOR FOLLOWING CODE fib = fib(k+1);

showing following error in line 34
error: cannot find symbol
fib = fib(k+1);
       ^
symbol:   method fib(int)
location: class FibN
1 error
import java.util.*;
class AsynchFunctionTest
public static void main(String[]args)
Scanner in = new Scanner(System.in);
System.out.print("enter value for n");
int n = in.nextInt();
FibN t = new FibN(n);
t.start();
try
t.join();
catch(InterruptedException e){}
System.out.println("Fib("+n+") = "+ t.getResult());
class FibN extends Thread
private int n;
private long result;
public FibN(int nn)
n = nn;
public void run()
long fib = 1;
int k = 0;
while(k < n){
fib = fib(k+1);
k++;
result = fib;
public long getResult()
return result;

rinojoseph wrote:
sorry for that this is the error i getting for that code
error: cannot find symbol   line 34
fib = fib(k+1);
       ^
symbol:   method fib(int)
location: class FibN
1 error
Process completed.
sorry
Hmm - well you declared 'fib' like this:
>
long fib = 1;
>
So how do you expect to call a 'long' as if it were a function?

Firefox won't open after checking for add-on updates

Hi
i am having problems with Add-ons checking for updates.
The first problem is that in add-on manager, even though i have it set to automatically update add-ons, it has no history of finding any and it's failure to find a new version of a plug-in meant pdfs weren't opening see full details here ... https://support.mozilla.com/en-US/questions/829011
The problem i am now having is that when i manually check for updates in Add-Ons manager, it pauses for a few seconds, and completes it's task by saying it hasn't found anything. If i then close Firefox, i can't open Firefox again until i go into task manager and kill the process. It says it's already running and i have to close it first?!

can't believe that i was the only person to have the problem, but no replies whatsoever suggest i was. have now upgraded to 5.0 where the problem has not yet reoccurred.

Invalid code for os x update

I have been sent three codes to update OS X on my Macbook Pro, all said invalid when i attempt to redeem in app store. customer service of no help. Any advice?

Thanks to Joan1957 on the discussion board I finally got my answer--you have to OPEN the PDF file sent with the password and then use that code to redeem, and the download began. So simple, and customer service was clueless.

Add update find codes fpr a single button

I have created one btns- (acting for add,find, update etc having same unique id )using VB.NET code.I want to write code according to the captions of the button...I mean for diff caption of the btn , diff action should perform
So , plz anyone tell me how to code for it using VB.NET(for Business One)
Thnxs in advance..
Chetan

Chetan,
You have posted your question in the SAP Business One integration for SAP NetWeaver forum. Your question relates to the SAP Business One SDK and you need to post your question in the SAP Business One forum. You should get a response by posting it in that forum.
Eddy

Creation of a Single button for both Update and Insert

Hi,
I want to create a button which performs both Insert and Update function. As of now i have 2 seperate buttons. Can I combine them in to one by writing a procedure which checks for the data in the database...If the record exists, then it should update the record, if not it should insert...Please guide me
Regards,
Pa

Hi,
If I am inserting in to the table a new record, how do I check for that column in the table...
It should work this way..
I have a list of users in a page, if I click on any user name, it will redirect me to another screen which will allow me to create a record for the selected user name. I want to check the selected user name in the table. If it is already existing then need to update, else insert.
Regards,
Pa

Source code for address book

hi everyone,
i have to make a contact wizard for iphone, i have allready designed the view for contact wizard using navigation controller, there are 3 pages total which includes UITextFields, PickerView, and Table View.
Now i dont know where to write code for add contacts in address book database.
can any one help me by some code sample...?????
i have written code in a function which is called on the Navigation toolbar Button
the code is
ABRecordRef aRecord = ABPersonCreate();
CFErrorRef anError = NULL;
ABRecordSetValue(aRecord, kABPersonFirstNameProperty,
CFSTR("Jijo"), &anError);
ABRecordSetValue(aRecord, kABPersonLastNameProperty,
CFSTR("Pulikkottil"), &anError);
if (anError != NULL) {
NSLog(@"error while creating..");
CFStringRef firstName, lastName;
firstName = ABRecordCopyValue(aRecord, kABPersonFirstNameProperty);
lastName = ABRecordCopyValue(aRecord, kABPersonLastNameProperty);
ABAddressBookRef addressBook;
CFErrorRef error = NULL;
addressBook = ABAddressBookCreate();
BOOL isAdded = ABAddressBookAddRecord (
addressBook,
aRecord,
&error
if(isAdded){
NSLog(@"added..");
if (error != NULL) {
NSLog(@"ABAddressBookAddRecord %@", error);
error = NULL;
BOOL isSaved = ABAddressBookSave (
addressBook,
&error
if(isSaved){
NSLog(@"saved..");
if (error != NULL) {
NSLog(@"ABAddressBookSave %@", error);
CFRelease(aRecord);
CFRelease(firstName);
CFRelease(lastName);
CFRelease(addressBook);
But it is showing many errors.
can any one give me some advice how to manage it?

You probably won't get much help here... this is a user forum, not a developer or programmer forum.

Code for single button which acts for add,find,update

Similar Messages

Maybe you are looking for