Problem in screen design

Pickering, John (NORBORD) John.Pickering at norbord.com
Sun Mar 14 21:07:48 CDT 2010


Olav

That would work if the first pass built an indexed subfile. Creation of indexed subfiles is apallingly slow on MPEiX and I avoid them almost completely. [In fact I voted against them back when there was a user group vote on proposed enhancements -- when was that? 1935 or so?]. In any event, writing out a record for keys with the unwanted part number would save a sort so might be better on platforms where indexed subfiles do not require such a performance penalty. 

It would also depend on what proportion of the records contain the unwanted part number. If very few do, then your way would be good. If most do, then my original method might be better. This highlights the value of knowing and understanding your own data. 

Regards,
JWP


________________________________

From: o.kappert at qc.aibn.com <o.kappert at qc.aibn.com> 
To: Pickering, John (NORBORD) 
Cc: pandurang.rajpurohit at in.ibm.com <pandurang.rajpurohit at in.ibm.com>; nispawar at in.ibm.com <nispawar at in.ibm.com>; powerh-l at lists.sowder.com <powerh-l at lists.sowder.com> 
Sent: Sun Mar 14 20:17:06 2010
Subject: Re: Problem in screen design 


John:

How about...

Read the doc-char file and output doc-char for each record where the part="12844161".

Then link the original file with this new file by doc-char and in the case where there is no record in the linked file you extract the details you need from the original file.  If on the otherhand the link finds the record in both files, then ignore all the doc-char in the original file.

Now, about creating the actual quiz code, it has been awile and I don't have the manual handy.

Olav.


Pickering, John (NORBORD) wrote: 

	Thanks for that additional info -- I think I understand the problem. Let me state it again -- if the doc-char contains part 12844161 in any record then you do not want to select that doc-char. 
	
	If that is the case then you will need two passes through the data. The first pass should create a subfile with the key for the file and a flag indicating the existence of part 12844161. The second pass reads this subfile and gets the data for the desired records. 
	
	In Quiz you could do something like:
	>Acc apmisumi
	>Define d-want char*1 &
	> = "N" if part = 12844161 &
	> Else ""
	>Sort on doc-char on d-want
	>Set subfile name sf1 at doc-char
	>Report summary doc-char &
	> D-want maximum
	
	This will create a subfile with all of the doc-char values and a flag with either a blank or the letter "N". If the flag is "N" then the part 12844161 was found for this doc-char value and you don't want records with this doc-char value. 
	
	In the second pass you would start with this subfile, select only the records with a blank d-want flag and link back to the original data file. Something like:
	
	>Acc *sf1 link to apmisumi
	>Select sf1 if "" = d-want
	
	Hope this helps. 
	
	Regards,
	JWP
	
	

________________________________

	From: powerh-l-bounces+john.pickering=norbord.com at lists.sowder.com <powerh-l-bounces+john.pickering=norbord.com at lists.sowder.com> <mailto:powerh-l-bounces+john.pickering=norbord.com at lists.sowder.com>  
	To: o.kappert at qc.aibn.com <o.kappert at qc.aibn.com> <mailto:o.kappert at qc.aibn.com>  
	Cc: Nisha B Pawar <nispawar at in.ibm.com> <mailto:nispawar at in.ibm.com> ; powerh-l at lists.sowder.com <powerh-l at lists.sowder.com> <mailto:powerh-l at lists.sowder.com>  
	Sent: Sun Mar 14 04:31:48 2010
	Subject: Re: Problem in screen design 
	
	

	Olav 
	
	The doc-char which contains that part should not be selected.  Here the doc-char 000000000225071 contains  other parts along with 12844161 Hence it should not be selected. Where as only doc-char 000000000301004 should be selected. 
	
	
	
	
	Thanks & Regards
	Pandurang Rajpurohit,
	-----------------------------------------------------------------
	Project Manager 
	GM - Powerhouse Tower (DDS)
	IBM Global Services India Pvt. Ltd. Pune
	Contact No : +91 020 40116372
	Mobile No : +91 9049009973
	EMAIL : pandurang.rajpurohit at in.ibm.com 
	
	
	
	
	
o.kappert at qc.aibn.com 

03/14/2010 04:42 AM 
Please respond to
o.kappert at qc.aibn.com


