DIRECTORY
CrRPC,
TimeP15V2,
CHNameP2V0,
BasicTime,
BulkDataP0V1,
Rope;

AdobeP75V2: CEDAR DEFINITIONS ~ {

ROPE: TYPE ~ Rope.ROPE;


DatabaseSequence: TYPE ~ REF DatabaseSequenceObject;
DatabaseSequenceObject: TYPE ~ MACHINE DEPENDENT RECORD [
body: PACKED SEQUENCE length: CARDINAL OF ROPE
];

CourierTimedOutType: TYPE ~ ERROR [];
CourierTimedOut: CourierTimedOutType;

ChangeFieldListType: TYPE ~ PROC [h: CrRPC.Handle, instance: StaticTarget, changes: ChangeList];
ChangeFieldList: ChangeFieldListType;

SetOfARs: TYPE ~ REF SetOfARsObject;
SetOfARsObject: TYPE ~ MACHINE DEPENDENT RECORD [
body: PACKED SEQUENCE len: CARDINAL OF RunOfARs
];

VerifyVersionType: TYPE ~ PROC [h: CrRPC.Handle, instance: StaticTarget] RETURNS [ok: BOOLEAN];
VerifyVersion: VerifyVersionType;

QueryList: TYPE ~ REF QueryListBody;
QueryListBody: TYPE ~ MACHINE DEPENDENT RECORD [
name: Rope.ROPE, list: SetOfARs];

XNSQueryList: TYPE ~ REF XNSQueryListBody;
XNSQueryListBody: TYPE ~ MACHINE DEPENDENT RECORD [
body: PACKED SEQUENCE length: CARDINAL OF QueryItem];

GetVersionType: TYPE ~ PROC [h: CrRPC.Handle, target: Target] RETURNS [version: CARD32 ¬ 0];
GetVersion: GetVersionType;

ARVersion: TYPE ~ CARD32;

TaggedItem: TYPE ~ RECORD [
tag: ROPE ¬ NIL,
item: CARD16 ¬ 0];

PutSubmitNumberType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, submitNumber: CARD32];
PutSubmitNumber: PutSubmitNumberType;

TimeField: TYPE ~ RECORD [
name: ROPE,
tools: ToolData,
time: EmptyRecord];

ARField: TYPE ~ RECORD [
name: ROPE,
tools: ToolData,
ar: EmptyRecord];

Numeric: TYPE ~ CARD32;

BoundedField: TYPE ~ RECORD [
name: ROPE,
tools: ToolData,
bounded: CARD16];

ToolData: TYPE ~ ARRAY ToolType OF DefaultInfoHandle ¬ ALL[NIL];


FieldItemValue: TYPE ~ REF FieldItemValueRec;
FieldItemValueRec: TYPE ~ RECORD [
body: SELECT type: FieldType FROM
arId => [ar: CARDINAL],
dateTime => [time: BasicTime.GMT],
numeric => [number: CARDINAL],
fixedLengthString => [string: ROPE, maxLength: CARDINAL ¬ 0],
enumerated => [enumVal: CARDINAL],
ENDCASE];

FieldItemObject: TYPE ~ REF FieldItemObjectRec;
FieldItemObjectRec: TYPE ~ RECORD [
name: Rope.ROPE ¬ NIL,
tmp: Rope.ROPE ¬ NIL,
defaultInfo: ToolData,
body: SELECT type: FieldType FROM
arId => NULL,
dateTime => NULL,
numeric => NULL,
fixedLengthString => [maxLength: CARDINAL ¬ 0],
enumerated => [
field: DependsOnIndex ¬ LAST[CARD16],
possibilities: KeyedPossibilities ¬ NIL],
string => NULL,
ENDCASE
];

StartOrStop: TYPE ~ MACHINE DEPENDENT { start(0), stop(1)};

TooManyConnectionsType: TYPE ~ ERROR [];
TooManyConnections: TooManyConnectionsType;

