TIUDD0 ; SLC/JER,AJB - Cross-references on 8925
Source file <TIUDD0.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SACLPT(FLD,X) | ; SET Logic for ACLPT
|
|
| SACLAU(FLD,X) | ; SET Logic for ACLAU
; "ACLAU" X-REF ON .01 CLASS, 1202 AUTHOR, .02 PT, & 1301 INV RDT: |
|
| SACLAU1(FLD,X) | ; SET LOGIC FOR ACLAU - TRANSCRIPTIONIST (ENTERED BY)
; "ACLAU" X-REF ON .01 CLASS, 1302 ENTERED BY, .02 PT, & 1301 INV RDT: |
|
| SACLEC(FLD,X) | ; SET Logic For ACLEC
; "ACLEC" On .01 CLASS, 1208 EC, .02 PT, 1301 INV RDT: |
|
| SACLSB(FLD,X) | ; SET Logic for ACLSB
|
|
| SAPTLD(FLD,X) | ; SET Logic for "APTLD"
; APTLD on fields .02 PT, .01 TITLE, "1211;.07;.13" VSTR, .03 VISIT |
|
| SAADT(X) | ; SET LOGIC FOR AADT
; "AADT" X-REF ON 1202 AUTHOR (or 1302 ENTERED BY if AUTHOR not exist), ; and 1301 REFERENCE DATE: |
|
| INVDATE(DATE) | ; Inverts date
|
