Enhanced messagebox() with customized return values.

Is there a function built in to vfp where I can do a messagebox type of a dialog but with my own options? For example if I want to have a dialog with "Send email, Don't send email, OK, Cancel" as my options.
Or should one write his own?
Thanks.

Hi Aleniko2,
in 2012 Cesar Chalom posted an update to a custom messagebox on his vfpimaging blog on foxite. You should have a look at it ;-)
http://weblogs.foxite.com/vfpimaging/2012/01/30/extended-messagebox-function-reviewed/
HTH
Gruss / Best regards
-Tom
Debugging is twice as hard as writing the code in the first place.
Therefore, if you write the code as cleverly as possible,
you are, by definition, not smart enough to debug it. 010101100100011001010000011110000101001001101111011000110110101101110011

Similar Messages

CreateInsert and LOV with multiple return values

HI. I am on Build JDEVADF_11.1.2.3.0_GENERIC_120914.0223.6276.1
I have a View Object which is based on Entity Object.
View Object has customer_name and customer_id attributes.
customer_name attribute has LOV (input field with LOV) based on some other View Object (which of caurse holds customer name and customer id data)
I defined that when LOV return the chosen values it will populate customer_name with "Customer Name" value and customer_id with "Customer Id" value
All atributes are updatable
I droped my View Object on the page and also "CreateInsert" buton. When I click on "CreateInsert" button, I can see new row added as expected, customer_name field has LOV. I can choose from LOV and can see customers and customer_id data. But when I click OK in the LOV pop-up only customer_name attribute is populated!
I do see that customer_id is returned from LOV (I implemented ReturnPopupEvent listener), but still the customer id remains empty.
I though maybe I need to add LOV as auto submit = true and set LOV to be a partial trigger for customer_id. But still - it didn't help
However, if I run Application Module tester, I do get what I want. I can create new row and when I change customer name , both customer name and customer id fields are populated
Please advice

Hi Michael,
On Lov VO, make sure you have at least one or combination of attributes as Key attribute. and re test.
Thanks,
Jeet

How to populate right side of Shuttle with display/return values?

Hello,
I know, that the proper way to populate the right side of shuttle is that:
declare
     v_list     apex_application_global.vc_arr2;
begin
     select profile_name return_value
       bulk     collect
       into     v_list
       from     user_profiles
      where     user_id = :p61_user_id;
     return (apex_util.table_to_string (v_list));
end;It is comfortable for the user to see the name of the profile.
However, I need a profile_id as a return value, like I have it on the left side of the shuttle.
The left side of the shuttle is populated with a select list with display/return values, as you know.
I need both sides of the shuttle to return profile_id in order to create a merge.
How is it possible to populate the right side of the Shuttle with display/return values?

All you have to do is to use the subset of shuttle query to assign value to the right side shuttle.
http://apex.oracle.com/pls/apex/f?p=50942:95
I have created a dummy page with shuttle query
SELECT ename, empno FROM emp ORDER by 1then I have defined a pl-sql before header process to assign values to shuttle variable
using the code
begin
:P95_SHUTTLE := '7566:219:7900:7782:90';
end;since 90 is not one the result set of the shuttle query it is getting displayed as number, and for others it is displaying the text. Thanks.
--Manish

How to create a procedure function with a return value of ref cursor?

Can anybody provide a sample about how to create a procedure function with a return value of REF CURSOR?
I heard if I can create a function to return a ref cursor, I can use VB to read its recordset.
Thanks a lot.

http://osi.oracle.com/~tkyte/ResultSets/index.html

Difficulty in creating a chart by using a function with a returned value

Hi,
I am having a problem in using own function to create chart a with a returned value as the chart. If not using the returned value, it works fine.
Is this a known issue?

If you share some code, we might be able to help you.

Authorization Issue with Custom Pending Value Object and Anonymous Users