AcceleratorInfo: TYPE = REF AcceleratorInfoRec ¬ NIL;
AcceleratorInfoRec: TYPE = RECORD [
body: SEQUENCE len: CARDINAL OF FieldData];
FieldData: TYPE = REF FieldDataRec ¬ NIL;
FieldDataRec: TYPE = RECORD [
body: SEQUENCE len: CARDINAL OF Rope.ROPE];

GetAcceleratorInfoType: TYPE ~ PROC [h: CrRPC.Handle, instance: StaticTarget, arSet: SetOfARs, fieldList: FieldList, to: CrRPC.BulkDataSink];
GetAcceleratorInfo: GetAcceleratorInfoType;

SystemAlreadyExistsType: TYPE ~ ERROR [];
SystemAlreadyExists: SystemAlreadyExistsType;

FieldItemQueryValue: TYPE ~ RECORD [
relationalOp: Relation,
value: FieldItemValue];

ChangeItemValue: TYPE ~ REF ChangeItemValueObject;
ChangeItemValueObject: TYPE ~ RECORD [
SELECT type: ChangeType FROM
add, modify => [newFlItem: FieldItemObject],
remove => NULL,
ENDCASE
];

ChangeType: TYPE ~ MACHINE DEPENDENT { modify(0), add(1), remove(2)};

BoundedString: TYPE ~ RECORD [
string: ROPE,
max: CARD16];

Problem: TYPE ~ MACHINE DEPENDENT { communicationError(0), unknownSystem(1), cantDetermineLocOfARs(2), illegalLogin(3), systemAlreadyExists(4), fileNotFound(5), serverUnreachable(6), serverDown(7), noAdobeServiceAtServer(8), courierTimedOut(9), parameterInconsistency(10), obsoleteVersion(11), systemNotRegistered(12), sysDescChanging(13), others(14), tooManyConnections(15), spare1(16), spare2(17), xxx(31)};

IllegalLoginType: TYPE ~ ERROR [];
IllegalLogin: IllegalLoginType;

EnumeratedField: TYPE ~ RECORD [
name: ROPE,
tools: ToolData,
field: CARD16,
possibilities: KeyedPossibilities];

DefaultInfoHandle: TYPE ~ REF DefaultInfoObject ¬ NIL;
DefaultInfoObject: TYPE ~ RECORD [
default: ROPE ¬ NIL,
tmp: ROPE ¬ NIL,
systemMust: BOOLEAN ¬ FALSE,
place: Coordinate,
width: CARD16 ¬ 0];

UpdateAcceleratorsType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, arSet: SetOfARs];
UpdateAccelerators: UpdateAcceleratorsType;

NumericField: TYPE ~ RECORD [
name: ROPE,
tools: ToolData,
numeric: EmptyRecord];

XxxType: TYPE ~ ERROR [];
Xxx: XxxType;

PutSystemDefaultUserFileType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, from: CrRPC.BulkDataSource];
PutSystemDefaultUserFile: PutSystemDefaultUserFileType;

ToolType: TYPE ~ MACHINE DEPENDENT { edit(0), submit(1), report(2), query(3), sort(4), queryList(5)};

AboutToStoreType: TYPE ~ PROC [h: CrRPC.Handle, instance: StaticTarget, arNumber: CARD32];
AboutToStore: AboutToStoreType;

Coordinate: TYPE ~ RECORD [
ord: INT16 ¬ 0,
co: INT16 ¬ 0];

DependsOnIndex: TYPE ~ CARD16;

Relation: TYPE ~ MACHINE DEPENDENT { equal(0), notEqual(1), lessThan(2), lessThanOrEqual(3), greaterThan(4), greaterThanOrEqual(5), in(6), notIn(7)};

ErrorType: TYPE ~ ERROR [why: Problem];
Error: ErrorType;

Description: TYPE ~ RECORD [
name: ROPE,
host: ROPE,
directory: ROPE,
refCount: CARD16,
version: CARD32,
fieldList: FieldList];

