Login
`
Templates, Tools and Utilities
|
||
Icetips Article
Back to article list
Search Articles
Add Comment
Printer friendly
Direct link
Par2: EIP Flowchart 2000-04-11 -- Harley Jones Run
Init
IF NOT DELETE
InitControls
FOR EACH COLUMN
Init
CreateControl
SetAlerts
END Init
END FOR EACH COLUMN
END InitControls
ResetColumn
GetEdit
END ResetColumn
END IF
END Init
IF NOT DELETE
Ask
IF INSERT
Open
END IF
TakeSelected
TakeFieldEvent
FOR ACTIVE COLUMN
TakeEvent
END FOR ACTIVE COLUMN
TakeAction
END TakeFieldEvent
LOOP
TakeFieldEvent
FOR ACTIVE COLUMN
TakeEvent
END FOR ACTIVE COLUMN
TakeAction
END TakeFieldEvent
TakeFieldEvent
FOR ACTIVE COLUMN
TakeEvent
END FOR ACTIVE COLUMN
TakeAction
ClearColumn
GetEdit
IF THERE IS ANOTHER FIELD
ResetColumn
GetEdit
END ResetColumn
ELSE
TakeCompleted(BYTE)
ClearColumn
END TakeCompleted(BYTE)
BREAK LOOP
END IF
END TakeAction
END TakeFieldEvent
IF INSERT
TakeAccepted
TakeFieldEvent
FOR ACTIVE COLUMN
TakeEvent
END FOR ACTIVE COLUMN
TakeAction
END TakeFieldEvent
END IF
TakeSelected
TakeFieldEvent
FOR NEW COLUMN
TakeEvent
END FOR NEW COLUMN
TakeAction
END TakeFieldEvent
PROGRAM WAITING LOOP HERE
END LOOP
END Ask
END IF
Kill
FOR EACH COLUMN
Kill
END FOR EACH COLUMN
END Kill
END Run
Today is November 21, 2024, 7:58 am This article has been viewed 35212 times.
|
|