Hi,
I am just converting my demo from version 7.1 to 7.2. I am not doing upgrade. The demo uses a custom pending value object USER_REQUEST. The idea is that new employee goes to Java AS as anonymous user and enters her details and store where she will work. After submitting request there is an approval process using custom entry type USER_REQUEST. If the request is approved then IdM converts USER_REQUEST into MX_PERSON entry. This works nice in 7.1 but I am having problems with replicating this in 7.2. I created new UI task accessible by anonymous that creates new USER_REQUEST entry. I also assigned role idm.anonymous with UME action idm_anonymous to UME built in group Anonymous users.
My problem is with the field STORE. This field is a reference field to another custom entry type STORE (this entry type will be used in context based assignment). Every new employee must selects a store where she will work. The problem is when user clicks on button "Select". Web dynpro terminates and returns authorization error. I also tested this with entry type MX_ROLE. I added attribute MXREF_MX_ROLE and same issue. So it seems that just assigning UME action idm_anonymous is not enough to list objects from identity store. I found a workaround for this issue. When I assign also UME action idm_authenticated to Anonymous users then it does not dump and I get a pop up window where I can search for store. It does not seem right to assign idm_authenticated to anonymous users.
Another issue is with display task for entry type USER_REQUEST. I assigned a display task to entry STORE and I set that Anonymous have access to this task in Access control tab. I assigned default value to the field store. So when a user opens page she can see a hyper link to display already assigned store. When user clicks on this hyper link it opens a new pop up window and user must authenticate against Java AS. After successful authentication the display task for entry STORE is displayed. I would assume that anonymous user can display it without authentication.
So to me it seems like authorization checks have been changed in 7.2 versions and are more strict for anonymous tasks. Hence my question is how can I implement my scenario. Am I missing some configuration or what's the proper solution to my two issues? I don't count assigning idm_authenticated to Anonymous users as a solution. This workaround does not solve my second issue.
Thanks

Some of the folks from Trondheim labs check, but rather infrequently. There's another person who I guess is in consulting that also checks from time to time.
Sorry I can't help you with your main question...
Matt

Updating EBAN TAble with custom field values by BAPI_PR_CREATE

Hi all,
My requirement is PR creation by BAPI_PR_CREATE Function Module .
for pr item level customer added 10 fields in the EBAN table append structure CI_EBANDB. .
i am creating PR by using Funcation module BAPI_PR_CREATE.
In this Function Module I have to pass the structure name and field values in the EXTENTIONIN .
what is the structure name I have to pass and how populate data in to the EBAN table.
after that i have to create PR and updating 10 two custom field values in the EBAN Table.
how to proceed for updating the customer field values in the eban table.
thanks in advance.
sri

Hi Sri,
better you dont use it. try this..
example code:
data: i_banc type bapiebanc occurs 0 with header line.
data: i_bkn type bapiebkn occurs 0 with header line.
data: i_ret type bapireturn occurs 0 with header line.
data: i_band type bapieband occurs 0 with header line.
data: i_bantx type bapiebantx occurs 0 with header line.
data number type bapiebanc-preq_no.
i_banc-acctasscat = par_asset.
i_banc-short_text = 'VehicleBooking'.
i_banc-quantity = '1'.
i_banc-DEL_DATCAT = '1'.
i_banc-deliv_date = par_date .
i_banc-mat_grp = 'TRAVEL'.
i_banc-unit = 'ST'.
i_banc-c_amt_bapi = 100.
i_bkn-cost_ctr = par_cost.
i_bkn-g_l_acct = par_gl.
i_bkn-fund = par_fund.
i_bkn-funds_ctr = par_fund_ctr.
append i_banc.
append i_bkn.
call function 'BAPI_REQUISITION_CREATE'
exporting
skip_items_with_error = 'X'
importing
number = number
tables
requisition_items = i_banc
requisition_account_assignment = i_bkn
requisition_item_text = i_bantx
return = i_ret
Describe table i_ret lines count.
If count > 0.
loop at i_ret.
Message e000(zbooking) with i_ret-message
endloop.
Endif.
if not number is initial.
S000(zbookings) with 'Requisition number ' , number ,' created'.
endif.
thanks
trinadh