SubmitFailedType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, arNumber: CARD32, version: CARD32];
SubmitFailed: SubmitFailedType;

FieldList: TYPE ~ REF FieldListArray;
FieldListArray: TYPE ~ MACHINE DEPENDENT RECORD [
flSeq: PACKED SEQUENCE length: CARDINAL OF FieldItemObject
];

ChangeList: TYPE ~ REF Changes;
Changes: TYPE ~ MACHINE DEPENDENT RECORD [
seq: PACKED SEQUENCE length: CARDINAL OF ChangeItem
];

ServerDownType: TYPE ~ ERROR [];
ServerDown: ServerDownType;

PutSystemDescriptionType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, description: Description];
PutSystemDescription: PutSystemDescriptionType;

ServerUnreachableType: TYPE ~ ERROR [];
ServerUnreachable: ServerUnreachableType;

ParameterInconsistencyType: TYPE ~ ERROR [];
ParameterInconsistency: ParameterInconsistencyType;

EmptyRecord: TYPE ~ RECORD [null: CARDINAL ¬ 0];

SystemNotRegisteredType: TYPE ~ ERROR [];
SystemNotRegistered: SystemNotRegisteredType;

ReadLastARNumberType: TYPE ~ PROC [h: CrRPC.Handle, target: Target] RETURNS [lastAR: CARD32 ¬ 0];
ReadLastARNumber: ReadLastARNumberType;

StaticTarget: TYPE ~ RECORD [
target: Target,
version: CARD32];

nullTime: CARD32 ~ 2114294400;

GetResidentSystemsType: TYPE ~ PROC [h: CrRPC.Handle] RETURNS [systems: DatabaseSequence ¬ NIL];
GetResidentSystems: GetResidentSystemsType;

ARNumber: TYPE ~ CARD32;

GetSystemDefaultUserFileType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, to: CrRPC.BulkDataSink];
GetSystemDefaultUserFile: GetSystemDefaultUserFileType;

GetStartOrStopTimeType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, which: StartOrStop] RETURNS [startOrStopTime: CARD32 ¬ 0];
GetStartOrStopTime: GetStartOrStopTimeType;

CompletedUpdateType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, arNumber: CARD32];
CompletedUpdate: CompletedUpdateType;

GetNextSubmitNumberType: TYPE ~ PROC [h: CrRPC.Handle, target: Target] RETURNS [submitNumber: CARD32 ¬ 0];
GetNextSubmitNumber: GetNextSubmitNumberType;

FileNotFoundType: TYPE ~ ERROR [];
FileNotFound: FileNotFoundType;

NoAdobeServiceAtServerType: TYPE ~ ERROR [];
NoAdobeServiceAtServer: NoAdobeServiceAtServerType;

StringField: TYPE ~ RECORD [
name: ROPE,
tools: ToolData,
string: EmptyRecord];

KeyedPossibilities: TYPE ~ REF KeyedPossibilitiesSeq;
KeyedPossibilitiesSeq: TYPE ~ MACHINE DEPENDENT RECORD [
seq: PACKED SEQUENCE length: CARDINAL OF Possibilities
];

RunOfARs: TYPE ~ RECORD [
startValue: CARD32,
runLength: CARD32];

ChangeLocationOfARsType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, newLocation: LocationTarget];
ChangeLocationOfARs: ChangeLocationOfARsType;

LocationTarget: TYPE ~ RECORD [
host: ROPE,
directory: ROPE];

GetLocationOfARsType: TYPE ~ PROC [h: CrRPC.Handle, target: Target] RETURNS [referenceToARs: NSName ¬ NIL];
GetLocationOfARs: GetLocationOfARsType;

CommunicationErrorType: TYPE ~ ERROR [];
CommunicationError: CommunicationErrorType;

EnumeratedSequence: TYPE ~ REF EnumeratedSequenceType;
EnumeratedSequenceType: TYPE ~ MACHINE DEPENDENT RECORD [
seq: PACKED SEQUENCE length: CARDINAL OF TaggedItem
];

