02-08-2006
The following is the program:
BEGIN { FS = "|"
LOOP=0
PRINT=0
}
{
if ( $1 == "H" )
{
printf(" GM DELFOR \n\n")
printf("Document #:%s Material Release #:%s DUNS #:%s\n",$6,$15,$13)
printf("Doc. Date :%s Horizon Start Date:%s Horizon End Date:%s\n",$7,$9,$11)
printf("_______________________________________________________________________________________\n\n" )
}
if ( $1 == "L" && LOOP == "1" )
{
#printf("
")
printf(".......................................................................................\n")
LOOP=0
}
if ( $1 == "L" )
{
LOOP=1
PARTNUM=$4
printf("ORDER #:%s Part #:%s Model Y.:%s Recv. Dock:%s ST Loc.:%s\n\n",$11,$4,$7,$8,$2)
}
if ( $1 == "LD" )
{
if ( $2 == 79 && $4 == 51 )
{
SUM79=$3
DATE51=$5
}
if ( $2 == 79 && $4 == 52 )
{
DATE52=$5
}
if ( $2 == 3 && $4 == 51 )
{
SUM3=$3
DATE351=$5
}
if ( $2 == 3 && $4 == 11 )
{
DATE11=$5
}
PREV_LINE=$1
}
if ( $1 == "D" && PREV_LINE == "LD" )
{
printf("Previous Cumm. Quantity:%s Horizon Start:%s Horizon End:%s\n",SUM79,DATE51,DATE52)
printf("Cumulative Quantity :%s Horizon Start:%s Dispatch Date:%s\n",SUM3,DATE351,DATE11)
PREV_LINE=$1
print "\n\nFORECAST PERIOD DATE REQUIRED QUANTITY"
print "======================================================================"
}
if ( $1 == "D" )
{
if ( $2 == 1 && $3 == "W")
printf("Firm Weekly %s %10s\n",$5,$7)
if ( $2 == 4 && $3 == "W")
printf("Planning Weekly %s %10s\n",$5,$7)
if ( PRINT == 0 && ($2 =="" || $3 =="" ))
{
PRINT=1
printf("======================== End of the Item %s =======================\n",PARTNUM)
}
}
}
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
I have the following error:
ls -lt | awk 'BEGIN NR > 1 { print $2, $9 }'
Syntax Error The source line is 1.
The error context is
BEGIN >>> NR <<< > 1 { print $2, $9 }
awk: 0602-500 Quitting The source line is 1.
What I want to do is ls a directory, skip the first... (3 Replies)
Discussion started by: lesstjm
3 Replies
2. Shell Programming and Scripting
Hello,
I have the following command that does 2 searches.
awk '{if ($0 ~ /STRING1/) {c++} }{if ( c == 2 ) {sub(/STRING1/,"NEWSTRING") } } { print }' FILE
How do I search up after the first search?
thanks (4 Replies)
Discussion started by: ctcuser
4 Replies
3. Shell Programming and Scripting
i have a little awk script that I use looks this:
awk '{if (FNR==1){print FILENAME; print $0}else print $0}' file1...file2....fi... > bundled.
i have completely forgotten how to unbundle this. I have tried several different approaches and still can not remember how to unbundle the file bundled.... (2 Replies)
Discussion started by: moxxx68
2 Replies
4. Shell Programming and Scripting
I am trying to read through a file, gather the states in that file and change it from an abbreviation to the ful text.
Can anyone provide some assistance.
Thanks!! (4 Replies)
Discussion started by: cnitadesigner
4 Replies
5. Shell Programming and Scripting
How I can rid of the following presentation du -sk /u*/oradata/TEST/*.dbf |awk '{print total+=$1} 1.28003e+06
4.35109e+06
4.36134e+06
4.4535e+06
5.47752e+06
5.48777e+06
7.52554e+06
7.73036e+06
9.06158e+06
:confused: thank you (3 Replies)
Discussion started by: zam
3 Replies
6. UNIX for Dummies Questions & Answers
Hi, in the following script, what does " a=$0} END " mean ?
do we need that ? Thanks
awk '{a=$0} END {for (i=NR; i>=1; i--) print a}' file (3 Replies)
Discussion started by: james94538
3 Replies
7. UNIX for Dummies Questions & Answers
Can anyone help with this this one liner:
nawk -v RS='' '$1=$1' InputFile
What I have in the file:
0.0013985457223116
-0.0002338180925628
0.0
0.0003709430584958
-0.0005763523138347
0.0
And the output I want:
0.0013985457223116 -0.0002338180925628 0.0
0.0003709430584958... (1 Reply)
Discussion started by: mookie123
1 Replies
8. UNIX for Dummies Questions & Answers
I have a script problem that I am not able to solve due my very limited understanding of unix/awk.
This is the contents of test.sh
awk '{print $1}'
From the prompt if I enter:
./test.sh Hello World
I would expect to see "Hello" but all I get is a blank line. Only then if I enter "Hello... (2 Replies)
Discussion started by: JasonHamm
2 Replies
9. Homework & Coursework Questions
Use and complete the template provided. The entire template must be completed. If you don't, your post may be deleted!
1. The problem statement, all variables and given/known data:
im using ls -l | xargs | awk '{what ever files here}'
im trying to get something that looks like this... (7 Replies)
Discussion started by: rontopia
7 Replies
10. Shell Programming and Scripting
Hi Experts,
I am trying to get system output to capture inside awk , but not working:
Please advise if this is possible :
I am trying something like this but not working, the output is coming wrong:
echo "" | awk '{d=system ("date") ; print "Current date is:" , d }'
Thanks, (5 Replies)
Discussion started by: rveri
5 Replies
LEARN ABOUT PHP
maxdb_field_tell
MAXDB_FIELD_TELL(3) 1 MAXDB_FIELD_TELL(3)
maxdb_field_tell - Get current field offset of a result pointer
Procedural style
SYNOPSIS
int maxdb_field_tell (resource $result)
DESCRIPTION
Object oriented style
int$maxdb_result->current_field ()
Returns the position of the field cursor used for the last maxdb_fetch_field(3) call. This value can be used as an argument to
maxdb_field_seek(3).
RETURN VALUES
Returns current offset of field cursor.
EXAMPLES
Example #1
Object oriented style
<?php
$maxdb = new maxdb("localhost", "MONA", "RED", "DEMODB");
/* check connection */
if (maxdb_connect_errno()) {
printf("Connect failed: %s
", maxdb_connect_error());
exit();
}
$query = "SELECT name, cno from hotel.customer ORDER BY cno";
if ($result = $maxdb->query($query)) {
/* Get field information for all columns */
while ($finfo = $result->fetch_field()) {
/* get fieldpointer offset */
$currentfield = $result->current_field;
printf("Column %d:
", $currentfield);
printf("Name: %s
", $finfo->name);
printf("Table: %s
", $finfo->table);
printf("max. Len: %d
", $finfo->max_length);
printf("Flags: %d
", $finfo->flags);
printf("Type: %d
", $finfo->type);
}
$result->close();
}
/* close connection */
$maxdb->close();
?>
Example #2
Procedural style
<?php
$link = maxdb_connect("localhost", "MONA", "RED", "DEMODB");
/* check connection */
if (maxdb_connect_errno()) {
printf("Connect failed: %s
", maxdb_connect_error());
exit();
}
$query = "SELECT name, cno from hotel.customer ORDER BY cno";
if ($result = maxdb_query($link, $query)) {
/* Get field information for all fields */
while ($finfo = maxdb_fetch_field($result)) {
/* get fieldpointer offset */
$currentfield = maxdb_field_tell($result);
printf("Column %d:
", $currentfield);
printf("Name: %s
", $finfo->name);
printf("Table: %s
", $finfo->table);
printf("max. Len: %d
", $finfo->max_length);
printf("Flags: %d
", $finfo->flags);
printf("Type: %d
", $finfo->type);
}
maxdb_free_result($result);
}
/* close connection */
maxdb_close($link);
?>
The above example will output something similar to:
Column 1:
Name: NAME
Table:
max. Len: 10
Flags: -1
Type: 2
Column 2:
Name: CNO
Table:
max. Len: 4
Flags: -1
Type: 0
SEE ALSO
maxdb_fetch_field(3), maxdb_field_seek(3).
PHP Documentation Group MAXDB_FIELD_TELL(3)