Calling web service via utl_dbws with unbounded return values

Hello, everyone.
I'm trying to use utl_dbws to call web service from Oracle DB 10 g.
WS has unbounded return value:
<xs:element maxOccurs='unbounded' minOccurs='0' name='return' type='xs:string'/>
I'm setting return paramter in web service call handler like this:
sys.UTL_DBWS.set_return_type(l_h_service_call, cs_qname_type_string);
and when I'm trying to call it from PL/SQL function I'm getting an error:
ORA-29532: Java call terminated by uncaught Java exception:
deserialization error: XML reader error: unexpected character content: "s2"
ORA-06512: at "SYS.UTL_DBWS", line 388
ORA-06512: at "SYS.UTL_DBWS", line 385
ORA-06512: at line 38
I've tried to return values by out parameters and got the same exception.
It looks like utl_dbws needs to know parameters count before calling.
Have anyone succeded in getting arrays from Web Service call?
This is a part of wsdl:
<xs:complexType name='getProcessList'>
<xs:sequence>
<xs:element minOccurs='0' name='nameMask' type='xs:string'/>
</xs:sequence>
</xs:complexType>
<xs:complexType name='getProcessListResponse'>
<xs:sequence>
<xs:element maxOccurs='unbounded' minOccurs='0' name='return' type='xs:string'/>
</xs:sequence>
</xs:complexType>
Throught SoapUI I can produce such kind of request:
<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:proc="http://processmanager.argustelecom.ru/">
<soapenv:Header/>
<soapenv:Body>
<proc:getProcessList>
<processNameMask>*</processNameMask>
</proc:getProcessList>
</soapenv:Body>
</soapenv:Envelope>
and get a response:
<env:Envelope xmlns:env="http://schemas.xmlsoap.org/soap/envelope/">
<env:Header/>
<env:Body>
<ns2:getProcessListResponse xmlns:ns2="http://processmanager.argustelecom.ru/">
<return>s1</return>
<return>s2</return>
<return>s3</return>
<return>s4</return>
</ns2:getProcessListResponse>
</env:Body>
</env:Envelope>
PL/SQL function:
DECLARE
cs_qname_type_string CONSTANT sys.UTL_DBWS.qname
:= sys.UTL_DBWS.to_qname('http://www.w3.org/2001/XMLSchema', 'string') ;
cs_qname_type_int CONSTANT sys.UTL_DBWS.qname := sys.UTL_DBWS.to_qname('http://www.w3.org/2001/XMLSchema', 'int');
cs_qname_type_any CONSTANT sys.UTL_DBWS.qname
:= sys.UTL_DBWS.to_qname('http://www.w3.org/2001/XMLSchema', 'anyType') ;
cs_endpoint CONSTANT VARCHAR2(256) := 'http://server:8080/process-manager/ProcessManager';
l_service sys.UTL_DBWS.service;
l_service_qname sys.UTL_DBWS.qname;
l_port_qname sys.UTL_DBWS.qname;
l_operation_qname sys.UTL_DBWS.qname;
l_h_service_call sys.UTL_DBWS.call;
l_params sys.UTL_DBWS.anydata_list;
l_ret_val SYS.ANYDATA;
BEGIN
l_service_qname := sys.UTL_DBWS.to_qname(NULL, 'ProcessManagerService');
l_service := sys.UTL_DBWS.create_service(l_service_qname);
l_port_qname := sys.UTL_DBWS.to_qname(NULL, 'ProcessListServiceBinding');
l_operation_qname := sys.UTL_DBWS.to_qname('http://processmanager.argustelecom.ru/', 'getProcessList');
l_h_service_call := sys.UTL_DBWS.create_call(l_service, l_port_qname, l_operation_qname);
sys.UTL_DBWS.set_target_endpoint_address(l_h_service_call, cs_endpoint);
-- return type
sys.UTL_DBWS.set_return_type(l_h_service_call, cs_qname_type_any);
-- param type
sys.UTL_DBWS.ADD_PARAMETER(l_h_service_call, 'processNameMask', cs_qname_type_string, 'ParameterMode.IN');
l_params(1) := anydata.convertvarchar2('*');
l_ret_val := sys.UTL_DBWS.invoke(l_h_service_call, l_params);
IF l_ret_val IS NULL THEN
DBMS_OUTPUT.put_line('l_ret_val is null');
ELSE
DBMS_OUTPUT.put_line('l_ret_val is not null');
END IF;
sys.UTL_DBWS.release_call(l_h_service_call);
END;
Edited by: Ilya on 03.12.2008 3:50