To
Pandurang Rajpurohit/India/IBM at IBMIN 	
cc
powerh-l at lists.sowder.com, Nisha B Pawar/India/IBM at IBMIN 	
Subject
Re: Problem in screen design	 


	
	




	Maybe I am missing something but....
	
	Based upon the info provided,  part 12844161 is not in the report generated; therefore everything works as you wanted it to.
	
	Olav.
	
	Pandurang Rajpurohit wrote: 
	
	All 
	
	I am on screen design where a record which do not contain data passed are only be selected. Could you please help with query how can achieve. 
	
	Here is example 
	
	
	> acc apmisumi 
	> show item 
	
	                                            INPUT OUTPUT 
	APMISUMI                                TYPE SCALE SCALE  DEC PICTURE 
	 APMISUMI-KEY                          CHAR                  X(43) 
	* .DOC-CHAR                             CHAR                  X(15) 
	 .SOURCE-CODE                          CHAR                  X(16) 
	 .GM-PART                              CHAR                  X(12) 
	 DOC-TYPE                              CHAR                  X(2) 
	 ORD-NUM                               CHAR                  X(13) 
	 CUST-ORD                              CHAR                  X(20) 
	 ORD-TYPE                              CHAR                  X(2) 
	 ORD-PART                              CHAR                  X(20) 
	 PART-QTY                              NUM     0     0    0  ^.^^^.^^^ 
	 WHM-QTY-ORD                           NUM     0     0    0  ^^^^^^^^ 
	 WHM-QTY-REC                           NUM     0     0    0  ^^^^^^^^ 
	 SHIP-DATE                             DATE                  YYYY/MM/DD 
	 WHM-REC-DATE                          DATE                  YYYY/MM/DD 
	 FLAG-905                              CHAR                  X(1) 
	 PRIC-UNIT                             NUM     3     0    3  ^.^^^.^^^.^^... 
	 VAT-CODE                              CHAR                  X(2) 
	 CURR-CODE                             CHAR                  X(3) 
	 ACT-COST-L                            NUM     4     0    4  ^^^.^^^.^^^,... 
	 ACT-COST-F                            NUM     4     0    4  ^^^.^^^.^^^,... 
	 AVC-COST                              NUM     3     0    3  ^.^^^.^^^.^^... 
	 BEAF-INV                              CHAR                  X(1) 
	 LOC-CUST                              CHAR                  X(9) 
	 TOT-LINES                             NUM     0     0    0   ^.^^^ 
	 WHM-PLAN-CODE                         CHAR                  X(4) 
	 WHM-IN-TYPE                           CHAR                  X(4) 
	 FILLER                                CHAR                  X(42) 
	
	
	> acc apmisumi 
	> select if source-code = "632654450" and gm-part = "    12844161" 
	> rep doc-char source-code gm-part flag-905 
	> go 
	2010/03/13                  OPEL P&A DATA DICTIONARY                   PAGE   1 
	
	 Document number  SOURCE CODE       Gm Part       Flag 
	                                                  905 
	
	 000000000225071  632654450             12844161   C 
	
	
	
	> acc apmisumi 
	> select if source-code = "632654450" and gm-part <> "    12844161" and (flag-905="P" or flag-905="C") 
	> rep doc-char source-code gm-part  flag-905 
	> go 
	2010/03/13                  OPEL P&A DATA DICTIONARY                   PAGE   1 
	
	 Document number  SOURCE CODE       Gm Part       Flag 
	                                                  905 
	
	 000000000225071  632654450              4726568   C 
	 000000000225071  632654450              5064431   C 
	 000000000225071  632654450              5325626   C 
	 000000000225071  632654450              5409420   C 
	 000000000225071  632654450              9121795   P 
	 000000000225071  632654450             12790592   C 
	 000000000225071  632654450             13219393   C 
	 000000000225071  632654450             13253738   C 
	 000000000301004  632654450              5333794   P 
	 000000000301004  632654450             11609598   P 
	 000000000301004  632654450             12762510   P 
	 000000000301004  632654450             12767670   P 
	 000000000301004  632654450             12797804   P 
	 000000000302065  632654450              9270120   P 
	
	
	
	I need select only doc-char which does not contain part  12844161 for source code 632654450 but with this query the doc-char 000000000225071 is also selected even though it contain part 12844161 
	
	Can any one  help me 
	
	Thanks & Regards
	Pandurang Rajpurohit,
	-----------------------------------------------------------------
	Project Manager 
	GM - Powerhouse Tower (DDS)
	IBM Global Services India Pvt. Ltd. Pune
	Contact No : +91 020 40116372
	Mobile No : +91 9049009973
	EMAIL : pandurang.rajpurohit at in.ibm.com <mailto:pandurang.rajpurohit at in.ibm.com>  
	
	

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.sowder.com/pipermail/powerh-l/attachments/20100314/eb325219/attachment-0001.htm 


More information about the powerh-l mailing list