TIUFLP1 ;SLC/AJB - TIU FORM LETTER PRINT; 06 MAR 07
Source file <TIUFLP1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ; main entry point
|
||
| CONTINUE() | ; controls paging
|
|
| CONTX | ||
| CONTY | ||
| IDKID(TIUDA,KIDDA) | ; print ID children note
|
|
| IDPAGES | ; calculates # of pages for ID child note
|
|
| HFCPNT(NODE) | ; heading,footer,closing print (page numbers optional)
|
|
| PAGES | ; calculates total # of pages
|
|
| IDK | ||
| REPORT | ; print parent note
|
|
| FFTR | ||
| ADDENDA | ; print addenda
|
|
| GUIVIEW(TIUDA,SEG,TIUL,TIUARR) | ;
|
|
| SETUP(TIUTYP,TIUDA) | ;
|
|
| SPACER(TEXT,LENGTH,REV) | ;
|
|
| STOP() | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|