Login
Templates, Tools and Utilities
for Clarion Developers
Templates, Tools and Utilities
|
||
|
|
|
Add a comment to an Icetips ArticlePlease add your comments to this article.
Please note that you must provide both a name and a valid email address in order
for us to publish your comment. Comments are moderated and are not visible until they have been approved. Spam is never approved!
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 23, 2024, 2:22 am This article has been viewed 35216 times.
|
|