Multi-record block (how do I loop through the block)

I created a two canvas form. On the first canvas, the user enters data and selects 1 - 30
reports that they want to run. When they click on <NEXT> button, I create a multi-record
control block and display each record on the second screen using
go_block;
clear_block;
move data;
create_record;
The user then selects on the second canvas which reports to run now and which to run later via
a LOV. When they press the <RUN> button, I want to start at the first record and either run the
report or schedule it. Then I want to move onto the second and the third until all selected reports
have been handled. I know I should use a loop but can't seem to make it work.
So my question is, How do I loop through the records in a multi-record control block, pass the information
for that one record to a parameter form and then execute the request? Each control block record contains
10 parameter fields.
Thanks.
Bob

go_record(1);
<< do your processing >> -- This is executed only for the first record.
if :system.last_record = 'TRUE' then -- If the 1st record is also the last record.
RETURN;
end if;
LOOP
next_record;
<< do your processing >>
if :system.last_record = 'TRUE' then
EXIT;
end if;
END LOOP;
I created a two canvas form. On the first canvas, the user enters data and selects 1 - 30
reports that they want to run. When they click on <NEXT> button, I create a multi-record
control block and display each record on the second screen using
go_block;
clear_block;
move data;
create_record;
The user then selects on the second canvas which reports to run now and which to run later via
a LOV. When they press the <RUN> button, I want to start at the first record and either run the
report or schedule it. Then I want to move onto the second and the third until all selected reports
have been handled. I know I should use a loop but can't seem to make it work.
So my question is, How do I loop through the records in a multi-record control block, pass the information
for that one record to a parameter form and then execute the request? Each control block record contains
10 parameter fields.
Thanks.
Bob

Similar Messages

LOOPING THROUGH THE BLOCK

Can anybody help me with an example or materail which explains how can we loop through a block in Forms 6i?
Also how we can loop through the details block pertaining to the master block and process those records also?
Thanks