Hi Tony
I'm not sure if you would have solved your problem by now, but with my recent experience with the utl_dbws package, for doc lits with complex data types, you have to call the service with an XML request, as opposed to passing the param array.
If you still need details, reply accordingly.
Ta
cT

Updating EBAN table with custom field values for BAPI_PR_CREATE

Hi all,
My requirement is PR creation by BAPI_PR_CREATE Function Module .
for pr item level customer added 10 fields in the EBAN table append structure CI_EBANDB. .
i am creating PR by using Funcation module BAPI_PR_CREATE.
In this Function Module I have to pass the structure name and field values in the EXTENTIONIN .
what is the structure name I have to pass and how populate data in to the EBAN table.
after that i have to create PR and updating 10 two custom field values in the EBAN Table.
how to proceed for updating the customer field values in the eban table.
thanks in advance.
sri

Hi
First you need to append a structure in EBAN table, The values you need to pass to the
BAPIPAREX - Ref. structure for BAPI parameter ExtensionIn/ExtensionOut
Structure will be the appen strucre created in EBAN.
You can pass the values of the 10 fileds to the VALUEPART1, VALUEPART2 fileds in the structure with 240 charcters each.
Hope this helps.
Thanks & Regards
Kishore

LOV problem with multiple return values.

I created a ViewObject and in it a transient attribute.
I create a ViewAccessor for another field and a LOV for it (default InputText with Lov Value).
In List Return Values I added also my tranient attribute in order to receive another attribute from the accesor VO.
When I run it from the Application browser I see my transient attribute emtpty even if the "source" attribute is not empty.
If I change the value from the LOV the source value changes bit the transient is still empty.
What's wrong ?
Tks
Tullio

Repost.

Problem with the return value from a tablemodel after filtering

