|
Display File..
A*%%TS DD 20060929 163416 Mike REL-V5.0.1 WDSc
A*%%FD Truck maintenance
A*%%EC
A DSPSIZ(24 80 *DS3)
A PRINT
A MSGALARM
A CA03(03 'EXIT')
A CA12(12 'RETURN')
A CA05(05 'REFRESH')
A CF06(06 'ADD RECORD')
A* CA?? CMD ATTN-NO CHGD DATA
A* RETURNED FROM DEVICE
A* CF?? CMD FUNCTION-RETURNS
A* CHGED DATA FROM DEVICE
A R LISTSFL
A*%%TS SD 19970128 140515 HENRY REL-V3R1M0 5763-PW1
A SFL
A 36 SFLNXTCHG
A L1SEL 1A B 6 3
A 37 DSPATR(RI)
A 37 DSPATR(PC)
A STRUCK 10A O 6 5COLOR(WHT)
A SBRCH 2A O 6 16COLOR(WHT)
A SDESC 30A O 6 19COLOR(WHT)
A SIFTA 1A O 6 52COLOR(WHT)
A SENDM 9Y 0O 6 55COLOR(BLU)
A EDTCDE(3)
A S1DATE 8Y 0O 6 66EDTWRD(' / / ')
A*
A R LISTCTL
A*%%TS SD 19970128 140515 HENRY REL-V3R1M0 5763-PW1
A SFLCTL(LISTSFL)
A SFLSIZ(20)
A SFLPAG(16)
A N34 PAGEDOWN(25)
A OVERLAY
A SFLCSRRRN(&CURSERRRN)
A 31 SFLDSP
A 32 SFLDSPCTL
A 33 SFLCLR
A 34 SFLEND(*MORE)
A LRRN 4S 0H SFLRCDNBR(CURSOR)
A CURSERRRN 5S 0H
A PROGNAME 10A O 1 3
A 1 27'Truck Maintenance'
A 1 70DATE
A EDTCDE(Y)
A 2 2'X=Change, D=Delete'
A 2 70TIME
A TRUCKEY 10A B 5 5CHECK(RB)
A COLOR(BLU)
A 20 DSPATR(PR)
A 3 56'Ending'
A 3 69'Last'
A 4 2'Opt'
A 4 7'Truck'
A 4 16'Br'
A 4 50'IFTA'
A 4 56'Mileage'
A 4 68'Chg'
A 4 72'Dte'
A 4 20'Truck'
A 4 26'description'
A R LISTFOOT
A*%%TS SD 19961015 145716 CMC REL-V3R1M0 5763-PW1
A OVERLAY
A 23 3'F3=Exit, F6=Add Drivers Rate'
A COLOR(YLW)
A ERRMSG 75A O 24 2
A 89 DSPATR(RI)
A 23 49'F12=ENTER NEW SEARCH KEYS'
A COLOR(YLW)
A R MAINT1
A*%%TS DD 20060929 163416 Mike REL-V5.0.1 WDSc
A OVERLAY
A PROGNAME 10A O 1 13
A 1 70DATE
A EDTCDE(Y)
A 1 27'Truck Maintenance'
A 4 2'Truck Number'
A COLOR(WHT)
A 4 17'. . . . . . .'
A COLOR(WHT)
A MRTRUCK 10A B 4 31
A 50 DSPATR(RI)
A 50 DSPATR(PC)
A CHECK(RB)
A 80 DSPATR(PR)
A N80 CHECK(ER)
A CHECK(FE)
A MRDESC 30A B 4 42COLOR(WHT)
A 5 2'Branch'
A COLOR(WHT)
A 5 9'. . . . . . . . . . .'
A COLOR(WHT)
A M1BRCH 2A B 5 31
A 80 DSPATR(PR)
A 51 DSPATR(RI)
A 51
AO 81 DSPATR(PC)
A CHECK(RB)
A M1BRNM 30A B 5 35
A 6 2'Ending Mileage'
A COLOR(WHT)
A 6 17'. . . . . . .'
A COLOR(WHT)
A M1ENDM 9Y 0B 6 31
A 80 DSPATR(PR)
A 52 DSPATR(RI)
A 52 DSPATR(PC)
A 7 2'IFTA Y/N'
A COLOR(WHT)
A 7 11'. . . . . . . . . .'
A COLOR(WHT)
A M1IFTA 1A B 7 31VALUES('Y' 'N')
A 51 DSPATR(RI)
A 51
AO 81 DSPATR(PC)
A CHECK(RB)
A 9 7'Average Miles'
A COLOR(WHT)
A 9 23'. . . .'
A COLOR(WHT)
A M1AVG1 7Y 4B 9 31
A 66 DSPATR(RI)
A 66 DSPATR(PC)
A EDTCDE(3)
A 11 7'Mileage brk'
A COLOR(WHT)
A 11 19'. . . . . .'
A COLOR(WHT)
A M1MIL1 4Y 3B 11 31
A 57 DSPATR(RI)
A 57 DSPATR(PC)
A EDTCDE(3)
A 11 40'Rate'
A COLOR(WHT)
A M1RTM1 4Y 3B 11 46
A 58 DSPATR(RI)
A 58 DSPATR(PC)
A EDTCDE(3)
A 12 7'Additional Break'
A COLOR(WHT)
A 12 25'. . .'
A COLOR(WHT)
A M1MIL2 4Y 3B 12 31
A 54 DSPATR(RI)
A 54 DSPATR(PC)
A EDTCDE(3)
A 12 40'Rate'
A COLOR(WHT)
A M1RTM2 4Y 3B 12 46
A 53 DSPATR(RI)
A 53 DSPATR(PC)
A EDTCDE(3)
A 15 7'Max Incentive'
A COLOR(WHT)
A M1MAXR 4Y 3B 15 31
A 53 DSPATR(RI)
A 53 DSPATR(PC)
A EDTCDE(3)
A 16 7'Last Changed Date'
A COLOR(WHT)
A 16 25'. . .'
A COLOR(WHT)
A M1DATE 8Y 0B 16 31EDTWRD(' / / ')
A 65 DSPATR(RI)
A 65 DSPATR(PC)
A 23 3'Enter='
A M1FUNC 6A O 23 10COLOR(YLW)
A 23 19'F3= Exit F5= Refresh'
A ERRMSG 75A O 24 2
A 89 DSPATR(RI)
A 23 55'F12= Cancel'
A 19 7'In Service Date'
A COLOR(WHT)
A 19 25'. . .'
A COLOR(WHT)
A INSERVDATE 8Y 0B 19 31EDTWRD(' / / ')
A 65 DSPATR(RI)
A 65 DSPATR(PC)
A 20 7'In Service Miles'
A COLOR(WHT)
A 20 25'. . .'
A COLOR(WHT)
A INSERMILES 9Y 0B 20 31
A 66 DSPATR(RI)
A 66 DSPATR(PC)
A EDTCDE(3)
A*%%GP SCREEN1 01
Thanks in advance,
Mike.
_________________________________________________________________
Add a Yahoo! contact to Windows Live Messenger for a chance to win a free
trip!
http://www.imagine-windowslive.com/minisites/yahoo/default.aspx?locale=en-us&hmtagline
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.