UnNote (Booking Notes File)
and UNNOTH (Booking Notes History File)
***** Table setup for UNNOTE *****
'UNNOTE.DBF' NAME 'UNNOTE' (
STYPE C(3)
SNUMBER C(4)
BOOKREC N(8, 0)
NOTETYPE C(1)
PRIORITY I
LINE1 C(65)
LINE2 C(65)
LINE3 C(65)
LINE4 C(65)
LINE5 C(65)
LINE6 C(65)
PRINTED L
SFROM D
SNAME C(35)
MEMO1 M
MEMO2 M
SIGNATURE N(2, 0)
***** index for UNNOTE *****
INDEX ON STYPE+SNUMBER+STR(BOOKREC,8,0) TAG FNOTE COLLATE 'MACHINE'
INDEX ON STYPE+SNUMBER+SYS(11,SFROM) TAG BOOKING COLLATE 'MACHINE'
INDEX ON BOOKREC TAG BOOKREC COLLATE 'MACHINE'
***** Change properties for UNNOTE *****
DBSETPROP('UNNOTE.STYPE', 'Field', 'Caption', "Site")
DBSETPROP('UNNOTE.STYPE', 'Field', 'Comment', "Site Type")
DBSETPROP('UNNOTE.SNUMBER', 'Field', 'Caption', "Number")
DBSETPROP('UNNOTE.SNUMBER', 'Field', 'Comment', "Site Number")
DBSETPROP('UNNOTE.BOOKREC', 'Field', 'Caption', "Bookrec")
DBSETPROP('UNNOTE.NOTETYPE', 'Field', 'Caption', "Note Type")
DBSETPROP('UNNOTE.PRIORITY', 'Field', 'Caption', "Priority")
DBSETPROP('UNNOTE.PRIORITY', 'Field', 'Comment', "Priority" + CHR(13) + "")
DBSETPROP('UNNOTE.PRINTED', 'Field', 'Caption', "Printed")
DBSETPROP('UNNOTE.SFROM', 'Field', 'Caption', "Booking From Date")
DBSETPROP('UNNOTE.SNAME', 'Field', 'Caption', "Name")
DBSETPROP('UNNOTE.SNAME', 'Field', 'Comment', "Name/Surname of Booking")
DBSETPROP('UNNOTE.MEMO1', 'Field', 'Caption', "General Memo")
DBSETPROP('UNNOTE.MEMO1', 'Field', 'Comment', "General Memo")
DBSETPROP('UNNOTE.MEMO2', 'Field', 'Caption', "YOE Memo")
DBSETPROP('UNNOTE.MEMO2', 'Field', 'Comment', "Your Eyes Only memo" + CHR(13) + "")
ENDFUNC
Created with the Personal Edition of HelpNDoc: Easily create PDF Help documents