QueryItem: TYPE ~ RECORD [
name: ROPE,
value: FieldItemQueryValue];

Spare2Type: TYPE ~ ERROR [];
Spare2: Spare2Type;

MakeAcceleratorFileForFieldType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, fieldName: ROPE, fieldList: FieldList];
MakeAcceleratorFileForField: MakeAcceleratorFileForFieldType;

ChangeItem: TYPE ~ RECORD [
oldFieldName: ROPE,
newItem: ChangeItemValue];

Spare1Type: TYPE ~ ERROR [];
Spare1: Spare1Type;

ServerName: TYPE ~ CHNameP2V0.ThreePartName;

GetSystemDescriptionType: TYPE ~ PROC [h: CrRPC.Handle, target: Target] RETURNS [description: Description];
GetSystemDescription: GetSystemDescriptionType;

Possibilities: TYPE ~ RECORD [
keyedDependency: CARD16 ¬ 0,
enumRecs: EnumeratedSequence];

Target: TYPE ~ RECORD [
system: ROPE];

SysDescChangingType: TYPE ~ ERROR [];
SysDescChanging: SysDescChangingType;

Database: TYPE ~ ROPE;

SubmitNumber: TYPE ~ CARD32;

LookupARsType: TYPE ~ PROC [h: CrRPC.Handle, instance: StaticTarget, query: QueryItem, boundSet: SetOfARs] RETURNS [arSet: SetOfARs ¬ NIL];
LookupARs: LookupARsType;

UnknownSystemType: TYPE ~ ERROR [];
UnknownSystem: UnknownSystemType;

ObsoleteVersionType: TYPE ~ ERROR [];
ObsoleteVersion: ObsoleteVersionType;

FieldType: TYPE ~ MACHINE DEPENDENT { arId(0), dateTime(1), numeric(2), fixedLengthString(3), enumerated(4), string(5)};

UpdateAcceleratorFieldType: TYPE ~ PROC [h: CrRPC.Handle, instance: StaticTarget, arNumber: CARD32, field: FieldItemValue, fieldName: ROPE];
UpdateAcceleratorField: UpdateAcceleratorFieldType;

CantDetermineLocOfARsType: TYPE ~ ERROR [];
CantDetermineLocOfARs: CantDetermineLocOfARsType;

OthersType: TYPE ~ ERROR [];
Others: OthersType;

NSName: TYPE ~ REF NSNameObject;
NSNameObject: TYPE ~ MACHINE DEPENDENT RECORD [
local, domain, org: Rope.ROPE ¬ NIL
];

Reference: TYPE ~ REF ReferenceObject;
ReferenceObject: TYPE ~ MACHINE DEPENDENT RECORD [
body: PACKED SEQUENCE length: CARDINAL OF CARD16
];

PutStartOrStopTimeType: TYPE ~ PROC [h: CrRPC.Handle, target: Target, which: StartOrStop, startOrStopTime: CARD32];
PutStartOrStopTime: PutStartOrStopTimeType;

}...


X
AdobeP75V2.Mesa
Copyright Σ 1989, 1992 by Xerox Corporation.  All rights reserved.
Generated by BJackson.pa at March 27, 1990 2:04:03 pm PST
using Sirocco [2.0] of February 10, 1989 6:26:26 pm PST
Philip James, March 20, 1991 9:05 am PST
Christian Jacobi, April 7, 1992 4:49 pm PDT
body: PACKED SEQUENCE length: CARDINAL OF QueryItem
];
Κ–
(cedarcode) style•NewlineDelimiter