The quickest way to do something is not to do it at all, and this looks like a good example of where you don't need to do anything - what I suspect you really need is a better design for your schema. What are you updating that requires an update on all child records and cannot simply be referenced when you query a child record?
If you can't change the schema and you have millions of records to update then your best bet is to use sql, then try pl/sql if sql can't do the job. Only try forms if you absolutely have to, and expect it to run like a brick.
In forms (assuming you're using relationships):
go to each block, do first_record and process each record.
go to the lowest child block and loop through the records using next_record until "system.last_record = 'TRUE'", processing each record as you go.
go to the next block up, do next_record and process that record.
go back to the lowest child block and loop though it, processing each record.
when you have reached the last record in the penultimate child block then go to its immediate parent block, do next_record and process that record.
go to the lowest child block etc etc etc
There are a lot of things which you can do in forms but which belong on the database!

JDev 10.1.3.4: How to properly loop through the rows of a VO?

Hi,
This is a newbie question. Using JDeveloper 10.1.3.4 I am trying to loop through the rows of a view object. I am sure that the VO returns the following rows in that order:
200809
200902
200906If I use this code (where termsOpen is the VO instance):
while (termsOpen.hasNext()) {
   System.out.println(termsOpen.getCurrentRow().getAttribute("Term"));
}it proves to be an endless loop and I get "200809" printed on the console endlessly. The API says that hasNext() "does not move the current row". A book says that the pointer initially is at row 0. I wonder why it prints the first row. So the code is changed to:
while (termsOpen.hasNext()) {
   Row currRow = termsOpen.next();
   System.out.println(currRow.getAttribute("Term"));
}But now I get only the last two rows printed on the console, and do not get to see the first row:
200902
200906What's wrong?
Thanks for helping!
Newman

Hi, Branislav,
Thank you for the suggestion.
I tried that also. When the code is
while (termsOpen.hasNext()) {
   System.out.println(termsOpen.getCurrentRow().getAttribute("Term"));
   termsOpen.next();
}I get only the first two rows and last row is dropped:
200809
200902To get all the three row, I end up using this code:
System.out.println(termsOpen.first().getAttribute("Term"));
while (termsOpen.hasNext()) {
   Row currRow = termsOpen.next();
   System.out.println(currRow.getAttribute("Term"));
}But that shouldn't be the way of doing the work. If I use a block of 50 lines of code to process each row, the code will have to be written once before the while loop and another time inside the while loop.
The book which says that the pointer starts at the row slot before the first row is found on the internet, on p.469. It makes sense to me that the pointer starts at row 0. But unfortunately the actual copy of JDev 10.1.3.4 I am using behaves otherwise.
Newman

How do I: Loop through Application objects

How would I loop through the application object? My goal is to see if the object is a label and change its font size.
pseudocode would look like this:
function setsize(change int) {
for each obj in application {
 if obj is of type label {
 set font size to font size + change
Once I got that working, I'd add other objects that display text. The "change" would be a number to increase (positive) or decrease (negative) the size.
Thanks,
Jerry

I have this:
 <mx:HBox id="resultTextBox"
 width="100%"
 verticalScrollPolicy="off" horizontalScrollPolicy="auto">
 <mx:Label id="resultPotentialResultsLabel"
 text="Food Stamp potential eligibility for household, estimated monthly benefit amount "
 styleName="textNormal"
 toolTip="Results message"
 tabIndex="200" tabEnabled="true" fontSize="40"/>
 <mx:Text id="resultPotentialResultsData"
 styleName="resultNumberNormal"
 toolTip="Final results"
 tabIndex="202" tabEnabled="true" />
 </mx:HBox>
When I expand the font size it pushes the "resultPotentialResutsData" to limbo. I tried adding the horizonal scroll bar to allow the user to still see the results, The scroll doesn't appear.
1) is there a way to get the box to expand to fix the content?
2) is there a way to get the scroll bar to appear when needed?
3) is there a way to wrap the text (in this case the second field) in the HBox?

Script code sample for looping through the records from xml data file in formCalc script

Hi
 I have a xml data file which contains a sequence of repeating applicant data like given below
 US
 II
 CEO
 Mr
 111111111
 0000000111
 GuarantorA
 111
 IN
 11111
 WILLIAMS1
 R3
 KENNETH1
 City1GU
 PA
 1934-03-14
 [email protected]
 GU
 R
 113 Lazlo LaneCA
 Suite 3500CA
 OaklandCA
 TX
 11345
 AL
I want to assign a textfield with a value based on the value of coap_flag.
So i need to loop through all the record and check the value of coap_flag and then assign the textfield a value based on that.
I am new to Adobe livecycle...Please help me how it can be done.
I have developed something like this
foreach Item in ($record.applicant[*].coap_flag) do
test.value=Item
if(test.value=="MA")then
concat($record.applicant.first_name,$record.applicant.middle_name)endif
endfor

Using the data you posted in the forum, I copied it a couple of times to give multiple records and used this code to extract the different values that you wanted. I had to wrap it in a <root> node that I called root (to make it valid XML). In my case I wrote the extracted values to a field, but in your case you can do whatever you want with them. Note that this was done in javascript: var currentElement; var obj; //Get the nodes below the root node in the dataDom obj = xfa.datasets.data.root.nodes; //Set an initial value for the textField TextField1.rawValue = "The values of the coap_flag are: "; //Loop through the nodes in the obj set for (i=0; i< obj.length ; i++){ //set the currentElement to the 1st child node currentElement = obj.item(i); //Check to see if it is an applicant node if (currentElement.name == "applicant"){ //It is an applican, now find the coap_flag node value and write it to the text field TextField1.rawValue += "\n" + xfa.resolveNode("xfa.datasets.data.root.applicant[" + i + "]").coap_flag.value; } }

Loop through the records from xml data file in formCalc script

Hi
 I have a xml data file which contains a sequence of repeating applicant data like given below
 US
 II
 CEO
 Mr
 111111111
 0000000111
 GuarantorA
 111
 IN
 11111
 WILLIAMS1
 R3
 KENNETH1
 City1GU
 PA
 1934-03-14
 [email protected]
 GU
 R
 113 Lazlo LaneCA
 Suite 3500CA
 OaklandCA
 TX
 11345
 AL
I want to assign a textfield with a value based on the value of coap_flag.
So i need to loop through all the record and check the value of coap_flag and then assign the textfield a value based on that.
I am new to Adobe livecycle...Please help me how it can be done.
I have developed something like this
foreach Item in ($record.applicant[*].coap_flag) do
test.value=Item
if(test.value=="MA")then
concat($record.applicant.first_name,$record.applicant.middle_name)endif
endfor

Using the data you posted in the forum, I copied it a couple of times to give multiple records and used this code to extract the different values that you wanted. I had to wrap it in a <root> node that I called root (to make it valid XML). In my case I wrote the extracted values to a field, but in your case you can do whatever you want with them. Note that this was done in javascript: var currentElement; var obj; //Get the nodes below the root node in the dataDom obj = xfa.datasets.data.root.nodes; //Set an initial value for the textField TextField1.rawValue = "The values of the coap_flag are: "; //Loop through the nodes in the obj set for (i=0; i< obj.length ; i++){ //set the currentElement to the 1st child node currentElement = obj.item(i); //Check to see if it is an applicant node if (currentElement.name == "applicant"){ //It is an applican, now find the coap_flag node value and write it to the text field TextField1.rawValue += "\n" + xfa.resolveNode("xfa.datasets.data.root.applicant[" + i + "]").coap_flag.value; } }

How do I loop through tables, not columns in a table?

Sorry if this is a long one. My problem is actually quite simple. I am trying to write either an ad hoc PL/SQL block or a stored procedure to loop 18 times (thru 18 tables) and perform a SQL query on those tables, returning 18 resultsets. I would like the results to show up on the screen (or in a spool file, whatever).
So far I have tried 3 different approaches, none of which have worked.
1. I tried to assign the select query to a variable (qry) and use EXECUTE IMMEDIATE qry. This forced me thru a variety of errors to declare variables and assign the result to them--EXECUTE IMMEDIATE qry into nm0, nm1, nm2...
The problem with that was the resultset returned more than the variable was built for as there might be no rows returned, or it might be a thousand rows of data. So I tried changing the variables to VARRAYS, but it gave me a type mismatch as the underlying columns were NUMBER and VARCHAR2.
DECLARE
 ctr number;
 TYPE NUMLIST IS VARRAY (1000) OF NUMBER;
 TYPE VARLIST IS VARRAY (1000) OF VARCHAR2(15);
 nm0 NUMLIST NOT NULL DEFAULT 1;
 nm1 VARLIST;
 nm2 NUMLIST NOT NULL DEFAULT 1;
 nm3 VARLIST;
 nm17 NUMLIST NOT NULL DEFAULT 1;
 qry VARCHAR2(2000) := 'klx_uln_p000_cells';
BEGIN
FOR ctr IN 1..17 LOOP
 IF ctr < 10 THEN
 qry := 'SELECT
 A.DIM_0_INDEX,
 S0.SYM_NAME,
 A.DIM_1_INDEX,
 S1.SYM_NAME,
 A.DIM_2_INDEX,
 S2.SYM_NAME,
 A.DIM_3_INDEX,
 S3.SYM_NAME,
 A.NUMERIC_VALUE,
 B.NUMERIC_VALUE
 FROM
 KHALIX.klx_uln_p00'||ctr||'_cells A,
 KHALIX.klx_ucn_p00'||ctr||'_cells B,
 KHALIX.KLX_MASTER_SYMBOL S0,
 KHALIX.KLX_MASTER_SYMBOL S1,
 KHALIX.KLX_MASTER_SYMBOL S7
 WHERE
 A.DIM_0_INDEX=B.DIM_0_INDEX AND
 A.DIM_1_INDEX=B.DIM_1_INDEX AND...
 A.DIM_7_INDEX=S7.SYM_INDEX';
 ELSE
 qry := 'SELECT
 A.DIM_0_INDEX...
 A.DIM_7_INDEX=S7.SYM_INDEX';
 END IF;
 BEGIN
 dbms_output.put_line('SELECT FOR KLX_ULN_P00'||ctr||'_CELLS');
 dbms_output.put_line(nm16);
 dbms_output.put_line(nm17);
 EXECUTE IMMEDIATE qry into nm0,nm1,nm2,nm3,nm4,nm5,nm6,nm7,nm8,nm9,nm10,nm11,nm12,nm13,nm14,nm15,nm16,nm17;
-- dbms_output.put_line(qry);
 dbms_output.put_line(nm16);
 dbms_output.put_line(nm17);
 EXCEPTION
 WHEN NO_DATA_FOUND THEN
 dbms_output.put_line('No data found for Query '||ctr);
 END;
END LOOP;
EXCEPTION
 WHEN NO_DATA_FOUND THEN
 dbms_output.put_line('No data found for Query '||ctr);
END;
2. So then I used REF CURSOR to create a stored procedure and return the values. That allowed me to run my query AND tokenize the tablenames with a counter so that it would loop through the different tables! However, I still could not get it to display the results without going to SQL Plus and typing 'print c;'.
3. So, finally I tried to create a looping wrapper around the ref cursor to have some variable (ctr) increment so my query would get performed on table0_cells through table17_cells. This, too, did not work.
If I manually go to SQL Plus and type:
variable ctr number
begin
:ctr := 1;
end;
exec dupe_find(1,:c);
it will execute for the first table (klx_uln_p001_cells) and I can then type 'print c' to see what was returned. But when I try putting this within a wrapper PL/SQL block with a Loop to make ctr go from 0 - 17 (to loop through table_names klx_uln_p000_cells to klx_uln_p017_cells), it does not work.
Help! It should be very simple to loop through tables, shouldn't it? I just want a script that will loop through tables, perform a query on each table and display the results. For some reason, I can only find documentation examples on looping through columns that are all in the same table.
Dave

Here's a working example using your first strategy ...
create table t1 (id number);
create table t2 (id number);
insert into t1 values (100);
insert into t1 values (101);
insert into t2 values (200);
insert into t2 values (201);
declare
v_table_name user_tables.table_name%type;
type ttab_id is table of t1.id%type index by binary_integer;
tab_id ttab_id;
begin
for i in 1 .. 2 loop
v_table_name := 't' || i;
execute immediate 'select id from ' || v_table_name
bulk collect into tab_id;
dbms_output.put_line('query from ' || v_table_name);
for j in 1 .. tab_id.count loop
dbms_output.put_line(tab_id(j));
end loop;
end loop;
end;
There are many other ways to do this (especially if you need to do more than just print out the data).
Richard

How do I loop through AFrames?

I feel dumb asking this but I really think the code I have should work. All I want to do is loop through all the aframes in a document. To do this, I assign the first Aframe to a variabe named vAFrame. Then, I created a while loop where the test is vAFrame.ObjectValid(). however, the while loop never tests to true even though the data browsers shows that the vAFrame variable contains a valid object AND it supports the ObjectValid() method AND the valid object is an AFrame. I must be missing something really obvious here. Any ideas?
main ()
function main()
 var vDoc=app.ActiveDoc;
 var vFlow=vDoc.MainFlowInDoc;
 var vTextFrame=vFlow.FirstTextFrameInFlow;
 var vAFrame=vTextFrame.FirstAFrame;
 while (vAFrame.ObjectValid())
 vAFrame=vAFrame.NextAFrame;

I am heads down on a project so I can't give you much code right now, but I can point you in the right direction. The method you are using only works for a single text frame, so you would also have to include a loop for all of the text frames in the flow. A better approach is to get a list of FrameAnchor items from the main flow of the document. Then you can loop through the text items to process each anchored frame.
// Set a variable for the main flow in the document.
var flow = doc.MainFlowInDoc;
// Get a list of the anchored frames in the flow.
var textItems = flow.GetText(Constants.FTI_FrameAnchor);
// Loop through the anchored frames.
for (var i = 0; i < textItems.len; i += 1) {
var aFrame = textItems[i].obj;
// Do something with the anchored frame here.
Note that this will only get anchored frames in the main flow itself; it will skip anchored frames that are inside table cells or nested in other anchored frames. Please let me know if you have any questions or comments.
Rick Quatro

Powershell - Daily disk and folder usage; trouble with code to loop through the individual folders

Hi,
I'm very new to Powershell but through the help of this forum and the help on the internet I have scraped together a script that will loop through the disks of a set of servers listed in a text document, and give the capacity statistics in html
format.
I have two questions. I've tried modifying this to also loop though the individual folders on each disk and give the amount of space used to no avail. does any one have any suggestions?
Secondly, how do I get this to append? all I want to do is set up a scheduled task that runs this report daily. I know I will need to add a date column, but I just want the data to append to the previous set of results.
Thanks for any advice in advance.
# Continue even if there are errors
$ErrorActionPreference = "Continue";
# Set your warning and critical thresholds
$percentWarning = 100;
$percentCritcal = 15;
# REPORT PROPERTIES
# Path to the report
$reportPath = "C:\";
# Report name
$reportName = "DiskSpaceReport_$(get-date -format ddMMyyyy).html";
# Path and Report name together
$diskReport = $reportPath + $reportName
#Set colors for table cell backgrounds
$redColor = "#FF0000"
$orangeColor = "#FBB917"
$whiteColor = "#FFFFFF"
# Count if any computers have low disk space. Do not send report if less than 1.
$i = 0;
# Get computer list to check disk space
$computers = Get-Content "C:\serverlist.txt";
$datetime = Get-Date -Format "dd-MM-yyyy_HHmmss";
# Create and write HTML Header of report
$titleDate = get-date -uformat "%d-%m-%Y - %A"
$header = "
<html>
<head>
<meta http-equiv='Content-Type' content='text/html; charset=iso-8859-1'>
<title>DiskSpace Report</title>
<STYLE TYPE='text/css'>

</style>
</head>
<body>
<table width='100%'>
<tr bgcolor='#0B6121'>
<td colspan='7' height='30' align='center'>
Daily Disk Utilization Report for $titledate
</td>
</tr>
</table>
Add-Content $diskReport $header
# Create and write Table header for report
$tableHeader = "
<table width='100%'><tbody>
<tr bgcolor=#E0F8F7>
<td width='10%' align='center'>Server</td>
<td width='5%' align='center'>Drive</td>
<td width='15%' align='center'>Drive Label</td>
<td width='10%' align='center'>Total Capacity(GB)</td>
<td width='10%' align='center'>Used Capacity(GB)</td>
<td width='10%' align='center'>Free Space(GB)</td>
<td width='5%' align='center'>Freespace %</td>
<td width='5%' align='center'>RAM %</td>
<td width='5%' align='center'>CPU %</td>
</tr>
Add-Content $diskReport $tableHeader
# Start processing disk space
foreach($computer in $computers)
$disks = Get-WmiObject -ComputerName $computer -Class Win32_LogicalDisk -Filter #"DriveType = 3"
$computer = $computer.toupper()
foreach($disk in $disks)
$deviceID = $disk.DeviceID;
$volName = $disk.VolumeName;
[float]$size = $disk.Size;
[float]$freespace = $disk.FreeSpace;
$percentFree = [Math]::Round(($freespace / $size) * 100);
$sizeGB = [Math]::Round($size / 1073741824, 2);
$freeSpaceGB = [Math]::Round($freespace / 1073741824, 2);
$usedSpaceGB = $sizeGB - $freeSpaceGB;
$color = $whiteColor;
# Start processing RAM
$RAM = Get-WmiObject -ComputerName $computer -Class Win32_OperatingSystem
$RAMtotal = $RAM.TotalVisibleMemorySize;
$RAMAvail = $RAM.FreePhysicalMemory;
$RAMpercent = [Math]::Round(($RAMavail / $RAMTotal) * 100);
# Set background color to Orange if just a warning
if($percentFree -lt $percentWarning)
$color = $orangeColor
# Set background color to Orange if space is Critical
if($percentFree -lt $percentCritcal)
$color = $redColor
# Create table data rows
$dataRow = "
<tr>
<td width='10%'>$computer</td>
<td width='5%' align='center'>$deviceID</td>
<td width='10%' >$volName</td>
<td width='10%' align='center'>$sizeGB</td>
<td width='10%' align='center'>$usedSpaceGB</td>
<td width='10%' align='center'>$freeSpaceGB</td>
<td width='5%' bgcolor=`'$color`' align='center'>$percentFree</td>
<td width='5%' align='center'>$RAMpercent</td>
<td width='5%' align='center'>$CPUpercent</td>
</tr>
Add-Content $diskReport $dataRow;
Write-Host -ForegroundColor DarkYellow "$computer $deviceID percentage free space = $percentFree";
$i++
# Create table at end of report showing legend of colors for the critical and warning
$tableDescription = "
</table> <table width='20%'>
<tr bgcolor='White'>
<td width='10%' align='center' bgcolor='#FBB917'>No Warning</td>
<td width='10%' align='center' bgcolor='#FF0000'>Critical less than 10% free space</td>
</tr>
Add-Content $diskReport $tableDescription
Add-Content $diskReport "</body></html>"

The only easy way to create a report like this that accumulates is to design it so the data is output to a CSV file or a database. YOu can then generate the HTML from the persist6ed data.
If you store as XML you can use XSLT (transform) to convert to an HTML report.
I also recommend uing Excel as an HTML report generator. It is much easier and more flexible. PowerShell is not intended to do what you want without designing a whole custom reporting system.
Use the right tool for the right task.
Just because you own a hammer does not mean that the solution to every problem includes a nail.
¯\_(ツ)_/¯

Looping through the resultset

Post Author: Swapna
CA Forum: Formula
Hi
I need to loop through the result set how would i do that here is my scenario
in the database i have total 10 columns say an example
a,b,c,d,e,f,g,h,i,j,k and assume i have 100 rows with allthese values in the database now for these 100 rows i have to calculate the summary of those columns and i have written formula something like this but it was not working it was giving me zero dont know plz advise on this
whileprintingrecords;
numbervar totalsum;
totalsum=totalsum((a-b)/100cdefghi-j-k);
and i want to display this sum in my detail section of report how would i do that
I Appreciate your help.

Post Author: SKodidine
CA Forum: Formula
Try this and see if you get any results.
totalsum=totalsum((a-b)/100cdefghi-j-k);
totalsum := totalsum((a-b)/100cdefghi-j-k);

How to download firework through the adobe assistant

how to download firework through the adobe assistant

You should be able to add the download to the Adobe Download Assistant by choosing the download option at http://www.adobe.com/cfusion/tdrc/index.cfm?product=fireworks.

Does anyone know a way to programatically loop through the items in the document library

A lot of the funcations like deleteSymbol and updateSymbol depend on which items are "selected" in the library panel.
Is there a way to programatically access these selections?
or
Loop through the library?
or
Set selections?

Yup, I've asked for an API to access the selection in those panels for years, to no avail.
Note that you can loop through layers, frames and pages, but you can't tell what the user has selected in the actual panel UI. Also, you can't find out which symbols are currently used in the document. Nor can you programmatically insert a rich symbol into the document and have it maintain its "richness".

Command how many mails when through the mailstore for a specific domain.

I need to get info from the maillog to see how many mails when through the mailstore for a specific domain.
For example all the mails send and received by example.com witch is hosted on that 2005q1 mailserver.
Anyone know the commands to get it out.

The data is certainly in the mail.log.
You may want to start with the perl log parsing script, here:
http://ims.balius.com/resources/downloads/files/imslog.pl

I am getting blocks of black, vertical broken lines to right of cursor, around applications on desktop and over text on internet. I recently updated from OS X Tiger to Leopard on my G5 powermac. Can anyone advise how to get rid of the blocks of lines?

I am getting blocks of black, vertical broken lines to right of cursor, around applications on desktop and over text on internet. I recently updated from OS X Tiger to Leopard on my G5 powermac. Can anyone advise how to get rid of the blocks of lines?

What graphics card is installed?
Have you looked inside to see if the interior is dusty?
Is the graphics card dusty?
If equipped, is the fan on the graphics card turning?
Leopard uses the graphics card harder than Tiger, so weakness in the graphics card is more easily shown.

I was wondering how I can loop through all records in a database?

I'm using a do while loop to loop through all the records in a database is there a way I can simulate to EOF. I tried something to simulate it but I don't think it'll work. I assume there's a better way.
Here's my code:
boolean noRecords=false;
do
noRecords=false;
if (queryResults.next())
serverOutput.print(queryResults.getInt("itemID");
serverOutput.println(queryResults.getString("itemName");
else
noRecords=true;
}while(noRecords==false);

i think i know what you mean...
try this
while (queryResults.next()) {
serverOutput.print(queryResults.getInt("itemID");
serverOutput.println(queryResults.getString("itemName");
when .next() returns false, it will exit the while loop. you don't need the other code you have there, the above should do it all.
is that what you're after?

Multi-record block (how do I loop through the block)

Similar Messages

Maybe you are looking for