IBDFU3 ;ALB/CJM - ENCOUNTER FORM - BUILD FORM(deleting blocks) ;01/08/93
Source file <IBDFU3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DLTBLK(BLOCK,FORM,FILE) | ;deletes BLOCK (in FILE) if not part of the toolkit (unless IBTKBLK=1) and, if FORM is passed in, the block actually is on FORM
|
|
| JUSTDOIT | ;
|
|
| DLTCNTNT(BLOCK,FILE) | ;delete everything in BLOCK, but not the block itself
|
|
| DLTLIST(FILE,BLOCK,LIST) | ;delete the LIST, its selections and groups
|
|
| DLISTCNT(LIST,FILE) | ;delete the list's selections and groups
|
|
| DLTFLD(FILE,BLOCK,FLD) | ;delete a display field
|
|
| DLTIFLD(FILE,BLOCK,FLD) | ;delete a multiple choice field
|
|
| DLTHFLD(FILE,BLOCK,FLD) | ;delete a hand print field
|
|
| DLTTEXT(FILE,BLOCK,TEXT) | ;delete the TEXT AREA
|
|
| DLTLINE(FILE,BLOCK,LINE) | ;delete the line
|
|
| FASTEXIT | ;just sets a flag signaling system should be exited
|