I have a form (consult that return a value) with a jtextfield and a jtable. when the user types in the textfield, the textfield call a method to filter the tablemodel.
everything works fine, but after filtering the model, the references are lost and the return value does not match with the selected row.
I read that convertColumnIndexToView, convertRowIndexToView, vertColumnIndexToModel and convertRowIndexToModel, solve the problem, but I used all and nothing.
**** This is the code to fill the jtable
DefaultTableModel modelo=(DefaultTableModel)this.jTable1.getModel();
while(rs.next()){
Object[] fila= new Object[2];
fila[0]=rs.getObject("id_categoria");
fila[1]=rs.getObject("nombre");
modelo.addRow(fila);
this.jTable1.getColumnModel().removeColumn(this.jTable1.getColumnModel().getColumn(0));
// I delete the first column because is a ID, I dont want that the user see it. the value is only for me**** this is the method to filter from the jtextfield
private void FiltrarJtable1() {
TableRowSorter sorter = new TableRowSorter(this.jTable1.getModel());
sorter.setRowFilter(RowFilter.regexFilter("^"+this.jTextField1.getText().toUpperCase(), 1));
this.jTable1.setRowSorter(sorter);
this.jTable1.convertRowIndexToModel(0);
}*** this is the method that return the ID (id_categoria) from the tablemodel
private void SeleccionarRegistro(){
if(this.jTable1.getSelectedRow()>-1){
String str_id =this.jTable1.getModel().getValueAt(this.jTable1.getSelectedRow(),0).toString();
int_idtoreturn=Integer.parseInt(str_id);
this.dispose();
}else{
JOptionPane.showMessageDialog(this,"there are no records selected","Warning!",1);
}Who I can solve this problem?

m_ilio wrote:
I have a form (consult that return a value) with a jtextfield and a jtable. when the user types in the textfield, the textfield call a method to filter the tablemodel.
everything works fine, but after filtering the model, the references are lost and the return value does not match with the selected row.
I read that convertColumnIndexToView, convertRowIndexToView, vertColumnIndexToModel and convertRowIndexToModel, solve the problem, but I used all and nothing.
You're right in that you have to use convertRowIndexToModel(), but you are using it wrong. That method takes as input the index of a row in the view, i.e. the table, and returns the corresponding row in the underlying TableModel. No data is changed by the call, so this:
this.jTable1.convertRowIndexToModel(0);is meaningless by itself.
What you need to do is the following:
int selectedRow = this.jTable1.getSelectedRow(); // This is the selected row in the view
if (selectedRow >= 0) {
int modelRow = this.jTable1.convertRowIndexToModel(selectedRow); // This is the corresponding row in the model
String str_id =this.jTable1.getModel().getValueAt(modelRow, 0).toString();
}Hope this helps.

Problem with Bapi_po_Getdetail return values

We have developed a web service in asp.net to get the details of a particular purchase order number calling Bapi_po_Getdetail. The input parameters that we pass are:
string ITEMS = X
string PURCHASEORDER= <purchase order number>
But when we debug and check the return values from the bapi, BAPIEKPO Table doesnt have any data, it is null.
Could someone help us, please?

Please initialize the BAPIEKPOTable bedore call. Passing null allways returns null.
NCo:
string ITEMS = X
string PURCHASEORDER= <purchase order number>
BAPIEKPOTable result = new BAPIEKPOTable();
proxy.Bapi_po_Getdetail(ITEMS, PURCHASEORDER, ref result);
Soap Processor / Web Service Wizard
string ITEMS = X
string PURCHASEORDER= <purchase order number>
BAPIEKPO[] result = new BAPIEKPO[0];
proxy.Bapi_po_Getdetail(ITEMS, PURCHASEORDER, ref result);

Webservice : problem with Base64 returned value

Hello all,
We are calling a webservice from a Flex2 application.
When the returned value does not contain accentuated letters,
we receive the value "as-is", everything is OK.
When there is at least one accent, the result is
automatically Base64 encoded by the server, and the
xsi:type="n2:base64 is specified in the XML answer.
The problem is that Flex2 does not Base64 decode the returned
string, ans we cannot get the right value.
We do not think that the problem is on the server, because we
tryied to use 2 other webservice clients, and they worked well.
We wonder if Flex2 can handle Base64 encoding on Webservice
results or not.
We thought abut using the Base64 decoder class, but it won't
work because the result if not *always* Base64 encoded (depending
if it contains some chars or not).
Is there any solution to this issue ? If it can help, I paste
the XML returned by the server at the end of this message.
Thank you for your help.
MiF
<?xml version="1.0" encoding="UTF-8" ?>
<env:Envelope xmlns:xsd="
http://www.w3.org/2001/XMLSchema"
xmlns:env="
http://schemas.xmlsoap.org/soap/envelope/"
xmlns:xsi="
http://www.w3.org/2001/XMLSchema-instance">
<env:Body>
<n1:GetArticleResponse xmlns:n1="urn:ActionWebService"
env:encodingStyle="
http://schemas.xmlsoap.org/soap/encoding/">
<return xmlns:n2="
http://schemas.xmlsoap.org/soap/encoding/"
xsi:type="n2:base64">PD94bWwgdmVyc2lvbj0iMS4xIiBlbmNvZGluZz0iSVNPLTg4NTktMSI/Pgo8
YXJ0aWNsZXM+CiAgPGFydGljbGU+CiAgICA8aWQ+MTwvaWQ+CiAgICA8Y29k
ZT5NaXRjaDwvY29kZT4KICA8L2FydGljbGU+CiAgPGFydGljbGU+CiAgICA8
aWQ+MjwvaWQ+CiAgICA8Y29kZT5Qb2xvPC9jb2RlPgogIDwvYXJ0aWNsZT4K
ICA8YXJ0aWNsZT4KICAgIDxpZD4zPC9pZD4KICAgIDxjb2RlPkvpa+k8L2Nv
ZGU+CiAgPC9hcnRpY2xlPgo8L2FydGljbGVzPgo=</return>
</n1:GetArticleResponse>
</env:Body>
</env:Envelope>

You should use cast_to_varchar2 regardless what is source of base64_encode.
Because base64-value consists of single byte ASCII-characters.

BPC5.1 - Data manager package to Stored proc with custom return codes

Hi all,
Does anyone have experience passing the return codes from a stored procedure back into the eData "view status" package progress or event log details?
When my stored procedure throws errors, the offending SQL code shows up in the pacakge details, which is helpful. But what I'd really like is to structure my stored proc with return codes
0 = everything's wonderful
1 = invalid category / time combination
2 = unauthorized
3 = no data to process
And then handle these codes as either "completed" "warning" or "error" in the package progress.
And ideally, I'd like to put some meaningful message about the warnings & errors, directly into the log details, so the user can fix the problem themselves rather than ask the IT guy to trouble-shoot.
Any tips? I've started playing with using the on-complete, on-success, on-failure routing of different tasks within the DTSX package (SQL 2005), but I'm just working on a trial-and-error basis right now. (With # of errors = # of trials.)
Thanks,
Tim

In case anyone's interested, I've solved this by tracking my return codes as a package variable.
Within the package, I have conditional logic moving from task to task, evaluating the return code to check for various conditions, and selecting which tasks to perform accordingly.
In the last task, I run a final stored procedure which posts some data (completion time & status) to a custom transaction log table, and then if the return code is not zero, I script and execute some SQL which I know will throw a "fake" error. The SQL statement itself includes the key information I want the end user to see. For example
Select InvalidEntitySelection [USEast1],TransactionID [12340] from ThisTableDoesntExist
Select UnauthorizedUser [Tim], TransactionID [12345] from ThisTableDoesntExist
Select WorkStatusIsLocked [USEast1 Actual 2008], TransactionID [12345] from ThisTableDoesntExist
It's not exactly elegant, but it gets the message across, which is all that I need. In this way, the end user sees that the package failed with an error, and when they look at the package details, they can see the problem. They can pass on the transaction ID to an administrator to look into the details, if they can't figure it out on their own.
Sorin, I never managed to figure out how to use a VB task to send the information back to the user, plus force the package to end in an error. I'm sure there's a way to do so, but this seems to work for my requirement.
I'm not entirely happy with the "fake error" approach, but I don't know if BPC has any support for "intentional" programming of errors in the DTS scripting toolset.
Thanks,
Tim

Dropdown list with custom All Values option

Hi,
We are running VC on 7.4 SP2. I have a dropdown list which gets its' values from a BW query. This works great except that I want to add a custom entry which selects all values.
In BW you would do this by setting the selection variable to "" as in nothing specified/empty. This is also the default setting in VC (you made no selection so you will get all results) but once you select something this can not be deselected.
So the idea is to add a custom entry All with value "" but apparently this gets send to BW as """" which is not a valid value. VC does not allow to use an empty value field.
So basically I am stuck here. Any of you found a solution to this problem?
regards,
Matthias

Hi Matthias,
I see your point. I could suggest two options:
1. In the dropdown input control, delete the value. Then press submit.
This works fine, only we don't get the empty value in the list.
2. To have the empty value in the list, like this:
Add to the entries of the list:
Then edit the mapping to the service to convert * into an empty string:
Thanks,
Udi

Enhanced messagebox() with customized return values.

Similar Messages

Maybe you are looking for