TIME BILLING
FILE INFORMATION
FILENAME(S): TIME BILLING
FILE TYPE(S): SEQ
FILE SIZE: 5.8K
FIRST SEEN: 2025-11-30 18:12:25
APPEARS ON: 1 disk(s)
FILE HASH
b1d54b727598f70818a5022dcb04e82c65c664fcccb0c7ae750c07744cdd1fd6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DATARICH | TIME BILLING | SEQ | Sailor, Ganheden | 3 | 16 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 22 20 20 20 20 20 20 20 20 20 D4 C9 CD C5 20 C2 |" .... .| 00000010: C9 CC CC C9 CE C7 20 20 20 20 20 20 20 20 20 C2 |...... .| 00000020: 59 3A 20 D2 4F 42 45 52 54 20 D7 2E 20 C2 41 4B |Y: .OBERT .. .AK| 00000030: 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |ER | 00000040: 20 D0 41 47 45 20 31 0D 0D 0D 22 20 20 20 20 20 | .AGE 1..." | 00000050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000060: 20 20 20 20 20 20 20 20 20 20 20 20 20 D4 C9 CD | ...| 00000070: C5 20 C2 C9 CC CC C9 CE C7 0D 0D 22 20 20 20 20 |. ........." | 00000080: 20 20 20 20 20 C8 45 52 45 27 53 20 41 20 53 49 | .ERE'S A SI| 00000090: 4D 50 4C 45 20 4C 49 54 54 4C 45 20 50 52 4F 47 |MPLE LITTLE PROG| 000000A0: 52 41 4D 20 57 49 54 48 20 41 20 4E 55 4D 42 45 |RAM WITH A NUMBE| 000000B0: 52 20 4F 46 20 50 4F 53 53 49 42 49 4C 49 54 49 |R OF POSSIBILITI| 000000C0: 45 53 0D 22 20 20 20 20 20 20 20 20 20 41 4E 44 |ES." AND| 000000D0: 20 41 20 46 45 57 20 49 44 45 41 53 20 54 48 41 | A FEW IDEAS THA| 000000E0: 54 20 43 41 4E 20 45 41 53 49 4C 59 20 42 45 20 |T CAN EASILY BE | 000000F0: 55 53 45 44 20 45 4C 53 45 57 48 45 52 45 2E 20 |USED ELSEWHERE. | 00000100: C9 20 57 52 4F 54 45 20 49 54 0D 22 20 20 20 20 |. WROTE IT." | 00000110: 20 20 20 20 20 53 4F 20 C9 20 43 4F 55 4C 44 20 | SO . COULD | 00000120: 46 49 47 55 52 45 20 20 4F 55 54 20 20 48 4F 57 |FIGURE OUT HOW| 00000130: 20 20 4D 55 43 48 20 20 C9 20 20 53 48 4F 55 4C | MUCH . SHOUL| 00000140: 44 20 20 43 48 41 52 47 45 20 20 46 4F 52 20 20 |D CHARGE FOR | 00000150: 4D 59 0D 22 20 20 20 20 20 20 20 20 20 43 4F 4E |MY." CON| 00000160: 53 55 4C 54 49 4E 47 20 53 45 52 56 49 43 45 53 |SULTING SERVICES| 00000170: 20 57 49 54 48 20 41 20 4C 4F 43 41 4C 20 43 4F | WITH A LOCAL CO| 00000180: 4E 53 55 4C 54 49 4E 47 20 20 46 49 52 4D 2E 20 |NSULTING FIRM. | 00000190: 20 D4 48 45 20 20 46 49 52 4D 0D 22 20 20 20 20 | .HE FIRM." | 000001A0: 20 20 20 20 20 57 4F 55 4C 44 20 41 41 53 53 49 | WOULD AASSI| 000001B0: 47 4E 20 55 4E 49 51 55 45 20 50 52 4F 4A 45 43 |GN UNIQUE PROJEC| 000001C0: 54 20 4E 55 4D 42 45 52 53 20 46 4F 52 20 45 56 |T NUMBERS FOR EV| 000001D0: 45 52 59 20 20 50 52 4F 4A 45 43 54 20 20 54 48 |ERY PROJECT TH| 000001E0: 45 59 0D 22 20 20 20 20 20 20 20 20 20 55 4E 44 |EY." UND| 000001F0: 45 52 54 4F 4F 4B 20 41 4E 44 20 43 4F 44 45 20 |ERTOOK AND CODE | 00000200: 54 48 45 4D 20 42 59 20 50 52 4F 4A 45 43 54 20 |THEM BY PROJECT | 00000210: 54 59 50 45 2E 20 C1 54 20 54 48 45 20 45 4E 44 |TYPE. .T THE END| 00000220: 20 20 4F 46 20 20 45 41 43 48 0D 22 20 20 20 20 | OF EACH." | 00000230: 20 20 20 20 20 4D 4F 4E 54 48 20 54 48 45 20 46 | MONTH THE F| 00000240: 49 52 4D 20 57 41 4E 54 45 44 20 41 20 42 49 4C |IRM WANTED A BIL| 00000250: 4C 20 46 4F 52 20 54 48 45 20 54 49 4D 45 20 20 |L FOR THE TIME | 00000260: C9 20 20 53 50 45 4E 54 20 20 4F 4E 20 20 45 41 |. SPENT ON EA| 00000270: 43 48 0D 22 20 20 20 20 20 20 20 20 20 50 52 4F |CH." PRO| 00000280: 4A 45 43 54 20 28 41 54 20 41 4E 20 41 47 52 45 |JECT (AT AN AGRE| 00000290: 45 44 2D 55 50 4F 4E 20 52 41 54 45 29 20 20 41 |ED-UPON RATE) A| 000002A0: 4E 44 20 20 41 4E 59 20 20 45 58 50 45 4E 53 45 |ND ANY EXPENSE| 000002B0: 53 20 20 54 48 41 54 20 20 C9 0D 22 20 20 20 20 |S THAT .." | 000002C0: 20 20 20 20 20 49 4E 43 55 52 52 45 44 2E 0D 22 | INCURRED.."| 000002D0: 0D 22 20 20 20 20 20 20 20 20 20 C9 20 4E 4F 52 |." . NOR| 000002E0: 4D 41 4C 4C 59 20 43 41 52 52 49 45 44 20 41 20 |MALLY CARRIED A | 000002F0: 53 4D 41 4C 4C 20 43 41 4C 45 4E 44 41 52 20 41 |SMALL CALENDAR A| 00000300: 4E 44 20 53 49 4D 50 4C 59 20 4A 4F 54 54 45 44 |ND SIMPLY JOTTED| 00000310: 20 44 4F 57 4E 20 4D 59 0D 22 20 20 20 20 20 20 | DOWN MY." | 00000320: 20 20 20 54 49 4D 45 20 41 4E 44 20 45 58 50 45 | TIME AND EXPE| 00000330: 4E 53 45 53 20 45 41 43 48 20 44 41 59 2E 20 C1 |NSES EACH DAY. .| 00000340: 54 20 54 48 45 20 45 4E 44 20 4F 46 20 54 48 45 |T THE END OF THE| 00000350: 20 4D 4F 4E 54 48 20 C9 27 44 20 20 48 41 56 45 | MONTH .'D HAVE| 00000360: 0D 22 20 20 20 20 20 20 20 20 20 54 4F 20 47 4F |." TO GO| 00000370: 20 42 41 43 4B 20 54 48 52 4F 55 47 48 20 54 48 | BACK THROUGH TH| 00000380: 45 20 43 41 4C 45 4E 44 41 52 20 41 4E 44 20 41 |E CALENDAR AND A| 00000390: 44 44 20 55 50 20 20 54 48 45 20 20 46 49 47 55 |DD UP THE FIGU| 000003A0: 52 45 53 2E 20 20 C9 54 0D 22 20 20 20 20 20 20 |RES. .T." | 000003B0: 20 20 20 47 4F 54 20 54 4F 20 42 45 20 4B 49 4E | GOT TO BE KIN| 000003C0: 44 20 4F 46 20 4D 45 53 53 59 20 41 4E 44 20 54 |D OF MESSY AND T| 000003D0: 49 4D 45 20 43 4F 4E 53 55 4D 49 4E 47 2C 20 53 |IME CONSUMING, S| 000003E0: 4F 20 C9 20 20 57 52 4F 54 45 20 20 54 48 49 53 |O . WROTE THIS| 000003F0: 0D 22 20 20 20 20 20 20 20 20 20 51 55 49 43 4B |." QUICK| 00000400: 20 4C 49 54 54 4C 45 20 50 52 4F 47 52 41 4D 20 | LITTLE PROGRAM | 00000410: 54 4F 20 48 45 4C 50 20 4F 55 54 2E 20 C9 54 27 |TO HELP OUT. .T'| 00000420: 53 20 4E 4F 54 20 56 45 52 59 20 46 41 4E 43 59 |S NOT VERY FANCY| 00000430: 20 42 55 54 20 20 49 54 0D 22 20 20 20 20 20 20 | BUT IT." | 00000440: 20 20 20 53 55 52 45 20 57 41 53 20 48 41 4E 44 | SURE WAS HAND| 00000450: 59 20 54 48 45 4E 2E 0D 22 0D 22 20 20 20 20 20 |Y THEN.."." | 00000460: 20 20 20 20 D7 48 45 4E 20 59 4F 55 20 52 55 4E | .HEN YOU RUN| 00000470: 20 54 48 45 20 50 52 4F 47 52 41 4D 20 49 54 20 | THE PROGRAM IT | 00000480: 53 49 4D 50 4C 59 20 4B 45 45 50 53 20 41 53 4B |SIMPLY KEEPS ASK| 00000490: 49 4E 47 20 46 4F 52 20 41 20 50 52 4F 4A 45 43 |ING FOR A PROJEC| 000004A0: 54 0D 22 20 20 20 20 20 20 20 20 20 4E 55 4D 42 |T." NUMB| 000004B0: 45 52 20 41 4E 44 20 54 48 45 20 4E 55 4D 42 45 |ER AND THE NUMBE| 000004C0: 52 20 4F 46 20 48 4F 55 52 53 20 53 50 45 4E 54 |R OF HOURS SPENT| 000004D0: 20 4F 4E 20 54 48 41 54 20 50 52 4F 4A 45 43 54 | ON THAT PROJECT| 000004E0: 2E 20 D3 4F 20 20 41 4C 4C 0D 22 20 20 20 20 20 |. .O ALL." | 000004F0: 20 20 20 20 C9 27 44 20 48 41 56 45 20 54 4F 20 | .'D HAVE TO | 00000500: 44 4F 20 49 53 20 47 4F 20 54 48 52 4F 55 47 48 |DO IS GO THROUGH| 00000510: 20 54 48 45 20 43 41 4C 45 4E 44 41 52 20 41 4E | THE CALENDAR AN| 00000520: 44 20 45 4E 54 45 52 20 45 41 43 48 20 49 54 45 |D ENTER EACH ITE| 00000530: 4D 0D 22 20 20 20 20 20 20 20 20 20 49 4E 20 54 |M." IN T| 00000540: 48 45 20 4F 52 44 45 52 20 49 4E 20 57 48 49 43 |HE ORDER IN WHIC| 00000550: 48 20 20 49 54 27 53 20 20 46 4F 55 4E 44 2E 20 |H IT'S FOUND. | 00000560: 20 C9 46 20 20 41 4E 20 20 27 C5 27 20 20 49 53 | .F AN '.' IS| 00000570: 20 20 45 4E 54 45 52 45 44 0D 22 20 20 20 20 20 | ENTERED." | 00000580: 20 20 20 20 49 4E 53 54 45 41 44 20 4F 46 20 41 | INSTEAD OF A| 00000590: 20 50 52 4F 4A 45 43 54 20 4E 55 4D 42 45 52 2C | PROJECT NUMBER,| 000005A0: 20 54 48 45 4E 20 41 4E 59 20 20 47 45 4E 45 52 | THEN ANY GENER| 000005B0: 41 4C 20 20 45 58 50 45 4E 53 45 53 20 20 4E 4F |AL EXPENSES NO| 000005C0: 54 0D 22 20 20 20 20 20 20 20 20 20 52 45 4C 41 |T." RELA| 000005D0: 54 45 44 20 54 4F 20 41 20 20 50 41 52 54 49 43 |TED TO A PARTIC| 000005E0: 55 4C 41 52 20 20 50 52 4F 4A 45 43 54 20 20 43 |ULAR PROJECT C| 000005F0: 41 4E 20 20 42 45 20 20 45 4E 54 45 52 45 44 2E |AN BE ENTERED.| 00000600: 20 20 CF 4E 43 45 20 20 41 0D 22 20 20 20 20 20 | .NCE A." | 00000610: 20 20 20 20 50 52 4F 4A 45 43 54 20 4E 55 4D 42 | PROJECT NUMB| 00000620: 45 52 20 49 53 20 45 4E 54 45 52 45 44 2C 20 52 |ER IS ENTERED, R| 00000630: 45 53 50 4F 4E 44 49 4E 47 20 57 49 54 48 20 27 |ESPONDING WITH '| 00000640: C5 27 20 49 4E 53 54 45 41 44 20 4F 46 20 54 48 |.' INSTEAD OF TH| 00000650: 45 0D 22 20 20 20 20 20 20 20 20 20 4E 55 4D 42 |E." NUMB| 00000660: 45 52 20 4F 46 20 48 4F 55 52 53 20 41 4C 4C 4F |ER OF HOURS ALLO| 00000670: 57 53 20 4D 45 20 54 4F 20 20 45 4E 54 45 52 20 |WS ME TO ENTER | 00000680: 20 54 48 45 20 20 45 58 50 45 4E 53 45 53 20 20 | THE EXPENSES | 00000690: 46 4F 52 20 20 54 48 41 54 0D 22 20 20 20 20 20 |FOR THAT." | 000006A0: 20 20 20 20 50 41 52 54 49 43 55 4C 41 52 20 50 | PARTICULAR P| 000006B0: 52 4F 4A 45 43 54 2E 0D 22 0D 22 20 20 20 20 20 |ROJECT.."." | 000006C0: 20 20 20 20 D7 48 45 4E 20 44 4F 4E 45 20 45 4E | .HEN DONE EN| 000006D0: 54 45 52 49 4E 47 20 44 41 54 41 2C 20 45 4E 54 |TERING DATA, ENT| 000006E0: 45 52 20 41 20 27 C4 27 20 46 4F 52 20 54 48 45 |ER A '.' FOR THE| 000006F0: 20 50 52 4F 4A 45 43 54 20 20 4E 55 4D 42 45 52 | PROJECT NUMBER| 00000700: 2E 0D 22 20 20 20 20 20 20 20 20 20 C1 54 20 54 |.." .T T| 00000710: 48 41 54 20 50 4F 49 4E 54 20 54 48 45 20 50 52 |HAT POINT THE PR| 00000720: 4F 47 52 41 4D 20 41 53 4B 53 20 49 46 20 41 4C |OGRAM ASKS IF AL| 00000730: 4C 20 20 50 52 4F 4A 45 43 54 53 20 20 41 52 45 |L PROJECTS ARE| 00000740: 20 20 41 54 20 20 54 48 45 0D 22 20 20 20 20 20 | AT THE." | 00000750: 20 20 20 20 53 41 4D 45 20 48 4F 55 52 4C 59 20 | SAME HOURLY | 00000760: 52 41 54 45 2E 20 20 D4 48 45 4E 20 20 54 48 45 |RATE. .HEN THE| 00000770: 20 20 43 4F 52 52 45 43 54 20 20 48 4F 55 52 4C | CORRECT HOURL| 00000780: 59 20 20 52 41 54 45 20 20 46 4F 52 20 20 41 4C |Y RATE FOR AL| 00000790: 4C 0D 22 20 20 20 20 20 20 20 20 20 50 52 4F 4A |L." PROJ| 000007A0: 45 43 54 53 20 4F 52 20 45 41 43 48 20 49 4E 44 |ECTS OR EACH IND| 000007B0: 49 56 49 44 55 41 4C 20 50 52 4F 4A 45 43 54 20 |IVIDUAL PROJECT | 000007C0: 43 41 4E 20 42 45 20 45 4E 54 45 52 45 44 2E 0D |CAN BE ENTERED..| 000007D0: 22 0D 22 20 20 20 20 20 20 20 20 20 CF 4E 43 45 |"." .NCE| 000007E0: 20 54 48 45 20 50 52 4F 47 52 41 4D 20 48 41 53 | THE PROGRAM HAS| 000007F0: 20 41 4C 4C 20 54 48 45 20 4E 45 43 45 53 53 41 | ALL THE NECESSA| 00000800: 52 59 20 49 4E 46 4F 52 4D 41 54 49 4F 4E 2C 20 |RY INFORMATION, | 00000810: 49 54 20 20 53 4F 52 54 53 0D 22 20 20 20 20 20 |IT SORTS." | 00000820: 20 20 20 20 54 48 45 20 50 52 4F 4A 45 43 54 53 | THE PROJECTS| 00000830: 20 49 4E 54 4F 20 4E 55 4D 45 52 49 43 41 4C 20 | INTO NUMERICAL | 00000840: 4F 52 44 45 52 20 41 4E 44 20 43 4F 4D 50 55 54 |ORDER AND COMPUT| 00000850: 45 53 20 54 48 45 20 54 4F 54 41 4C 20 20 46 4F |ES THE TOTAL FO| 00000860: 52 0D 22 20 20 20 20 20 20 20 20 20 45 41 43 48 |R." EACH| 00000870: 20 50 52 4F 4A 45 43 54 2E 20 D4 48 45 20 49 4E | PROJECT. .HE IN| 00000880: 46 4F 52 4D 41 54 49 4F 4E 20 44 49 53 50 4C 41 |FORMATION DISPLA| 00000890: 59 45 44 20 49 4E 43 4C 55 44 45 53 20 54 48 45 |YED INCLUDES THE| 000008A0: 20 20 50 52 4F 4A 45 43 54 0D 22 20 20 20 20 20 | PROJECT." | 000008B0: 20 20 20 20 4E 55 4D 42 45 52 2C 20 54 48 45 20 | NUMBER, THE | 000008C0: 54 4F 54 41 4C 20 4E 55 4D 42 45 52 20 4F 46 20 |TOTAL NUMBER OF | 000008D0: 48 4F 55 52 53 20 55 53 45 44 2C 20 54 48 45 20 |HOURS USED, THE | 000008E0: 48 4F 55 52 4C 59 20 52 41 54 45 2C 20 20 54 48 |HOURLY RATE, TH| 000008F0: 45 0D 22 20 20 20 20 20 20 20 20 20 54 4F 54 41 |E." TOTA| 00000900: 4C 20 45 58 50 45 4E 53 45 53 2C 20 41 4E 44 20 |L EXPENSES, AND | 00000910: 54 48 45 20 20 46 49 4E 41 4C 20 20 54 4F 54 41 |THE FINAL TOTA| 00000920: 4C 20 20 46 4F 52 20 20 54 48 41 54 20 20 50 52 |L FOR THAT PR| 00000930: 4F 4A 45 43 54 2E 20 20 C1 0D 22 20 20 20 20 20 |OJECT. .." | 00000940: 20 20 20 20 53 45 50 41 52 41 54 45 20 4C 49 4E | SEPARATE LIN| 00000950: 45 20 53 48 4F 57 53 20 4D 49 53 43 45 4C 4C 41 |E SHOWS MISCELLA| 00000960: 4E 45 4F 55 53 20 45 58 50 45 4E 53 45 53 20 20 |NEOUS EXPENSES | 00000970: 4E 4F 54 20 20 52 45 4C 45 41 54 45 44 20 20 54 |NOT RELEATED T| 00000980: 4F 0D 22 20 20 20 20 20 20 20 20 20 41 4E 59 20 |O." ANY | 00000990: 50 41 52 54 49 43 55 4C 41 52 20 50 52 4F 4A 45 |PARTICULAR PROJE| 000009A0: 43 54 20 41 4E 44 20 41 20 53 55 4D 4D 41 52 59 |CT AND A SUMMARY| 000009B0: 20 4C 49 4E 45 20 53 48 4F 57 53 20 54 48 45 20 | LINE SHOWS THE | 000009C0: 20 43 4F 4D 42 49 4E 45 44 0D 22 20 20 20 20 20 | COMBINED." | 000009D0: 20 20 20 20 54 4F 54 41 4C 53 2E 0D 22 0D 22 20 | TOTALS.."." | 000009E0: 20 20 20 20 20 20 20 20 C9 20 4E 45 56 45 52 20 | . NEVER | 000009F0: 42 4F 54 48 45 52 45 44 20 54 4F 20 50 52 49 4E |BOTHERED TO PRIN| 00000A00: 54 20 4F 55 54 20 54 48 45 20 54 4F 54 41 4C 53 |T OUT THE TOTALS| 00000A10: 20 53 49 4E 43 45 20 C9 20 57 41 53 20 20 43 4F | SINCE . WAS CO| 00000A20: 50 59 49 4E 47 0D 22 20 20 20 20 20 20 20 20 20 |PYING." | 00000A30: 49 54 20 4F 4E 54 4F 20 53 50 45 43 49 41 4C 20 |IT ONTO SPECIAL | 00000A40: 46 4F 52 4D 53 2C 20 42 55 54 20 49 54 20 43 4F |FORMS, BUT IT CO| 00000A50: 55 4C 44 20 42 45 20 44 4F 4E 45 20 45 41 53 49 |ULD BE DONE EASI| 00000A60: 4C 59 2E 20 20 D3 49 4E 43 45 20 20 C9 0D 22 20 |LY. .INCE .." | 00000A70: 20 20 20 20 20 20 20 20 57 41 53 20 44 49 53 50 | WAS DISP| 00000A80: 4C 41 59 49 4E 47 20 54 48 45 20 46 49 4E 41 4C |LAYING THE FINAL| 00000A90: 20 54 4F 54 41 4C 53 20 4F 4E 20 54 48 45 20 53 | TOTALS ON THE S| 00000AA0: 43 52 45 45 4E 2C 20 C9 20 4C 49 4D 49 54 45 44 |CREEN, . LIMITED| 00000AB0: 20 20 54 48 45 0D 22 20 20 20 20 20 20 20 20 20 | THE." | 00000AC0: 50 52 4F 47 52 41 4D 20 54 4F 20 41 43 43 45 50 |PROGRAM TO ACCEP| 00000AD0: 54 20 4F 4E 4C 59 20 31 35 20 44 49 46 46 45 52 |T ONLY 15 DIFFER| 00000AE0: 45 4E 54 20 20 50 52 4F 4A 45 43 54 20 20 4E 55 |ENT PROJECT NU| 00000AF0: 4D 42 45 52 53 20 20 53 4F 20 20 49 54 0D 22 20 |MBERS SO IT." | 00000B00: 20 20 20 20 20 20 20 20 57 4F 55 4C 44 20 46 49 | WOULD FI| 00000B10: 54 20 4F 4E 20 54 48 45 20 20 53 43 52 45 45 4E |T ON THE SCREEN| 00000B20: 20 20 4E 49 43 45 4C 59 2E 20 20 C1 47 41 49 4E | NICELY. .GAIN| 00000B30: 2C 20 20 59 4F 55 20 20 43 4F 55 4C 44 20 20 45 |, YOU COULD E| 00000B40: 41 53 49 4C 59 0D 22 20 20 20 20 20 20 20 20 20 |ASILY." | 00000B50: 43 48 41 4E 47 45 20 54 48 49 53 20 49 46 20 49 |CHANGE THIS IF I| 00000B60: 54 20 57 41 53 20 52 45 41 4C 4C 59 20 4E 45 43 |T WAS REALLY NEC| 00000B70: 45 53 53 41 52 59 2E 0D 22 0D 22 20 20 20 20 20 |ESSARY.."." | 00000B80: 20 20 20 20 CC 4F 4F 4B 49 4E 47 20 49 4E 53 49 | .OOKING INSI| 00000B90: 44 45 20 54 48 45 20 50 52 4F 47 52 41 4D 2C 20 |DE THE PROGRAM, | 00000BA0: 54 48 45 20 C1 20 4D 41 54 52 49 58 20 52 45 43 |THE . MATRIX REC| 00000BB0: 4F 52 44 53 20 41 4C 4C 20 20 50 52 4F 4A 45 43 |ORDS ALL PROJEC| 00000BC0: 54 0D 22 20 20 20 20 20 20 20 20 20 49 4E 46 4F |T." INFO| 00000BD0: 52 4D 41 54 49 4F 4E 20 41 53 20 46 4F 4C 4C 4F |RMATION AS FOLLO| 00000BE0: 57 53 3A 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 22 |WS:............"| 00000BF0: 20 20 20 20 20 20 20 20 20 D4 C9 CD C5 20 C2 C9 | .... ..| 00000C00: CC CC C9 CE C7 20 20 20 20 20 20 20 20 20 C2 59 |..... .Y| 00000C10: 3A 20 D2 4F 42 45 52 54 20 D7 2E 20 C2 41 4B 45 |: .OBERT .. .AKE| 00000C20: 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |R | 00000C30: D0 41 47 45 20 32 0D 0D 0D 22 0D 22 20 20 20 20 |.AGE 2..."." | 00000C40: 20 20 20 20 20 20 20 20 20 20 C1 28 58 2C 31 29 | .(X,1)| 00000C50: 20 3D 20 50 52 4F 4A 45 43 54 20 4E 55 4D 42 45 | = PROJECT NUMBE| 00000C60: 52 0D 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |R." | 00000C70: 20 C1 28 58 2C 32 29 20 3D 20 4E 55 4D 42 45 52 | .(X,2) = NUMBER| 00000C80: 20 4F 46 20 48 4F 55 52 53 0D 22 20 20 20 20 20 | OF HOURS." | 00000C90: 20 20 20 20 20 20 20 20 20 C1 28 58 2C 33 29 20 | .(X,3) | 00000CA0: 3D 20 48 4F 55 52 4C 59 20 52 41 54 45 0D 22 20 |= HOURLY RATE." | 00000CB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 C1 28 58 | .(X| 00000CC0: 2C 34 29 20 3D 20 50 52 4F 4A 45 43 54 20 45 58 |,4) = PROJECT EX| 00000CD0: 50 45 4E 53 45 53 0D 22 0D 22 20 20 20 20 20 20 |PENSES."." | 00000CE0: 20 20 20 C9 4E 20 41 44 44 49 54 49 4F 4E 2C 20 | .N ADDITION, | 00000CF0: C1 28 30 2C 31 29 20 43 4F 4E 54 41 49 4E 53 20 |.(0,1) CONTAINS | 00000D00: 54 48 45 20 4E 55 4D 42 45 52 20 4F 46 20 44 49 |THE NUMBER OF DI| 00000D10: 46 46 45 52 45 4E 54 20 20 50 52 4F 4A 45 43 54 |FFERENT PROJECT| 00000D20: 0D 22 20 20 20 20 20 20 20 20 20 4E 55 4D 42 45 |." NUMBE| 00000D30: 52 53 20 43 55 52 52 45 4E 54 4C 59 20 20 45 4E |RS CURRENTLY EN| 00000D40: 54 45 52 45 44 20 20 41 4E 44 20 20 C1 28 30 2C |TERED AND .(0,| 00000D50: 34 29 20 20 43 4F 4E 54 41 49 4E 53 20 20 54 48 |4) CONTAINS TH| 00000D60: 45 20 20 54 4F 54 41 4C 0D 22 20 20 20 20 20 20 |E TOTAL." | 00000D70: 20 20 20 47 45 4E 45 52 41 4C 20 45 58 50 45 4E | GENERAL EXPEN| 00000D80: 53 45 53 2E 0D 22 0D 22 20 20 20 20 20 20 20 20 |SES.."." | 00000D90: 20 CC 49 4E 45 53 20 32 39 30 2D 33 33 30 20 47 | .INES 290-330 G| 00000DA0: 45 54 20 54 48 45 20 50 52 4F 4A 45 43 54 20 4E |ET THE PROJECT N| 00000DB0: 55 4D 42 45 52 20 41 4E 44 20 43 48 45 43 4B 20 |UMBER AND CHECK | 00000DC0: 54 4F 20 53 45 45 20 20 49 46 20 20 49 54 0D 22 |TO SEE IF IT."| 00000DD0: 20 20 20 20 20 20 20 20 20 57 41 53 20 20 50 52 | WAS PR| 00000DE0: 45 56 49 4F 55 53 4C 59 20 20 45 4E 54 45 52 45 |EVIOUSLY ENTERE| 00000DF0: 44 20 20 42 59 20 20 53 43 41 4E 4E 49 4E 47 20 |D BY SCANNING | 00000E00: 20 54 48 45 20 20 43 55 52 52 45 4E 54 20 20 20 | THE CURRENT | 00000E10: 4D 41 54 52 49 58 0D 22 20 20 20 20 20 20 20 20 |MATRIX." | 00000E20: 20 45 4E 54 52 49 45 53 2E 20 D7 48 45 4E 20 41 | ENTRIES. .HEN A| 00000E30: 20 4E 45 57 20 50 52 4F 4A 45 43 54 20 4E 55 4D | NEW PROJECT NUM| 00000E40: 42 45 52 20 49 53 20 45 4E 54 45 52 45 44 2C 20 |BER IS ENTERED, | 00000E50: 49 54 27 53 20 41 44 44 45 44 20 20 41 54 0D 22 |IT'S ADDED AT."| 00000E60: 20 20 20 20 20 20 20 20 20 54 48 45 20 45 4E 44 | THE END| 00000E70: 20 4F 46 20 54 48 45 20 4D 41 54 52 49 58 20 49 | OF THE MATRIX I| 00000E80: 4E 20 4C 49 4E 45 20 20 33 36 30 2E 20 20 CC 49 |N LINE 360. .I| 00000E90: 4E 45 53 20 20 33 37 30 2D 34 30 30 20 20 47 45 |NES 370-400 GE| 00000EA0: 54 20 20 54 48 45 0D 22 20 20 20 20 20 20 20 20 |T THE." | 00000EB0: 20 4E 55 4D 42 45 52 20 4F 46 20 48 4F 55 52 53 | NUMBER OF HOURS| 00000EC0: 20 41 4E 44 20 52 4F 55 4E 44 53 20 54 48 45 4D | AND ROUNDS THEM| 00000ED0: 20 54 4F 20 54 48 45 20 4E 45 41 52 45 53 54 20 | TO THE NEAREST | 00000EE0: 20 54 45 4E 54 48 20 20 4F 46 20 20 41 4E 0D 22 | TENTH OF AN."| 00000EF0: 20 20 20 20 20 20 20 20 20 48 4F 55 52 20 42 45 | HOUR BE| 00000F00: 46 4F 52 45 20 41 44 44 49 4E 47 20 49 54 20 54 |FORE ADDING IT T| 00000F10: 4F 20 54 48 45 20 43 55 52 52 45 4E 54 20 54 4F |O THE CURRENT TO| 00000F20: 54 41 4C 2E 20 CC 49 4E 45 53 20 34 33 30 2D 34 |TAL. .INES 430-4| 00000F30: 35 30 20 47 45 54 0D 22 20 20 20 20 20 20 20 20 |50 GET." | 00000F40: 20 50 52 4F 4A 45 43 54 20 45 58 50 45 4E 53 45 | PROJECT EXPENSE| 00000F50: 53 20 41 4E 44 20 52 4F 55 4E 44 20 54 48 45 4D |S AND ROUND THEM| 00000F60: 20 54 4F 20 54 48 45 20 20 4E 45 41 52 45 53 54 | TO THE NEAREST| 00000F70: 20 20 43 45 4E 54 20 20 42 45 46 4F 52 45 0D 22 | CENT BEFORE."| 00000F80: 20 20 20 20 20 20 20 20 20 41 44 44 49 4E 47 20 | ADDING | 00000F90: 54 48 45 4D 20 54 4F 20 54 48 45 20 43 55 52 52 |THEM TO THE CURR| 00000FA0: 45 4E 54 20 54 4F 54 41 4C 2E 0D 22 0D 22 20 20 |ENT TOTAL.."." | 00000FB0: 20 20 20 20 20 20 20 CC 49 4E 45 53 20 34 37 30 | .INES 470| 00000FC0: 2D 35 36 30 20 47 45 54 20 54 48 45 20 48 4F 55 |-560 GET THE HOU| 00000FD0: 52 4C 59 20 52 41 54 45 20 46 4F 52 20 41 4C 4C |RLY RATE FOR ALL| 00000FE0: 20 50 52 4F 4A 45 43 54 53 20 41 4E 44 20 20 52 | PROJECTS AND R| 00000FF0: 4F 55 4E 44 0D 22 20 20 20 20 20 20 20 20 20 54 |OUND." T| 00001000: 48 45 4D 20 54 4F 20 54 48 45 20 4E 45 41 52 45 |HEM TO THE NEARE| 00001010: 53 54 20 43 45 4E 54 2E 20 D4 48 45 4E 20 20 4C |ST CENT. .HEN L| 00001020: 49 4E 45 53 20 20 35 37 30 2D 36 31 30 20 20 44 |INES 570-610 D| 00001030: 4F 20 20 41 20 20 53 49 4D 50 4C 45 0D 22 20 20 |O A SIMPLE." | 00001040: 20 20 20 20 20 20 20 42 55 42 42 4C 45 20 53 4F | BUBBLE SO| 00001050: 52 54 20 54 4F 20 50 55 54 20 54 48 45 20 50 52 |RT TO PUT THE PR| 00001060: 4F 4A 45 43 54 53 20 49 4E 20 4E 55 4D 45 52 49 |OJECTS IN NUMERI| 00001070: 43 41 4C 20 4F 52 44 45 52 2E 20 20 C6 49 4E 41 |CAL ORDER. .INA| 00001080: 4C 4C 59 2C 0D 22 20 20 20 20 20 20 20 20 20 4C |LLY,." L| 00001090: 49 4E 45 53 20 36 32 30 2D 37 30 30 20 50 52 49 |INES 620-700 PRI| 000010A0: 4E 54 20 54 48 45 20 54 4F 54 41 4C 53 20 41 53 |NT THE TOTALS AS| 000010B0: 20 54 48 45 59 27 52 45 20 43 4F 4D 50 55 54 45 | THEY'RE COMPUTE| 000010C0: 44 2E 0D 22 0D 22 20 20 20 20 20 20 20 20 20 D4 |D.."." .| 000010D0: 48 45 20 53 55 42 52 4F 55 54 49 4E 45 20 49 4E |HE SUBROUTINE IN| 000010E0: 20 4C 49 4E 45 53 20 37 32 30 2D 37 34 30 20 49 | LINES 720-740 I| 000010F0: 53 20 20 55 53 45 44 20 20 54 4F 20 20 46 4F 52 |S USED TO FOR| 00001100: 4D 41 54 20 20 4E 55 4D 42 45 52 53 0D 22 20 20 |MAT NUMBERS." | 00001110: 20 20 20 20 20 20 20 49 4E 54 4F 20 44 4F 4C 4C | INTO DOLL| 00001120: 41 52 53 20 41 4E 44 20 43 45 4E 54 53 2E 20 CE |ARS AND CENTS. .| 00001130: 4F 54 45 20 54 48 41 54 20 48 4F 55 52 53 20 41 |OTE THAT HOURS A| 00001140: 52 45 20 20 52 4F 55 4E 44 45 44 20 20 54 4F 20 |RE ROUNDED TO | 00001150: 20 54 48 45 0D 22 20 20 20 20 20 20 20 20 20 4E | THE." N| 00001160: 45 41 52 45 53 54 20 54 45 4E 54 48 20 41 4E 44 |EAREST TENTH AND| 00001170: 20 20 45 58 50 45 4E 53 45 53 20 20 4F 52 20 20 | EXPENSES OR | 00001180: 52 41 54 45 53 20 20 41 52 45 20 20 52 4F 55 4E |RATES ARE ROUN| 00001190: 44 45 44 20 20 54 4F 20 20 54 48 45 0D 22 20 20 |DED TO THE." | 000011A0: 20 20 20 20 20 20 20 4E 45 41 52 45 53 54 20 43 | NEAREST C| 000011B0: 45 4E 54 2E 20 D7 48 45 4E 20 4D 55 4C 54 49 50 |ENT. .HEN MULTIP| 000011C0: 4C 59 49 4E 47 20 54 48 45 20 48 4F 55 52 4C 59 |LYING THE HOURLY| 000011D0: 20 52 41 54 45 20 42 59 20 54 48 45 20 20 4E 55 | RATE BY THE NU| 000011E0: 4D 42 45 52 0D 22 20 20 20 20 20 20 20 20 20 4F |MBER." O| 000011F0: 46 20 48 4F 55 52 53 20 46 4F 52 20 45 41 43 48 |F HOURS FOR EACH| 00001200: 20 50 52 4F 4A 45 43 54 2C 20 54 48 45 20 54 4F | PROJECT, THE TO| 00001210: 54 41 4C 20 49 53 20 41 4C 53 4F 20 52 4F 55 4E |TAL IS ALSO ROUN| 00001220: 44 45 44 20 20 54 4F 20 20 54 48 45 0D 22 20 20 |DED TO THE." | 00001230: 20 20 20 20 20 20 20 4E 45 41 52 45 53 54 20 43 | NEAREST C| 00001240: 45 4E 54 20 49 4E 20 4C 49 4E 45 20 36 33 30 2E |ENT IN LINE 630.| 00001250: 20 D4 48 45 53 45 20 4C 49 54 54 4C 45 20 43 48 | .HESE LITTLE CH| 00001260: 45 43 4B 53 20 48 45 4C 50 20 20 4B 45 45 50 20 |ECKS HELP KEEP | 00001270: 20 54 48 45 0D 22 20 20 20 20 20 20 20 20 20 46 | THE." F| 00001280: 49 4E 41 4C 20 20 44 49 53 50 4C 41 59 20 20 46 |INAL DISPLAY F| 00001290: 52 4F 4D 20 20 48 41 56 49 4E 47 20 20 4F 44 44 |ROM HAVING ODD| 000012A0: 20 20 56 41 4C 55 45 53 20 20 54 48 41 54 20 20 | VALUES THAT | 000012B0: 44 45 53 54 52 4F 59 20 20 54 48 45 0D 22 20 20 |DESTROY THE." | 000012C0: 20 20 20 20 20 20 20 45 58 50 45 43 54 45 44 20 | EXPECTED | 000012D0: 54 41 42 4C 45 20 46 4F 52 4D 41 54 2E 0D 22 0D |TABLE FORMAT..".| 000012E0: 22 20 20 20 20 20 20 20 20 20 C1 53 20 C9 20 53 |" .S . S| 000012F0: 41 49 44 2C 20 54 48 45 20 50 52 4F 47 52 41 4D |AID, THE PROGRAM| 00001300: 20 49 53 20 4E 4F 54 20 46 41 4E 43 59 20 42 59 | IS NOT FANCY BY| 00001310: 20 41 4E 59 20 4D 45 41 4E 53 2C 20 42 55 54 20 | ANY MEANS, BUT | 00001320: 49 54 20 20 44 49 44 0D 22 20 20 20 20 20 20 20 |IT DID." | 00001330: 20 20 48 45 4C 50 20 53 4F 4C 56 45 20 54 48 45 | HELP SOLVE THE| 00001340: 20 50 52 4F 42 4C 45 4D 20 41 54 20 48 41 4E 44 | PROBLEM AT HAND| 00001350: 2E 20 C9 20 50 52 4F 42 41 42 4C 59 20 43 4F 55 |. . PROBABLY COU| 00001360: 4C 44 20 48 41 56 45 20 43 4F 4D 45 20 55 50 0D |LD HAVE COME UP.| 00001370: 22 20 20 20 20 20 20 20 20 20 57 49 54 48 20 42 |" WITH B| 00001380: 45 54 54 45 52 20 52 45 43 4F 52 44 20 4B 45 45 |ETTER RECORD KEE| 00001390: 50 49 4E 47 20 4D 45 54 48 4F 44 53 20 42 55 54 |PING METHODS BUT| 000013A0: 20 49 54 20 57 41 53 20 4D 4F 52 45 20 46 55 4E | IT WAS MORE FUN| 000013B0: 20 54 4F 20 20 44 4F 0D 22 20 20 20 20 20 20 20 | TO DO." | 000013C0: 20 20 49 54 20 54 48 49 53 20 57 41 59 2E 20 C9 | IT THIS WAY. .| 000013D0: 46 20 59 4F 55 27 52 45 20 4E 4F 54 20 44 4F 49 |F YOU'RE NOT DOI| 000013E0: 4E 47 20 20 43 4F 4E 53 55 4C 54 49 4E 47 20 20 |NG CONSULTING | 000013F0: 57 4F 52 4B 2C 20 20 59 4F 55 20 20 43 41 4E 0D |WORK, YOU CAN.| 00001400: 22 20 20 20 20 20 20 20 20 20 53 54 49 4C 4C 20 |" STILL | 00001410: 55 53 45 20 54 48 45 20 4D 41 49 4E 20 49 44 45 |USE THE MAIN IDE| 00001420: 41 53 20 46 4F 52 20 4D 41 4E 59 20 4F 54 48 45 |AS FOR MANY OTHE| 00001430: 52 20 20 54 41 53 4B 53 20 20 28 45 2E 47 2E 20 |R TASKS (E.G. | 00001440: 20 41 44 44 49 4E 47 0D 22 20 20 20 20 20 20 20 | ADDING." | 00001450: 20 20 54 41 58 20 52 45 43 45 49 50 54 53 2C 20 | TAX RECEIPTS, | 00001460: 43 4C 49 45 4E 54 20 42 49 4C 4C 49 4E 47 20 4F |CLIENT BILLING O| 00001470: 52 20 49 4E 56 45 4E 54 4F 52 59 20 43 4F 4E 54 |R INVENTORY CONT| 00001480: 52 4F 4C 29 2E 20 D9 4F 55 20 43 4F 55 4C 44 0D |ROL). .OU COULD.| 00001490: 22 20 20 20 20 20 20 20 20 20 55 53 45 20 4B 45 |" USE KE| 000014A0: 59 20 57 4F 52 44 53 20 4F 52 20 4E 41 4D 45 53 |Y WORDS OR NAMES| 000014B0: 20 20 28 54 45 58 54 20 20 53 54 52 49 4E 47 53 | (TEXT STRINGS| 000014C0: 29 20 20 49 4E 53 54 45 41 44 20 20 4F 46 20 20 |) INSTEAD OF | 000014D0: 50 52 4F 4A 45 43 54 0D 22 20 20 20 20 20 20 20 |PROJECT." | 000014E0: 20 20 4E 55 4D 42 45 52 53 2C 20 4F 52 20 41 44 | NUMBERS, OR AD| 000014F0: 44 20 4D 4F 52 45 20 52 45 43 4F 52 44 53 20 50 |D MORE RECORDS P| 00001500: 45 52 20 45 4E 54 52 59 2E 0D 22 0D 22 20 20 20 |ER ENTRY.."." | 00001510: 20 20 20 20 20 20 C2 59 20 53 48 4F 57 49 4E 47 | .Y SHOWING| 00001520: 20 59 4F 55 20 41 20 53 49 4D 50 4C 45 20 50 52 | YOU A SIMPLE PR| 00001530: 4F 42 4C 45 4D 20 41 4E 44 20 41 20 50 52 49 4D |OBLEM AND A PRIM| 00001540: 49 54 49 56 45 20 57 41 59 20 49 4E 20 20 57 48 |ITIVE WAY IN WH| 00001550: 49 43 48 0D 22 20 20 20 20 20 20 20 20 20 C9 20 |ICH." . | 00001560: 55 53 45 44 20 41 20 43 4F 4D 50 55 54 45 52 20 |USED A COMPUTER | 00001570: 54 4F 20 48 45 4C 50 20 53 49 4D 50 4C 49 46 59 |TO HELP SIMPLIFY| 00001580: 20 54 48 41 54 20 20 54 41 53 4B 2C 20 20 C9 20 | THAT TASK, . | 00001590: 20 48 4F 50 45 20 20 C9 27 56 45 0D 22 20 20 20 | HOPE .'VE." | 000015A0: 20 20 20 20 20 20 45 4E 43 4F 55 52 41 47 45 44 | ENCOURAGED| 000015B0: 20 59 4F 55 20 54 4F 20 54 52 59 20 54 48 49 4E | YOU TO TRY THIN| 000015C0: 47 53 20 4F 4E 20 59 4F 55 52 20 4F 57 4E 2E 20 |GS ON YOUR OWN. | 000015D0: 20 C9 4E 43 4F 52 50 4F 52 41 54 45 20 20 49 44 | .NCORPORATE ID| 000015E0: 45 41 53 0D 22 20 20 20 20 20 20 20 20 20 4F 52 |EAS." OR| 000015F0: 20 52 4F 55 54 49 4E 45 53 20 46 52 4F 4D 20 44 | ROUTINES FROM D| 00001600: 49 46 46 45 52 45 4E 54 20 50 52 4F 47 52 41 4D |IFFERENT PROGRAM| 00001610: 53 20 20 59 4F 55 20 20 53 45 45 20 20 49 4E 20 |S YOU SEE IN | 00001620: 20 4D 41 47 41 5A 49 4E 45 53 2E 0D 22 20 20 20 | MAGAZINES.." | 00001630: 20 20 20 20 20 20 C5 58 50 45 52 49 4D 45 4E 54 | .XPERIMENT| 00001640: 20 41 4E 44 20 48 41 56 45 20 46 55 4E 2C 20 41 | AND HAVE FUN, A| 00001650: 4E 44 20 44 4F 4E 27 54 20 42 45 20 41 46 52 41 |ND DON'T BE AFRA| 00001660: 49 44 20 54 4F 20 54 52 59 20 41 4E 20 20 49 44 |ID TO TRY AN ID| 00001670: 45 41 2E 0D 22 20 20 20 20 20 20 20 20 20 C9 46 |EA.." .F| 00001680: 20 59 4F 55 52 20 46 49 52 53 54 20 41 54 54 45 | YOUR FIRST ATTE| 00001690: 4D 50 54 20 46 41 49 4C 53 2C 20 54 52 59 20 53 |MPT FAILS, TRY S| 000016A0: 4F 4D 45 54 48 49 4E 47 20 45 4C 53 45 3B 20 59 |OMETHING ELSE; Y| 000016B0: 4F 55 27 4C 4C 20 4C 45 41 52 4E 0D 22 20 20 20 |OU'LL LEARN." | 000016C0: 20 20 20 20 20 20 41 53 20 4D 55 43 48 20 46 52 | AS MUCH FR| 000016D0: 4F 4D 20 59 4F 55 52 20 4D 49 53 54 41 4B 45 53 |OM YOUR MISTAKES| 000016E0: 20 41 53 20 46 52 4F 4D 20 59 4F 55 52 20 53 55 | AS FROM YOUR SU| 000016F0: 43 43 45 53 53 45 53 2E 20 20 D3 4F 4D 45 54 49 |CCESSES. .OMETI| 00001700: 4D 45 53 0D 22 20 20 20 20 20 20 20 20 20 45 56 |MES." EV| 00001710: 45 4E 20 4D 4F 52 45 21 0D 0D 0D 0D 0D 0D 0D 0D |EN MORE!........| 00001720: 0D 0D 0D 0D 0D 0D |...... |
" TIME BILLING BY: ROBER
T W. BAKER PAGE 1..."
TIME BILLIN
G.." HERE'S A SIMPLE LITTLE PROG
RAM WITH A NUMBER OF POSSIBILITIES."
AND A FEW IDEAS THAT CAN EASILY BE
USED ELSEWHERE. I WROTE IT." SO
I COULD FIGURE OUT HOW MUCH I SHOUL
D CHARGE FOR MY." CONSULTING
SERVICES WITH A LOCAL CONSULTING FIRM.
THE FIRM." WOULD AASSIGN UNIQU
E PROJECT NUMBERS FOR EVERY PROJECT TH
EY." UNDERTOOK AND CODE THEM BY
PROJECT TYPE. AT THE END OF EACH."
MONTH THE FIRM WANTED A BILL FOR TH
E TIME I SPENT ON EACH." PRO
JECT (AT AN AGREED-UPON RATE) AND ANY
EXPENSES THAT I." INCURRED.."
." I NORMALLY CARRIED A SMALL CA
LENDAR AND SIMPLY JOTTED DOWN MY."
TIME AND EXPENSES EACH DAY. AT THE EN
D OF THE MONTH I'D HAVE." TO GO
BACK THROUGH THE CALENDAR AND ADD UP T
HE FIGURES. IT." GOT TO BE KIN
D OF MESSY AND TIME CONSUMING, SO I WRO
TE THIS." QUICK LITTLE PROGRAM
TO HELP OUT. IT'S NOT VERY FANCY BUT IT
." SURE WAS HANDY THEN.."."
WHEN YOU RUN THE PROGRAM IT SIMPLY K
EEPS ASKING FOR A PROJECT." NUMB
ER AND THE NUMBER OF HOURS SPENT ON THAT
PROJECT. SO ALL." I'D HAVE TO
DO IS GO THROUGH THE CALENDAR AND ENTER
EACH ITEM." IN THE ORDER IN WHIC
H IT'S FOUND. IF AN 'E' IS ENTERE
D." INSTEAD OF A PROJECT NUMBER,
THEN ANY GENERAL EXPENSES NOT."
RELATED TO A PARTICULAR PROJECT C
AN BE ENTERED. ONCE A." PROJ
ECT NUMBER IS ENTERED, RESPONDING WITH '
E' INSTEAD OF THE." NUMBER OF HO
URS ALLOWS ME TO ENTER THE EXPENSES
FOR THAT." PARTICULAR PROJECT..
"." WHEN DONE ENTERING DATA, ENT
ER A 'D' FOR THE PROJECT NUMBER.."
AT THAT POINT THE PROGRAM ASKS IF AL
L PROJECTS ARE AT THE." SAME
HOURLY RATE. THEN THE CORRECT HOURL
Y RATE FOR ALL." PROJECTS OR
EACH INDIVIDUAL PROJECT CAN BE ENTERED..
"." ONCE THE PROGRAM HAS ALL THE
NECESSARY INFORMATION, IT SORTS."
THE PROJECTS INTO NUMERICAL ORDER AN
D COMPUTES THE TOTAL FOR." EACH
PROJECT. THE INFORMATION DISPLAYED INCL
UDES THE PROJECT." NUMBER, THE
TOTAL NUMBER OF HOURS USED, THE HOURLY R
ATE, THE." TOTAL EXPENSES, AND
THE FINAL TOTAL FOR THAT PROJECT.
A." SEPARATE LINE SHOWS MISCELLA
NEOUS EXPENSES NOT RELEATED TO."
ANY PARTICULAR PROJECT AND A SUMMARY
LINE SHOWS THE COMBINED." TOTA
LS.."." I NEVER BOTHERED TO PRIN
T OUT THE TOTALS SINCE I WAS COPYING."
IT ONTO SPECIAL FORMS, BUT IT CO
ULD BE DONE EASILY. SINCE I."
WAS DISPLAYING THE FINAL TOTALS ON THE S
CREEN, I LIMITED THE." PROGRAM
TO ACCEPT ONLY 15 DIFFERENT PROJECT NU
MBERS SO IT." WOULD FIT ON THE
SCREEN NICELY. AGAIN, YOU COULD E
ASILY." CHANGE THIS IF IT WAS RE
ALLY NECESSARY.."." LOOKING INSI
DE THE PROGRAM, THE A MATRIX RECORDS ALL
PROJECT." INFORMATION AS FOLLO
WS:............" TIME BILLING
BY: ROBERT W. BAKER
PAGE 2..."." A(X,1) = PROJE
CT NUMBER." A(X,2) = NUMBER
OF HOURS." A(X,3) = HOURLY
RATE." A(X,4) = PROJECT EX
PENSES."." IN ADDITION, A(0,1) C
ONTAINS THE NUMBER OF DIFFERENT PROJECT
." NUMBERS CURRENTLY ENTERED A
ND A(0,4) CONTAINS THE TOTAL."
GENERAL EXPENSES.."." LINES 2
90-330 GET THE PROJECT NUMBER AND CHECK
TO SEE IF IT." WAS PREVIOUSLY
ENTERED BY SCANNING THE CURRENT
MATRIX." ENTRIES. WHEN A NEW PRO
JECT NUMBER IS ENTERED, IT'S ADDED AT."
THE END OF THE MATRIX IN LINE
360. LINES 370-400 GET THE."
NUMBER OF HOURS AND ROUNDS THEM TO THE
NEAREST TENTH OF AN." HOUR BE
FORE ADDING IT TO THE CURRENT TOTAL. LIN
ES 430-450 GET." PROJECT EXPENSE
S AND ROUND THEM TO THE NEAREST CENT
BEFORE." ADDING THEM TO THE CURR
ENT TOTAL.."." LINES 470-560 GET
THE HOURLY RATE FOR ALL PROJECTS AND R
OUND." THEM TO THE NEAREST CENT.
THEN LINES 570-610 DO A SIMPLE."
BUBBLE SORT TO PUT THE PROJECTS I
N NUMERICAL ORDER. FINALLY,." L
INES 620-700 PRINT THE TOTALS AS THEY'RE
COMPUTED.."." THE SUBROUTINE IN
LINES 720-740 IS USED TO FORMAT NUM
BERS." INTO DOLLARS AND CENTS. N
OTE THAT HOURS ARE ROUNDED TO THE."
NEAREST TENTH AND EXPENSES OR
RATES ARE ROUNDED TO THE." N
EAREST CENT. WHEN MULTIPLYING THE HOURLY
RATE BY THE NUMBER." OF HOURS
FOR EACH PROJECT, THE TOTAL IS ALSO ROUN
DED TO THE." NEAREST CENT IN L
INE 630. THESE LITTLE CHECKS HELP KEEP
THE." FINAL DISPLAY FROM HAV
ING ODD VALUES THAT DESTROY THE."
EXPECTED TABLE FORMAT.."."
AS I SAID, THE PROGRAM IS NOT FANCY BY
ANY MEANS, BUT IT DID." HELP S
OLVE THE PROBLEM AT HAND. I PROBABLY COU
LD HAVE COME UP." WITH BETTER RE
CORD KEEPING METHODS BUT IT WAS MORE FUN
TO DO." IT THIS WAY. IF YOU'RE
NOT DOING CONSULTING WORK, YOU CAN.
" STILL USE THE MAIN IDEAS FOR M
ANY OTHER TASKS (E.G. ADDING."
TAX RECEIPTS, CLIENT BILLING OR INVENT
ORY CONTROL). YOU COULD." USE KE
Y WORDS OR NAMES (TEXT STRINGS) INSTE
AD OF PROJECT." NUMBERS, OR AD
D MORE RECORDS PER ENTRY.."." BY
SHOWING YOU A SIMPLE PROBLEM AND A PRIM
ITIVE WAY IN WHICH." I USED A C
OMPUTER TO HELP SIMPLIFY THAT TASK, I
HOPE I'VE." ENCOURAGED YOU TO
TRY THINGS ON YOUR OWN. INCORPORATE ID
EAS." OR ROUTINES FROM DIFFERENT
PROGRAMS YOU SEE IN MAGAZINES.."
EXPERIMENT AND HAVE FUN, AND DON'T
BE AFRAID TO TRY AN IDEA.." IF
YOUR FIRST ATTEMPT FAILS, TRY SOMETHING
ELSE; YOU'LL LEARN." AS MUCH FR
OM YOUR MISTAKES AS FROM YOUR SUCCESSES.
SOMETIMES." EVEN MORE!........
......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL