| Subject | dBASE 11, Command Window |
| From | Norman Snowden <duluth@msn.com> |
| Date | Fri, 11 Apr 2025 12:10:46 -0400 |
| Newsgroups | dbase.getting-started |
I recently wrote this program that separates and prints data about people who are employed from a list of people who otherwise have different characteristics. The program works fine within dBASE 11. However, when I make it into an Executable it executes and runs but will not use the command window to print the employment names. I have an Ini file included in the group of Files set to Build. I would appreciate any help. Norman function ENTRYFIELD9_onLeftDblClick(flags, col, row) form.pagno = 3 Go Top Clear Shell = true Count For OCCUPATION > " " to Occ If occ = 0 ? "No Occupations found?" form.pagno = 1 return Endif ? " FIRST NAME LAST NAME OCCUPATION EMPLOYER PHONE " ? " -------------------------------------------------------------------------------------------------------------" Declare Empl[Occ,5] Copy to Array Empl fields FNAME, LNAME, OCCUPATION, EMPLOYER, PHONE For OCCUPATION > " " Asort(Empl,1) k = 1 Do While k <= Occ ? " ", Empl[occ-(occ-k),1], Empl[occ-(occ-k),2],Trim(Empl[occ-(occ-k),3]), " " , Empl[occ-(occ-k),4], TRIM(Empl[occ-(occ-k),5]) * ? " ", TRIM(Empl[occ-(occ-k),1]) , " " , "$",TRIM(Empl[occ-(occ-k),2])) && " " , TRIM(Empl[occ-(occ-k),3]) , " " ,TRIM(Empl[occ-(occ-k),4]) k = k + 1 Enddo wait Form.pageno = 1 return | |