Sets up the current COBOL attribute table so as to emulate, as closely as possible, the IBM-PC attribute table. 
                  	  
               
            
 
            	 
             
               		
               Note: This routine is supported for native COBOL only. 
                  		
               
 
               	 
             
            	 
            
               Syntax:
 
               		 
               		call "CBL_SCR_SET_PC_ATTRIBUTES" returning status-code
 
               	   
            	 
             
            	 
             
            	 
            
               On Exit:
 
               		 
               		
                
                  		
                  
                      
                        			  
                        			  
                        			 
                         
                           				
                            
                              				  
                              | status-code | See 
                                 					 Library Routines - Key | 
 
                           				
                            
                              				  
                              | status-code | The return status:  
                                    						 
                                    						  
                                    0 
                                       						  
                                    Successful. 
                                       						  
                                    1 
                                       						  
                                    Successful, but one or more colors not exact. 
                                       						  
                                    2 
                                       						  
                                    Failed. 
                                       						  
                                     | 
 
                           			 
                         
                        		  
                     
                    
                  		
                 
               	 
              
            	 
             
            
           
         
         
Comments:
Using this routine is equivalent to setting the entire IBM-PC attribute table using the generic attribute routines. It is provided to enable you to apply generic attributes to existing programs, making their attribute handling portable. However, this routine is inefficient because it defines every possible attribute. For new applications use the generic attribute routines and define only the attributes you need.