| View previous topic :: View next topic   | 
	
	
	
		| Author | 
		Message | 
	
	
		andre19
 
  
  Joined: 24 May 2004 Posts: 317 Location: Andre Occupation: albumin (programmer) Interests: Новосибирск
  | 
		
			
				 Posted: 22 Sep 2005 10:58    Post subject: Написание FileEval для АРМа ОС и не только... | 
				     | 
			 
			
				
  | 
			 
			
				здрасти всем, 
 
пишу Евал
 
задача = Есть такая формы Ос-1б.
 
в ней имеется поле "Организация-сдатчик"
 
мне нужно в одном поле указать= наим.банка+КПП+БИК+ИНН...
 
вопросы.
 
1.как сослаться на базу партнер, не прибегая к исп. ф-ии
 
DBUSEAREA(.T.,"",lcPth+"partner","partner",.T.), хотелось бы поюзать 
 
dbPush("partner","code","",{lcMyCode}), но говорит не такого алиаса!?   ...
 
   
 
....блин....пока писал 1й вопрос=забыл второй   | 
			 
		  | 
	
	
		| Back to top | 
		 | 
	
	
		  | 
	
	
		andre19
 
  
  Joined: 24 May 2004 Posts: 317 Location: Andre Occupation: albumin (programmer) Interests: Новосибирск
  | 
		
			
				 Posted: 22 Sep 2005 11:32    Post subject:  | 
				     | 
			 
			
				
  | 
			 
			
				  во....
 
2й
 
как узнать какие алиасы открыты в данном арме... | 
			 
		  | 
	
	
		| Back to top | 
		 | 
	
	
		  | 
	
	
		andre19
 
  
  Joined: 24 May 2004 Posts: 317 Location: Andre Occupation: albumin (programmer) Interests: Новосибирск
  | 
		
			
				 Posted: 22 Sep 2005 13:42    Post subject:  | 
				     | 
			 
			
				
  | 
			 
			
				своял вот чего
 
[code]
 
PRIVATE lcPth, lcMyCode, lcMyName
 
lcMyCode := aPars[1]
 
lcPth := "e:\bst\dbase\alb\"
 
//
 
//
 
dbPush("partner","code","",{"lcMyCode"})
 
dbseek(lcMyCode)
 
lcMyName := alltrim(partner2->shortname)
 
DBPOP()
 
 
ругается на вызов DBPush | 
			 
		  | 
	
	
		| Back to top | 
		 | 
	
	
		  | 
	
	
		andre19
 
  
  Joined: 24 May 2004 Posts: 317 Location: Andre Occupation: albumin (programmer) Interests: Новосибирск
  | 
		
			
				 Posted: 22 Sep 2005 14:17    Post subject:  | 
				     | 
			 
			
				
  | 
			 
			
				почему для закрытия алиаса не подходит ф-ии!!!!!
 
 	  | Code: | 	 		  
 
partner2->(F_DBUNLOCK())
 
partner2->(dbCloseArea())
 
 | 	  
 
               
 
 
неужели ни кто не знае | 
			 
		  | 
	
	
		| Back to top | 
		 | 
	
	
		  | 
	
	
		andre19
 
  
  Joined: 24 May 2004 Posts: 317 Location: Andre Occupation: albumin (programmer) Interests: Новосибирск
  | 
		
			
				 Posted: 22 Sep 2005 14:45    Post subject:  | 
				     | 
			 
			
				
  | 
			 
			
				почему-то даже ета программа не работает!!!!!
 
 
PRIVATE lcMyName
 
DBPUSH()
 
lcMyName := 'sasasasas'
 
DBPOP() | 
			 
		  | 
	
	
		| Back to top | 
		 | 
	
	
		  | 
	
	
		 |