| T.R | Title | User | Personal
Name | Date | Lines |
|---|
| 2671.1 | | CTHQ::REYNOLDS | | Fri May 07 1993 00:08 | 140 |
|
DELETE PROFILE;
REDEFINE DOMAIN PROFILE USING PROFIL_REC ON OA$DATA_SHARE:PROFILE.DAT;
DELETE PROFIL_REC;
REDEFINE RECORD PROFIL_REC
01 PROFIL_REC_START.
03 USER PIC X(30).
03 TEMPLATE PIC X(20).
03 DIRECT PIC X(68).
03 FRMLIB PIC X(68).
03 NOT$IN$USE PIC X(1).
03 CREATE$FAIL PIC X(1).
03 VMSUSR PIC X(12).
03 DELETE_FROM PIC X(70).
03 RESERVED PIC X(15).
03 RSVD_FOR_TCS PIC X(1).
03 SURNAME1 PIC X(40).
03 FORENAME1 PIC X(16).
03 INITIALS1 PIC X(5).
03 FULNAM PIC X(64).
03 COMPANY PIC X(64).
03 DEPART PIC X(32).
03 LOCATION PIC X(20).
03 INT_LOCATION PIC X(20).
03 GENERATION PIC X(3).
03 TITLE PIC X(40).
03 PHONE PIC X(32).
03 INTERNAL_PHONE PIC X(32).
03 ADDR1 PIC X(40).
03 ADDR2 PIC X(40).
03 ADDR3 PIC X(40).
03 ADDR4 PIC X(40).
03 ADDR5 PIC X(40).
03 ADDR6 PIC X(40).
03 COUNTRY_NAME PIC X(40).
03 ZIPCOD PIC X(40).
03 FORENAME2 PIC X(16).
03 FORENAME3 PIC X(16).
03 FORENAME4 PIC X(16).
03 FORENAME5 PIC X(16).
03 SURNAME2 PIC X(40).
03 SURNAME3 PIC X(40).
03 INITIALS2 PIC X(5).
03 INITIALS3 PIC X(5).
03 INITIALS4 PIC X(5).
03 INITIALS5 PIC X(5).
03 STATUS PIC X(68).
03 MAIL_REPLY PIC X(31).
03 MAIL_FORWARD PIC X(78).
03 NOTIFY PIC X(1).
03 QPNOT PIC X(1).
03 QBNOT PIC X(1).
03 TICKLER PIC X(1).
03 ACTITEM PIC X(1).
03 MAIL_FORWARD2 PIC X(78).
03 MAIL_FORWARD3 PIC X(78).
03 MAIL_FORWARD4 PIC X(78).
03 MAIDES PIC X(10).
03 MAIL_MENU PIC X(10).
03 MAIL_READ_RECEIPT PIC X(1).
03 START PIC X(30).
03 TM$MENU PIC X(10).
03 PASWRD PIC X(31).
03 EDITOR PIC X(10).
03 ENFORCED_ARCHIVE PIC X(1).
03 MAIL$AREA PIC X(8).
03 AD$MIN PIC X(1).
03 DATE$FORMAT PIC X(1).
03 PRINT PIC X(15).
03 PRINTER_PORT PIC X(1).
03 PRVDCL PIC X(1).
03 PRVCMD PIC X(1).
03 PRVUDPDCL PIC X(1).
03 PRVUDPFNC PIC X(1).
03 PRVXOWN PIC X(1).
03 PRVVIEW PIC X(1).
03 PRVSUB PIC X(1).
03 PRVSUP PIC X(1).
03 PRVERR PIC X(1).
03 PRVSRC PIC X(1).
03 CORP_PHONE PIC X(1).
03 PRVLOG PIC X(1).
03 PRVAPP PIC X(1).
03 MDFLAG PIC X(1).
03 MULTI_NODE PIC X(1).
03 SET_MODE PIC X(1).
03 KEY$BOARD PIC X(25).
03 NODE PIC X(13).
03 STARTD PIC X(1).
03 STARTH PIC X(7).
03 MEALS PIC X(7).
03 NODAYS PIC X(1).
03 ENDH PIC X(7).
03 MEALE PIC X(7).
03 TIMEFMT PIC X(1).
03 CALTIMEINC PIC X(5).
03 SETUSR PIC X(1).
03 OPER PIC X(45).
03 CALDAY PIC X(1).
03 DDSID PIC X(32).
03 EXTRA1 PIC X(43).
03 CLASS PIC X(10).
03 UFLAG1 PIC X(1).
03 UFLAG2 PIC X(1).
03 UFLAG3 PIC X(1).
03 UFLAG4 PIC X(1).
03 UFLAG5 PIC X(1).
03 UFLAG6 PIC X(1).
03 UFLAG7 PIC X(1).
03 UFLAG8 PIC X(1).
03 UFLAG9 PIC X(1).
03 UFLAG10 PIC X(1).
03 LANGUAGE PIC X(20).
03 EXTRA2 PIC X(50).
03 QUOTA PIC X(10).
03 OVERDRAFT PIC X(10).
03 DOCCOUNT PIC X(10).
03 LOGINCHK PIC X(1).
03 UTILITY PIC X(1).
03 STATUS$LINE PIC X(1).
03 READ$WIDE PIC X(1).
03 CONFIRM$SEL PIC X(1).
03 DELETE$UNREAD PIC X(1).
03 NEW$FOLDER$PROMPT PIC X(1).
03 COVER$NOTE PIC X(1).
03 DELETE$PROMPT PIC X(1).
03 DELETE_JOB PIC X(1).
03 CDA_STORAGE PIC X(1).
03 CDA_HANDLING PIC X(1).
03 CLASSIFICATION PIC X(3).
03 CATEGORIES PIC X(16).
03 CREATE_GRP PIC X(1).
03 RCV$SUB PIC X(1).
03 ORGUNIT1 PIC X(32).
03 ORGUNIT2 PIC X(32).
03 ORGUNIT3 PIC X(32).
03 ORGUNIT4 PIC X(32).
03 TIME_STAMP PIC X(16).
;
|
| 2671.2 | What version of ALL-IN-1 is profil format for? | SOADC1::STREMICK | I want an NCC-1701D!! | Tue Apr 19 1994 20:43 | 0 |
| 2671.3 | Live from the midget cube building | AIMTEC::WICKS_A | Atlanta's Most (In)famous Welshman | Tue Apr 19 1994 21:51 | 7 |
| Jim,
Looks like V3.0. If the numbers add up to 2192 it is.
regards,
Andrew.D.Wicks
|