How to make a link between Visual C++ and LabView?
I want to use my labview program to read the data generated by visual C++ program to perform some control to digitial oscilloscope. I have read your homepage. I know it is using ActiveX to get everything done. However, I dont know where to get started!The data is just a simple number, 1 to 8. So what should I do right now? Where Should I start?
thanks for helping me.
Possible alternatives to ActiveX calls:
If you program can save the data to a file, then you could read the file from LabVIEW and act accordingly.
If the data is generated by a function that is in a .dll, you can make a call to the function from LabVIEW using the "Call Library Function".
If you have the code of your C++ program, maybe you can work a CIN that will work directly from LabVIEW.
There can be other alternatives.
Regards;
Enrique
www.vartortech.com
Similar Messages
-
EH&S: How to make a link between tables PA0002 and T7EHS00_ANA_HEAD
Hi all, I need to make an Infoset for EH&S and a I can't link tables PA0002 and T7EHS00_ANA_HEAD, i search values in tables an the values in the field PRNR in both tables are different. I need to know if there is a table that contains some reference of a the data of an employee so i can make the link an obtain the data of an employee. Thanks.
Edited by: Albio Vivas on Mar 5, 2009 4:16 PMHi Albio,
Check the compatability of the remote cube & edit Phrase Sets. You can display additional information for a phrase set by choosing Utilities - Administration Info. To display the phrase set-to-attribute assignment, choose Utilities - Attribute Assignment.
However, i suggest to go throught he links, which are helpful.
[http://help.sap.com/erp2005_ehp_04/helpdata/EN/a7/2871000a6c11d28a220000e829fbbd/frameset.htm]
[http://help.sap.com/erp2005_ehp_04/helpdata/EN/8d/c8fa3a4dbdf428e10000000a114084/frameset.htm]
http://help.sap.com/erp2005_ehp_04/helpdata/EN/85/b70bdba5944cab8ed7967ec3aea807/frameset.htm
with regards,
mahesh -
How to make the link between the technical version and the packaging vers.
Hello,
Does anyone know how to make the link between the technical version number and the packaging version number ?
For exemple, I can download on the SAP Market Place the version B1iSN 8.8 PL7 but if I look into the B1iSN the version information, it returns B1iP_3.0_SP04_HF03.
This is quite confusing.
Thank you.Hi Gordon,
In fact this information is usefull for me. I was looking for a customer installation but he did not remember which version was installed. They are facing some problems. So I don't know if I have to update B1iSN or not to solve it.
B1iSN returns only the technical version number, but I would like to know which version was downloaded from the Market Place. -
How can i create link between ipad(xcode) and webserver?
Hi, I'm a new to iPad development and i need help,
i'm not good with english but i try to explain my question:
how can i create link between ipad(xcode) and webserver?
(the webserver ".NET" with driver odbc is connected with DB Oracle)
so, how can my ipad application access to the Oracle DB?
Create a webservice (.NET) to be place between iPad and DB, is this correct?
how can i do it?
which are libraries to include in the xcode's framework?
thxI think the following URL will be your best answer:
http://stackoverflow.com/questions/3510468/connecting-iphone-to-an-odbc-database -
How to create database link between oracle9i database and oracle10g
How to create database link between oracle9i database and oracle10g
oracle9i database name "Prod" windows server 2003 ( 172.x.x.x)
oracle10g database name "TEST" sun solaris 9 (165.x.x.x.x)
Please help me on thisFor connections between 10.2 and 9.2 the 9.2 end MUST be at 9.2.0.4 or higher. Connections between 10.2 and 9.2.0.1, 9.2.0.2 or 9.2.0.3 are not supported.
Connections between 10.2 and 9.0.1 was never been supported.
Cheers !!!!
Bhupinder -
How to remove the link between Profile name and corp net account after their disassociation
Hi there,
How do I remove the link between Profile name and corp net account after their disassociation ?
I would like to make remove the link between 'Viv Lingaiah' and
[email protected] Also, I would like to keep 'Viv Lingaiah' and associate with my outlook id and corpnet account.Logon to your live account here
https://account.live.com/summarypage.aspx then under aliases you can add an alias and promote it to primary.
Regards, Dave Patrick ....
Microsoft Certified Professional
Microsoft MVP [Windows]
Disclaimer: This posting is provided "AS IS" with no warranties or guarantees , and confers no rights. -
How to make optical connectivity between Catalyst 4948 and 10K router ?
Hi,
I am Ratheesh P D, network Manager of one project in Motorola. We have one catalyst 4948. Its going to get one 10K router. Our requirement needs optical connection between these two. The document of 4948 says, its compatible with 1000BaseX SFP and 10K is with 1000BaseSX SFP. Could you please tell me how to make these two compatible?For information regarding the optical connectivity in 4948 cat switch follow the url ,
http://www.cisco.com/en/US/products/ps6021/products_installation_guide_book09186a008023fa89.html
For more information on h/w capability and connectivity of 10 k routers follow the url ,
http://www.cisco.com/univercd/cc/td/doc/product/aggr/10000/hdwr/index.htm -
How to make HTTP connection between a midlet and a php server?
As the title above, can anyone share how to make a HTTP connection between those 2? J2ME and PHP. Thanks a lot!
Can you be a little more specific on what you really want.
When i started doing j2me application, i was required to be able to comunicate to a oracle client database, and my first though was using PHP based pages to comunicate and do the query. Later they would just generate the answer and get it on the cellphone. You can communicate with a PHP server via either GET or POST. I'd choose POST as is more secure IMO.
Here are quite a good ammount of examples of how you can do it
http://www.java2s.com/Code/Java/J2ME/Networks.htm
They aren't PHP based examples, but you have can an idea of how it can be done -
How to find the link between tables CRMD_ORDERADM_H and BBP_PDORG ?
HI,All
By TCODE BBP_PD, I cann't find the link by GUID between tables CRMD_ORDERADM_H (Header) and BBP_PDORG (Purchase Organization) , why? how to find this link?
thanks
Jesse.Hello Jianxin,
It depends on document category type.
For Shopping Cart, no link exist between CRMD_ORDERADM_H and BBP_PDORG tables as purchasing organization is defined at item level.
For Purchase Order, using BBP_PDORG-SET_GUID, you get PO header GUID (GUID_HI) in table CRMD_LINK where CRMD-LINK-GUID_SET = BBP_PDORG-SET_GUID.
Regards.
Laurent. -
Passing Array of Srings between Visual Basic and Labview dll
I have searched and searched for the correct way to pass an array of
strings between Visual Basic 6.0 and a Labview 7 dll. So far, I still
do not know how to pass the array. When I create the dll in LV, the
array of strings is presented as a string, not an array. I am familiar
with passing arrays of type double, but I really need to know how to
pass an array of strings. Any and all help is appreciated.
BobHey Bob,
From what I understand, that can get kind of messy. You have to allocate the memory in VB in the format that LabVIEW expects (see the externalcode.h file in National Instruments\LabVIEW 7.0\cintools for details). Then pass a pointer to that location to LabVIEW. There are a couple of related examples online. They don't necessarily show how to pass an array of strings to VB, but they should show how to pass a string and an array. I hope this helps.
Using Microsoft Visual Basic to Call LabVIEW DLLs That Pass String Data Types
http://sine.ni.com/apps/we/niepd_web_display.display_epd4?p_guid=B123AE0CB9B0111EE034080020E74861&p_...
Using Microsoft Visual Basic to Call LabVIEW DLLs That Pass Array Data Pointers
http://sine.ni.com/apps/we/niepd_web_display.display_epd4?p_guid=B45EACE3D9E556A4E034080020E74861&p_...
Regards,
Chris J -
How can I link between FORTRAN program and Labview
I try to use lapviwe to link betwwen different codes one of the them is FORTRAN *.for and the other is Neurosolution breadboards *.nsb but I don't know how so if you can help me I'll do appreciate that for you.
ahmedr40,
I would suggest building the FORTRAN code into a DLL as well as the breadboard code. You can then use the Call Library Function node to call the compiled code. This would be the easiest and fastest method. You could also compile these pieces of code and link them to some C/C++ code that you can write and then call this code from LabVIEW.
Randy Hoskin
Applications Engineer
National Instruments
http://www.ni.com/ask -
How to make a pause between an Alert and a plateformRequest ?
Hello,
I' programming a class which realize a download from an URL called downloadURL. An overview of my code is :
public class SoundDownloader implements CommandListener{
private Alert downloadAlert2;
private String downloadURL;
private MIDlet midlet;
public SoundDownloader(String downloadURL, MIDlet midlet){
this.downloadURL = downloadURL;
this.midlet = midlet;
try {
//download code using HttpConnection and openInputStream()
} catch (Exception e) {
downloadAlert2 = new Alert("Download error !");
downloadAlert2.setType(AlertType.ERROR);
downloadAlert2.setString("Download error : "+e.toString());
downloadAlert2.setTimeout(Alert.FOREVER);
display.setCurrent(downloadAlert2);//show the Alert
downloadAlert2=null;
//I'd like to stay here until the user dismisses the Alert
this.midlet.platformRequest(downloadURL);
this.midlet.notifyDestroyed();
}When an exception is caught, I display an error alert and I'd like to make the user wait until he dismisses the alert before launching a download by the mobile browser (platformRequest).
I don't get this result now! The alert is displayed, but just after (without any delay), the platformRequest method is automatically launched!
Could someone help me please?
Thanks in advance!
/arkienouI would try catch block code with [Alert.setCommandListener|http://java.sun.com/javame/reference/apis/jsr118/javax/microedition/lcdui/Alert.html#setCommandListener(javax.microedition.lcdui.CommandListener)], roughly like below:
downloadAlert2 = new Alert("Download error !");
downloadAlert2.setType(AlertType.ERROR);
downloadAlert2.setString("Download error : "+e.toString())
downloadAlert2.setTimeout(Alert.FOREVER);
downloadAlert2.setCommandListener(new CommandListener() {
public void commandAction(Command c, Displayable d) {
if (c == Alert.DISMISS_COMMAND) {
midlet.platformRequest(downloadURL);
midlet.notifyDestroyed();
display.setCurrent(downloadAlert2);//show the Alert
} -
How to make a connection between an application and a Coherence Grid?
Hello,
We're starting with Oracle Coherence.
How do I connect an application (for example running in JDeveloper) to an existing grid?
I used the following tutorial to get started with Coherence.
http://www.oracle.com/technology/pub/articles/vohra-coherence.html?msgid=6521631
Within JDev an Coherence instance is started, data is entered and queried.
Next I'd like to connect this to a running Coherence instance, (started with [Coherence home]\bin\coherence.cmd)
When I start the coherence.cmd and run the application from within JDev, I can see a connection is made
Map (?):
2008-05-13 13:15:24.667 Oracle Coherence GE 3.3.1/389 <D5> (thread=Cluster, member=4): Member(Id=5, Timestamp=2008-05-13 13:15:24.484, Address=10.35.1
4.150:8090, MachineId=10134, Location=process:4612@WBNL71033) joined Cluster with senior member 1
Map (?):
2008-05-13 13:15:24.934 Oracle Coherence GE 3.3.1/389 <D5> (thread=Cluster, member=4): Member 5 joined Service DistributedCache with senior member 5
Map (?):
2008-05-13 13:15:25.630 Oracle Coherence GE 3.3.1/389 <D5> (thread=Cluster, member=4): Member 5 left service DistributedCache with senior member n/a
2008-05-13 13:15:25.630 Oracle Coherence GE 3.3.1/389 <D5> (thread=Cluster, member=4): Member 5 left Cluster with senior member 1
I am, however, not able to retrieve the data which is entered via JDev.
(1) What do I need to do to distribute the data entered via the Jdev application to the Coherence grid
(2) How can I get access to the data within the Coherence Grid(do I need to to change the Cache, Map or something else)?
Thanks in advance
Regards LeonHi Leon,
In order to see the entries created by the sample application within JDev, you will need to do several things:
1. Ensure that at least one storage enabled Coherence node is running, by executing cache-server.cmd at least once (coherence.cmd starts storage-disabled console only).
2. Run coherence.cmd and change to the appropriate cache from the console:
Map (?): cache VirtualCache
(the name should be the same as the one defined in cache-config.xml and Java code)
3. Execute commands against the cache:
Map (VirtualCache): list
This should give you a list of all the entries within a VirtualCache.
HTH,
Aleks -
How to customize the link between archivelink and Alfresco
hi,
We are using Alfresco as content manager and we want to scan the invoices according to the "Late Storage with Bar Codes in FI" scenario [http://help.sap.com/saphelp_470/helpdata/en/46/c4317ffc4b11d195650000e82deb58/frameset.htm].
Each scanned invoice will be stored in Alfresco as a pdf file and we want to be able to display it from the sap 'display FI document' transaction (thru 'environment' menu / Additional assignments/object links).
my question is how to make the bridge between sap archivelink and Alfresco for this display ?
how to customize link between archivelink and Alfresco ? Is it possible with customizing only or is it necessary to buy third party software ?
we are working in 4.7.Hi,
Apparently you need an interface between SAP and Alfresco that implements SAP archivelink.
Once that is in place you can configure a repository in OAC0.
At the link below you find a link to a PDF
http://forums.alfresco.com/en/viewtopic.php?f=14&t=13502
Our company had an own content repository software. It used KGS SAPALINK to make the connection with SAP.
Furthermore CTAC seems to have done development to connect SAP and Alfresco.
Currently we are looking for a new repository system as well. A couple of weeks ago management decided that within some departments Alfresco will be the standard DMS. It would be great if we could use it as content server as well.
Kind Regards
Edmond -
How to get the link between mara, ausp, cawn and cawnt tables
hello ABAPERS
i have got a requiremet in that i have to get the relation .
how to get the link between mara, ausp, cawn and cawnt tables and also type how can we get link between char value and char description in cawn and cawnt tables through ausp and mara tables.
I would be very thankful for ur help in advance.
Thanks & Regards.
soniHi,
Sample report using the linkage between tables;
report batch_char no standard page heading
line-size 132
line-count 58(1)
message-id mm.
Report by Batch Characteristic *
Description : Report by Batch Characteristic *
Declaration for Tables
tables: mara, " Material Master
mard, " Storage Location Data for Material
t001w, " Plants/Branches
t001l, " Storage Locations
cabn, " Characteristics
inob. " Link between Internal Number and Object
Declaration for Constants
constants : c_klart like ausp-klart value '023', " Class Type
c_obtab like inob-obtab value 'MCH1', " Database Table
c_flag type c value 'X', " Flag
c_c23 type i value '23', " Ratio
Constants for Ratio Categories
c_13 type p decimals 2 value '13.00', " For Ratio 13
c_1499 type p decimals 2 value '14.99', " For Ratio 14.99
c_15 type p decimals 2 value '15.00', " For Ratio 15
c_1699 type p decimals 2 value '16.99', " For Ratio 16.99
c_17 type p decimals 2 value '17.00', " For Ratio 17
c_1899 type p decimals 2 value '18.99', " For Ratio 18.99
c_19 type p decimals 2 value '19.00', " For Ratio 19
c_2099 type p decimals 2 value '20.99', " For Ratio 20.99
c_21 type p decimals 2 value '21.00', " For Ratio 21
c_2299 type p decimals 2 value '22.99', " For Ratio 22.99
c_23 type p decimals 2 value '23.00', " For Ratio 23
c_g23(4) type c value '>=23', " For Ratio >=23
c_ratio(5) value 'RATIO', " For Ratio
Constants for Storing Selected item field information
c_cursor1(15) value 'I_OUTPUT1-MEINS', " For Selected Base
" Unit of Measure
c_cursor2(15) value 'I_OUTPUT1-MATNR', " For Selected Base
" Material Number
c_cursor3(15) value 'I_OUTPUT1-MAKTX', " For Selected Base
" Material Des.
c_cursor4(15) value 'I_OUTPUT1-CLABS', "For Selected Base
" Stock Value
c_cursor5(15) value 'I_OUTPUT1-ATFLV', " For Selected Base
" Char.Value (Ratio)
c_cursor6(5) value 'C_G23'.
Declaration for Global Variables
data : g_exit type c, " Flag
g_clabs1(16) type c, " Quantity
g_clabs(18) type c, " Quantity
g_cursor(15) type c, " Cursor field name
g_matnr type mara-matnr, " Material Number
g_werks type mchb-werks, " Plant
g_atinn(30) type c. " Character.
Declaration for Internal tables
Internal table to hold Batch Stock data
data : begin of i_mchb occurs 0,
matnr like mchb-matnr, " Material Number
werks like mchb-werks, " Plant
lgort like mchb-lgort, " Storage Location
charg like mchb-charg, " Batch Number
clabs like mchb-clabs, " Stock Value
meins like mara-meins, " Unit of measure
atflo like ausp-atflv, " Char.Value (Ratio)
atflv like ausp-atflv, " Char.Value (Ratio)
end of i_mchb.
Internal table to hold Secondary List data
data : begin of i_mchb1 occurs 0,
werks like mchb-werks, " Plant
matnr like mchb-matnr, " Material Number
lgort like mchb-lgort, " Storage Location
charg like mchb-charg, " Batch Number
atinn like ausp-atinn, " Char.Value
clabs like mchb-clabs, " Stock Value
atflo like ausp-atflv, " Char.Value (Ratio)
atflv like ausp-atflv, " Char.Value (Ratio)
end of i_mchb1.
Internal table to get the Plant Name
data : begin of i_plant occurs 0,
werks like t001w-werks, " Plant
name1 like t001w-name1, " Name
end of i_plant.
Internal table to get the Material Description
data : begin of i_makt occurs 0,
matnr like makt-matnr, " Material
maktx like makt-maktx, " Description
end of i_makt.
Internal table to hold AUSP data
data : begin of i_ausp occurs 0,
objek like ausp-objek, " Object No
atinn like cabn-atinn, " Characteric value
atflv like ausp-atflv, " Characteristic Value
end of i_ausp.
Internal table to hold output data
data : begin of i_output occurs 0,
atinn like cabn-atinn, " Characteric value
werks like mchb-werks, " Plant
matnr like mchb-matnr, " Material Number
atnam like cabn-atnam, " Characteristic
atflv like ausp-atflv, " Char.Value (Ratio)
name1 like t001w-name1, " Plant Description
maktx like makt-maktx, " Material Description
clabs like mchb-clabs, " Stock Value
meins like mara-meins, " Base Unit of Measure
end of i_output.
Internal table to hold final Output data
data : begin of i_output1 occurs 0,
atinn like cabn-atinn, " Characteric value
werks like mchb-werks, " Plant
matnr like mchb-matnr, " Material Number
atnam like cabn-atnam, " Characteristic
atflv(32) type c, " Char.Value (Ratio)
name1 like t001w-name1, " Plant Description
maktx like makt-maktx, " Material Description
clabs like mchb-clabs, " Stock Value
meins like mara-meins, " Base Unit of Measure
end of i_output1.
Selection screen
selection-screen begin of block b1 with frame title text-001.
select-options: s_werks for t001w-werks obligatory, " Plant
s_lgort for t001l-lgort, " Stor.Location
s_matnr for mara-matnr obligatory, " Material No
s_atinn for cabn-atinn. " Character.
selection-screen end of block b1.
At selection screen
at selection-screen.
Validation of Selection Screen Fields
perform validate_screen.
Start of selection
start-of-selection.
Get the Material and Batch Stock data from MARA and MCHB Tables
perform get_mat_stock_data.
Get the Material Group Text and Plant Name from T023T and T001W Tables
perform get_plant_grp_data.
Append the data into final Output Internal Table after getting the
Characteristic Values data from INOB and AUSP Tables
perform append_final_data.
Processing if the Characteristics contain 'RATIO'
perform collect_ratio.
End-of-Page
end-of-page.
write /1(125) sy-uline.
End of selection
end-of-selection.
if g_exit <> c_flag.
Display the Report Output data
perform display_report.
endif.
Top-of-Page
top-of-page.
Write the Report and Column Headings
perform get_headings.
at line-selection
at line-selection.
if sy-lsind = 1.
perform display_batch.
endif.
Top of page during line-selection
top-of-page during line-selection.
perform heading_seclist.
Form validate_screen
Validation of Selection Screen fields
form validate_screen.
Validation of Plant
clear t001w.
if not s_werks[] is initial.
select werks
into t001w-werks
from t001w
up to 1 rows
where werks in s_werks.
endselect.
if sy-subrc <> 0.
message e899 with 'Enter Valid Plant'(002).
endif.
endif.
Validation of Material Number
clear mara.
if not s_matnr[] is initial.
select matnr
into mara-matnr
from mara
up to 1 rows
where matnr in s_matnr.
endselect.
if sy-subrc <> 0.
message e899 with 'Enter Valid Material'(003).
endif.
endif.
Validation of Storage Location
clear t001l.
if not s_lgort[] is initial.
select lgort
into t001l-lgort
from t001l
up to 1 rows
where lgort in s_lgort.
endselect.
if sy-subrc <> 0.
message e899 with 'Enter Valid Storage Location'(004).
endif.
endif.
Validation of Characteristic Value
clear cabn.
if not s_atinn[] is initial.
select atinn
into cabn-atinn
from cabn
up to 1 rows
where atinn in s_atinn.
endselect.
if sy-subrc <> 0.
message e899 with 'Enter Valid Characteristic Value'(005).
endif.
endif.
Validation of Plant, Material and Storage Location
clear mard.
select matnr werks lgort
into (mard-matnr, mard-werks, mard-lgort)
from mard
up to 1 rows
where matnr in s_matnr and
werks in s_werks and
lgort in s_lgort.
endselect.
if sy-subrc <> 0.
message e899 with 'No Data found for the Selection Criteria'(006).
endif.
endform. "validate_screen
*& Form get_headings
Write the Report and Column Headings
form get_headings.
data: l_repid type sy-repid.
l_repid = sy-repid.
call function 'Y_STANDARD_HEADING'
exporting
repid = l_repid
heading1 = sy-title.
write:/1(125) sy-uline.
format color col_heading on.
write : /1 sy-vline, 2(18) 'Material Number'(008) centered,
20 sy-vline, 21(40) 'Material Description'(011) centered,
61 sy-vline, 62(22) 'Ratio'(009) centered,
84 sy-vline, 85(18) 'Quantity'(010) centered,
103 sy-vline, 104(20) 'Base Unit of Measure'(015) centered,
125 sy-vline.
write:/1(125) sy-uline.
format color off.
endform. "get_headings
*& Form get_mat_stock_data
Get the Material and Batch Stock data from MARA and MCHB Tables
form get_mat_stock_data.
clear: i_mchb,i_output, i_output1.
refresh: i_mchb,i_output, i_output1.
select a~matnr " Material Number
b~werks " Plant
b~lgort " Storage Location
b~charg " Batch Number
b~clabs " Stock Value
a~meins " Base Unit of Measure
into table i_mchb
from mara as a inner join mchb as b
on amatnr eq bmatnr
where b~matnr in s_matnr and
b~werks in s_werks and
b~lgort in s_lgort.
if sy-subrc <> 0.
g_exit = c_flag.
message s899 with 'No Data found for the Selection Criteria'(006).
stop.
endif.
sort i_mchb by matnr werks lgort charg.
endform. " get_mat_stock_data
*& Form get_plant_grp_data
Get the Material Group Text and Plant Name from T023T and T001W
form get_plant_grp_data.
if not i_mchb[] is initial.
Get the Plant Description from t001w Table
clear i_plant.
refresh i_plant.
select werks " Plant
name1 " Name
into table i_plant
from t001w
for all entries in i_mchb
where werks = i_mchb-werks.
Get the Material Description from MAKT Table
clear i_makt.
refresh i_makt.
select matnr " Material number
maktx " Material Description
into table i_makt
from makt
for all entries in i_mchb
where matnr = i_mchb-matnr and
spras = sy-langu.
sort i_plant by werks.
delete adjacent duplicates from i_plant comparing werks.
sort i_makt by matnr.
delete adjacent duplicates from i_makt comparing matnr.
endif.
endform. "form get_plant_grp_data.
*& Form append_final_data
Append the data into final Internal Table
form append_final_data.
data : l_matbatch(28),
l_tabix like sy-tabix.
if not i_mchb[] is initial.
loop at i_mchb.
l_tabix = sy-tabix.
clear l_matbatch.
concatenate i_mchb-matnr i_mchb-charg into l_matbatch.
move-corresponding i_mchb to i_output.
Get the Plant Description from i_plant Table
read table i_plant with key werks = i_mchb-werks binary search.
if sy-subrc = 0.
i_output-name1 = i_plant-name1.
endif.
Get the Material Description from i_makt Table
read table i_makt with key matnr = i_mchb-matnr binary search.
if sy-subrc = 0.
i_output-maktx = i_makt-maktx.
endif.
Get the Characteristic Values data from INOB and AUSP Tables
clear inob.
select single cuobj from inob
into inob-cuobj
where klart = c_klart and
obtab = c_obtab and
objek = l_matbatch.
if sy-subrc = 0.
select objek
atinn
atflv
from ausp
into table i_ausp
where objek = inob-cuobj and
atinn in s_atinn and
klart = c_klart.
sort i_ausp by objek atinn.
loop at i_ausp.
clear cabn.
select single atinn atnam from cabn
into (cabn-atinn,cabn-atnam)
where atinn = i_ausp-atinn.
if sy-subrc = 0.
If the ratio value is between 13-14.99, display 13
if cabn-atnam cs c_ratio.
if i_ausp-atflv between c_13 and c_1499.
i_mchb-atflo = i_ausp-atflv.
i_mchb-atflv = c_13.
If the ratio value is between 15-16.99, display 15
elseif i_ausp-atflv between c_15 and c_1699.
i_mchb-atflo = i_ausp-atflv.
i_mchb-atflv = c_15.
If the ratio value is between 17-18.99, display 17
elseif i_ausp-atflv between c_17 and c_1899.
i_mchb-atflo = i_ausp-atflv.
i_mchb-atflv = c_17.
If the ratio value is between 19-20.99, display 19
elseif i_ausp-atflv between c_19 and c_2099.
i_mchb-atflo = i_ausp-atflv.
i_mchb-atflv = c_19.
If the ratio value is between 21-22.99, display 21
elseif i_ausp-atflv between c_21 and c_2299.
i_mchb-atflo = i_ausp-atflv.
i_mchb-atflv = c_21.
If the ratio value is greater than or equal to 23, display 23
elseif i_ausp-atflv >= c_23.
i_mchb-atflo = i_ausp-atflv.
i_mchb-atflv = c_23.
endif. " Condition for RATIO values
else. " If characteristic does contain RATIO
i_mchb-atflv = i_ausp-atflv.
endif.
i_output-atinn = cabn-atinn.
i_output-atnam = cabn-atnam.
i_output-atflv = i_ausp-atflv.
i_mchb1-matnr = i_mchb-matnr.
i_mchb1-werks = i_mchb-werks.
i_mchb1-lgort = i_mchb-lgort.
i_mchb1-charg = i_mchb-charg.
i_mchb1-clabs = i_mchb-clabs.
i_mchb1-atinn = i_ausp-atinn.
i_mchb1-atflo = i_mchb-atflv.
i_mchb1-atflv = i_ausp-atflv.
append : i_output, i_mchb1.
clear i_mchb1.
modify i_mchb index l_tabix transporting atflo atflv .
endif.
endloop.
endif.
endloop.
endif.
Checking whether the table is filled or not
if not i_output[] is initial.
sort i_output by atinn werks matnr atflv.
else.
g_exit = c_flag.
message s899 with 'No Data found for the Selection Criteria'(006).
endif.
Delete the records where RATIO is less than 13.
delete i_output where atnam cs c_ratio and atflv lt c_13.
endform. "append_final_data
*& Form display_report
Display the Report Output data
form display_report.
data: l_tabix like sy-tabix.
loop at i_output1.
l_tabix = sy-tabix.
At new Characteristic
at new atinn.
read table i_output1 index l_tabix.
format color 1 intensified on.
write: /1 sy-vline, 2(20) 'Characteristic Name:'(007),
23(40) i_output1-atnam,
125 sy-vline.
format color off.
format color 4 intensified on.
write: /1 sy-vline, 2(20) 'Plant Name :'(022),
23(4) i_output1-werks, 29(30) i_output1-name1,
125 sy-vline.
format color off.
write /1(125) sy-uline.
endat.
clear: g_clabs, g_clabs1.
format color col_normal.
write :/1 sy-vline, 2(18) i_output1-matnr,
20 sy-vline, 21(40) i_output1-maktx,
61 sy-vline.
if i_output1-atflv = c_c23.
write: 62(22) c_g23 centered.
else.
shift i_output1-atflv left deleting leading space.
write: 62(22) i_output1-atflv centered.
endif.
write: 84 sy-vline,
103 sy-vline,
110(5) i_output1-meins.
If the quantity value is negative
if i_output1-clabs ge 0.
write: 85(18) i_output1-clabs unit i_mchb-meins,
125 sy-vline.
else.
i_output1-clabs = - i_output1-clabs.
write i_output1-clabs unit i_mchb-meins to g_clabs1.
condense g_clabs1.
concatenate '(' g_clabs1 ')' into g_clabs separated by space.
write: 85(18) g_clabs right-justified,
125 sy-vline.
endif.
format color off.
hide : i_output1.
new-line.
At end of material
at end of matnr.
sum.
move : i_output1-matnr to g_matnr.
format color 3 intensified on.
write /1(125) sy-uline.
write :/1 sy-vline, 2(25) 'Total for Material :'(012),
28(18) g_matnr.
if i_output1-clabs ge 0.
write: 85(18) i_output1-clabs unit i_mchb-meins,
125 sy-vline.
else.
i_output1-clabs = - i_output1-clabs.
write i_output1-clabs unit i_mchb-meins to g_clabs1.
condense g_clabs1.
concatenate '(' g_clabs1 ')' into g_clabs separated by space.
write: 85(18) g_clabs right-justified,
125 sy-vline.
endif.
write: 125 sy-vline.
format color off.
write /1(125) sy-uline.
endat.
At end of plant
at end of werks.
sum.
move : i_output1-werks to g_werks.
format color 3 intensified off.
write :/1 sy-vline, 2(25) 'Total for Plant :'(013),
28(4) g_werks.
if i_output1-clabs ge 0.
write: 85(18) i_output1-clabs unit i_mchb-meins,
125 sy-vline.
else.
i_output1-clabs = - i_output1-clabs.
write i_output1-clabs unit i_mchb-meins to g_clabs1.
condense g_clabs1.
concatenate '(' g_clabs1 ')' into g_clabs separated by space.
write: 85(18) g_clabs right-justified,
125 sy-vline.
endif.
format color off.
write /1(125) sy-uline.
endat.
At end of characteristic
at end of atinn.
read table i_output1 index l_tabix.
sum.
format color 3 intensified on.
write :/1 sy-vline, 2(25) 'Total for Characteristic:'(014),
28(25) i_output1-atnam.
if i_output1-clabs ge 0.
write: 85(18) i_output1-clabs unit i_mchb-meins,
125 sy-vline.
else.
i_output1-clabs = - i_output1-clabs.
write i_output1-clabs unit i_mchb-meins to g_clabs1.
condense g_clabs1.
concatenate '(' g_clabs1 ')' into g_clabs separated by space.
write: 85(18) g_clabs right-justified,
125 sy-vline.
endif.
format color off.
write /1(125) sy-uline.
endat.
endloop.
endform. " display_report
*& Form DISPLAY_BATCH
Display the batch details for the seclected material *
form display_batch.
Get the batch details for the selected material
get cursor field g_cursor.
if g_cursor = c_cursor1 or
g_cursor = c_cursor2 or
g_cursor = c_cursor3 or
g_cursor = c_cursor4 or
g_cursor = c_cursor5 or
g_cursor = c_cursor6.
format color 3.
write: /1 sy-vline,
2(17) 'Material Number :'(020),
20(17) i_output1-matnr,
94 sy-vline.
format color off.
write /1(94) sy-uline.
loop at i_mchb1 where matnr = i_output1-matnr and
atinn = i_output1-atinn and
atflo = i_output1-atflv.
format color col_normal.
shift i_mchb1-charg left deleting leading '0'.
write :/1 sy-vline, 2(16) i_mchb1-lgort centered,
18 sy-vline, 19(17) i_mchb1-charg centered,
36 sy-vline.
if i_output1-atnam cs c_ratio.
write: 37(29) i_mchb1-atflv
exponent 0 decimals 2 centered.
else.
write : 37(29) i_mchb1-atflv
exponent 0 decimals 0 centered.
endif.
write : 66 sy-vline, 67(27) i_mchb1-clabs unit i_mchb-meins,
94 sy-vline.
format color off.
endloop.
write /1(94) sy-uline.
else.
message s899 with 'Invalid cursor position'(016).
exit.
endif.
endform. " DISPLAY_BATCH
*& Form HEADING_SECLIST
Write the Column Headings for Interactive Report
form heading_seclist.
write /1(94) sy-uline.
format color col_heading on.
write :/1 sy-vline, 2(16) 'Storage Location'(021),
18 sy-vline, 19(17) 'Batch Number'(017) centered,
36 sy-vline, 37(29) 'Characteristic Value'(018) centered,
66 sy-vline, 67(27) 'Quantity'(019) centered,
94 sy-vline.
write /1(94) sy-uline.
format color off.
endform. " HEADING_SECLIST
*& Form COLLECT_RATIO
Display the Characteristic ratio data
form collect_ratio.
loop at i_output.
clear g_atinn.
i_output1-atinn = i_output-atinn.
i_output1-atnam = i_output-atnam .
i_output1-werks = i_output-werks.
i_output1-name1 = i_output-name1.
i_output1-matnr = i_output-matnr.
i_output1-maktx = i_output-maktx.
i_output1-clabs = i_output-clabs.
i_output1-meins = i_output-meins.
call function 'CONVERSION_EXIT_ATINN_OUTPUT'
exporting
input = i_output-atinn
importing
output = g_atinn.
if g_atinn cs c_ratio.
If the ratio value is between 13-14.99, display 13
if i_output-atflv between c_13 and c_1499.
i_output1-atflv = c_13.
If the ratio value is between 15-16.99, display 15
elseif i_output-atflv between c_15 and c_1699.
i_output1-atflv = c_15.
If the ratio value is between 17-18.99, display 17
elseif i_output-atflv between c_17 and c_1899.
i_output1-atflv = c_17.
If the ratio value is between 19-20.99, display 19
elseif i_output-atflv between c_19 and c_2099.
i_output1-atflv = c_19.
If the ratio value is between 21-22.99, display 21
elseif i_output-atflv between c_21 and c_2299.
i_output1-atflv = c_21.
If the ratio value is greater than or equal to 23, display 23
elseif i_output-atflv >= c_23.
i_output1-atflv = c_23.
endif.
write i_output1-atflv to i_output1-atflv .
else.
write i_output-atflv to i_output1-atflv exponent 0 decimals 0.
endif.
collect i_output1.
clear i_output1.
endloop.
sort i_output1 by atinn werks matnr atflv.
endform. " COLLECT_RATIO
Reward if useful..
Regards,
Anji
Maybe you are looking for
-
My laptop fell off the coffee table, and slammed shut. It then produced a kernal Panic to restart, which I did. It the brings up the user icons, mine and guest, but will not go past the grey screen with spinner on mine. It does let me into the basic
-
I am using external table in my query and it works fine, just I want to create log file or bad file if any in different folder currently it create in same folder where data file (CSV) exists. create or replace directory data_dir as 'c:\temp\'
-
Why "free newlines Symbol" doesn't work? How to set it?
I hope to wrap here,But it has no reaction. I does not get to know, How to set "free newlines symbol" Thank you~ The Sample files is here(ID CS6)
-
Tried suggestion to no avail.
-
Im unable to make my ipod sleep. I have tried reseting and restoring it. keeping my finger on the play button does nothing. Ive tried adding sleep to the menu and using that but the backlight just turns of but not the ipod. Im using the ipod with a V