SDAM ;MJK/ALB - Appt Mgt ; 8/30/99 9:09am
Source file <SDAM.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; -- main entry point
|
|
| INIT | ; -- set up appt man vars
|
|
| INITQ | ||
| HDR | ; -- screen head
|
|
| FNL | ; -- what to do after action
|
|
| BLD | ; -- entry point to bld list
; input: SDAMLIST := list to build |
|
| BLDQ | ||
| LIST | ; -- find and build
; input: X := status group ; output: SDAMLIST := array of status' |
|
| LISTQ | ||
| GROUP(GROUP,SDAMLIST) | ; -- find list
|
|
| GROUPQ | ||
| FUT | ; -- change date range
|
|
| FUTQ | ||
| EXIT | ; -- exit action for protocol
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|