™š
œ™Jšœ	Οeœ6™BJš
œ9™9Jš
œ7™7J™(J™+Icode˜—š
Οk	˜	K˜K˜
K˜K˜
K˜
K˜—K˜šΟn
œžœ
žœ˜!K˜Kšžœžœžœ
˜K˜K˜Kšœžœžœ˜4š	œžœžœ
ž	œ
žœ˜9Kš
œžœ
žœ	žœ
žœ
ž˜.K˜——˜Kšœžœžœ˜%KšŸœ˜%—˜Kšœžœžœ@˜`KšŸœ˜%—˜Kšœ
žœžœ˜$š	œžœžœ
ž	œ
žœ˜1Kš	œžœ
žœžœ
žœ	˜/K˜——˜Kš	œžœžœ+žœžœ˜_KšŸ
œ˜!—˜Kšœžœžœ˜$š	œžœžœ
ž	œ
žœ˜0Kšœžœ˜!Jš	œžœ
žœ	žœ
žœ
™3J™—K˜Kšœžœžœ˜*š	œžœžœ
ž	œ
žœ˜3Kš	œžœ
žœ	žœ
žœ˜5—K˜Kš	œžœžœ#žœžœ˜\KšŸ
œ˜—˜Kšœžœžœ
˜—˜šœžœžœ˜Kšœžœžœ
˜Kšœžœ˜——˜Kšœžœžœ1žœ˜YKšŸœ˜%—˜šœžœžœ˜Kšœžœ
˜K˜K˜——˜šœ	žœžœ˜Kšœžœ
˜K˜K˜——˜Kšœ	žœžœ
˜—˜šœžœžœ˜Kšœžœ
˜K˜Kšœ	žœ˜——˜Kšœ
žœžœ
žœžœ
žœ˜@—˜K˜Kšœžœžœ˜-šœžœžœ˜"šœžœž˜!Kšœ
žœ˜Kšœžœ˜"Kšœžœ˜Kšœžœ
žœ˜=Kšœžœ˜"Kšžœ˜	——K˜Kšœžœžœ˜/šœžœžœ˜#Kšœžœžœ
˜Kšœ
žœž˜Kš
œ˜šœžœž˜!Kšœžœ
˜
Kšœžœ
˜Kšœžœ
˜Kšœ!žœ˜/˜Kšœžœ
žœ˜%Kšœ$žœ˜)—Kšœ
žœ
˜Kš
ž˜—K˜——˜Kšœ
žœžœ
ž	œ˜;—˜Kšœžœžœ˜(KšŸœ˜+—˜Kšœžœžœžœ
˜5šœžœžœ˜#Kšœžœžœ
žœ˜+—Kšœžœžœž˜)šœžœžœ˜Kš	œžœžœ
žœžœ˜+—K˜Kšœžœžœj˜
KšŸœ˜+—˜Kšœžœžœ˜)KšŸœ˜-—˜šœžœžœ˜$K˜K˜——˜Kšœžœžœ˜2šœžœžœ˜&šžœž˜K˜,Kšœ
žœ
˜Kš
ž˜—K˜——˜Kšœžœžœ
ž	œ!˜E—˜šœžœžœ˜Kšœžœ
˜
Kšœžœ˜
——˜Kšœ	žœžœ
ž	œψ˜™—˜Kšœžœžœ˜"KšŸœ˜—˜šœžœžœ˜ Kšœžœ
˜K˜Kšœžœ
˜K˜#——˜Kšœžœžœžœ
˜6šœžœžœ˜"Kšœ	žœžœ
˜Kšœžœž˜Kšœžœžœ
˜K˜Kšœžœ˜——˜Kšœžœžœ4˜WKšŸœ˜+—˜šœžœžœ˜Kšœžœ
˜K˜K˜——˜Kšœ	žœžœ˜KšŸœ
˜
—˜Kšœžœžœ?˜hKšŸœ˜7—˜Kšœ
žœžœ
ž	œC˜e—˜Kšœžœžœ5žœ˜ZKšŸœ˜—˜šœžœžœ˜Kšœžœ˜Kšœžœ˜——˜Kšœžœžœ
˜—˜Kšœ
žœžœ
ž	œs˜•
—˜Kšœžœžœ˜'KšŸœ˜—˜šœ
žœžœ˜Kšœžœ
˜Kšœžœ
˜Kšœžœ
˜Kšœ
žœ
˜Kšœ	žœ
˜K˜——˜Kš	œžœžœ-žœžœ˜cKšŸœ˜—˜Kšœžœžœ˜%š	œžœžœ
ž	œ
žœ˜1Kš	œžœ
žœ	žœ
žœ˜:K˜——˜Kšœžœžœ	˜š	œ	žœžœ
ž	œ
žœ˜*Kš	œžœ
žœ	žœ
žœ˜3K˜——˜Kšœžœžœ˜ KšŸ
œ˜—˜Kšœžœžœ=˜bKšŸœ˜/—˜Kšœžœžœ˜'KšŸœ˜)—˜Kšœžœžœ˜,KšŸœ˜3—˜Kšœ
žœžœžœ˜0—˜Kšœžœžœ˜)KšŸœ˜-—˜Kš	œžœžœ#žœ
žœ˜aKšŸœ˜'—˜šœžœžœ˜K˜Kšœ	žœ˜——˜Kšœ
žœ˜—˜Kš	œžœžœžœžœ˜`KšŸœ˜+—˜Kšœ
žœžœ
˜—˜Kšœžœžœ;˜dKšŸœ˜7—˜Kš	œžœžœ7žœžœ˜€
KšŸœ˜+—˜Kšœžœžœ-žœ˜UKšŸœ˜%—˜Kš	œžœžœ#žœžœ˜jKšŸœ˜-—˜Kšœžœžœ˜"KšŸœ˜—˜Kšœžœžœ˜,KšŸœ˜3—˜šœ
žœžœ˜Kšœžœ
˜K˜K˜——˜Kšœžœžœ˜5š	œžœžœ
ž	œ
žœ˜8Kš	œžœ
žœ	žœ
žœ˜6K˜——˜šœ
žœžœ˜Kšœžœ
˜Kšœžœ˜——˜Kšœžœžœ@˜dKšŸœ˜-—˜šœžœžœ˜Kšœžœ
˜Kšœžœ˜——˜Kš	œžœžœ#žœžœ˜kKšŸœ˜'—˜Kšœžœžœ˜(KšŸœ˜+—˜Kšœžœžœ˜6š	œžœžœ
ž	œ
žœ˜9Kš	œžœ
žœ	žœ
žœ˜3K˜——˜šœžœžœ˜Kšœžœ
˜Kš
œ˜——˜Kšœžœžœ˜KšŸœ
˜—˜Kšœ!žœžœ.žœ˜vKšŸœ"˜=—˜šœžœžœ˜Kšœžœ
˜K˜——˜Kšœžœžœ˜KšŸœ
˜—˜Kšœžœ˜,—˜Kšœžœžœ#žœ˜kKšŸœ˜/—˜šœžœžœ˜Kšœžœ˜K˜——˜šœžœžœ˜Kšœžœ˜——˜Kšœžœžœ˜%KšŸœ˜%—˜Kšœ
žœžœ
˜—˜Kšœžœžœ
˜—˜Kš	œžœžœQžœžœ˜‹
KšŸ	œ˜—˜Kšœžœžœ˜#KšŸ
œ˜!—˜Kšœžœžœ˜%KšŸœ˜%—˜Kšœžœžœ
ž	œU˜x—˜Kš	œžœžœ5žœ$žœ˜Œ
KšŸœ˜3—˜Kšœžœžœ˜+KšŸœ˜1—˜Kšœžœžœ˜KšŸœ
˜—˜Kšœžœžœ˜ š	œžœžœ
ž	œ
žœ˜/Kšœžœž˜#Kš
œ˜K˜—Kšœžœžœ˜&š	œžœžœ
ž	œ
žœ˜2Kš
œžœ
žœ	žœ
žœ
ž˜0K˜——˜KšœžœžœHžœ˜sKšŸœ˜+—K˜K˜K˜—…—)09