DG5382PT ; ALBANY/GTS - DG*5.3*82 POST INIT; 1/30/96-11:45AM
Source file <DG5382PT.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| MAIN | ;
|
|
| SETWARD | ;** Change the mumps code for the WARD LOCATION lookup
|
|
| SETCARD | ;** Change the layout of the WRISTAND in the EMBOSSED CARD TYPE file
|
|
| SUBENT | ;** Create the data items on one line of the wristband
|
|
| SETTERM | ;** Edit entry in TERMINAL TYPE file (#3.2)
|
|
| WBDEF | ;;**Define wristband layout
|
| FileNo | Call Tags |
|---|---|
| ^%ZIS(2 - [#3.2] | Classic Fileman Calls |
| ^DIC(39.1 - [#39.1] | Classic Fileman Calls |
| ^DIC(39.2 - [#39.2] | Classic Fileman Calls |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BAROFF | SETTERM+1~, SETTERM+13* |
| BARON | SETTERM+1~, SETTERM+12* |
| CODE | SETWARD+1~, SETWARD+2* |
| CODE1 | SETTERM+1~, SETTERM+7* |
| CODE2 | SETTERM+1~, SETTERM+8* |
| CODE3 | SETTERM+1~, SETTERM+9* |
| CODE4 | SETTERM+1~, SETTERM+10* |
| DA | SETWARD+8*, SETWARD+11!, SETCARD+27!, SETCARD+30!, SUBENT+16!, SETTERM+14*, SETTERM+17! |
| DA(1 | SETCARD+20*, SUBENT+10* |
| DA(2 | SUBENT+10* |
| DD | SETCARD+24!, SUBENT+14! |
| DGCOL | SETCARD+12~, SUBENT+8* |
| DGDATA | SETCARD+12~, SUBENT+1*, SUBENT+5, SUBENT+8, SUBENT+9 |
| DGECDA | SETCARD+12~, SETCARD+15*, SETCARD+17, SETCARD+20, SUBENT+10 |
| DGECLNDA | SETCARD+12~, SETCARD+18*, SETCARD+19*, SETCARD+23 |
| DGITEM | SETCARD+12~, SUBENT+5*, SUBENT+6 |
| DGLNDA | SETCARD+12~, SETCARD+26*, SUBENT+3, SUBENT+10 |
| DGLNG | SETCARD+12~, SUBENT+9* |
| DGLNX | SETCARD+12~, SETCARD+19*, SUBENT+1 |
| >> DGPCE | SETCARD+28*, SUBENT+1, SUBENT+2* |
| DGTTDA | SETTERM+1~, SETTERM+4*, SETTERM+6, SETTERM+14 |
| DGWLDA | SETWARD+1~, SETWARD+5*, SETWARD+7, SETWARD+8 |
| DIC | SETWARD+3*, SETWARD+6!, SETCARD+13*, SETCARD+16!, SETCARD+20*, SETCARD+27!, SETCARD+30!, SUBENT+10*, SUBENT+16!, SETTERM+2* , SETTERM+5! |
| DIC("DR" | SUBENT+13* |
| DIC("P" | SETCARD+22*, SUBENT+12* |
| DIC(0 | SETWARD+3*, SETCARD+13*, SETCARD+21*, SUBENT+11*, SETTERM+2* |
| DIE | SETWARD+8*, SETWARD+11!, SETTERM+14*, SETTERM+17! |
| DO | SETCARD+24!, SUBENT+14! |
| DR | SETWARD+9*, SETWARD+11!, SETTERM+15*, SETTERM+17! |
| OPENE | SETTERM+1~, SETTERM+11* |
| X | SETWARD+3*, SETWARD+6!, SETCARD+13*, SETCARD+16!, SETCARD+23*, SETCARD+27!, SETCARD+30!, SUBENT+4*, SUBENT+6*, SUBENT+7 , SUBENT+16!, SETTERM+2*, SETTERM+5! |
| >> XPDQUES("POS1 | QUESTION" , MAIN+3 |
| Y | SETWARD+5, SETWARD+6!, SETCARD+15, SETCARD+16!, SETCARD+26, SETCARD+27!, SETCARD+30!, SUBENT+16!, SETTERM+4, SETTERM+5! |
| Name | Field # of Occurrence |
|---|---|
| $T(WBDEF+DGECLNDA | SETCARD+19 |
