ANDY OSWALD, NHMCCD

1

• ANDY OSWALD, NHMCCD
• ROSENDO GARCIA, UTB-TSC
• ALAN LYTLE, TEMPLE COLLEGE
• CHUCK EVERETT, ODESSA COLLEGE
• JIM MATHEWS, NHMCCD
• DOUG MENEKE, ALVIN COLLEGE
• This session is so secret that this document
  available on
• http//faculty.nhmccd.edu/aoswald/datatel

2
ANDY OSWALDandy_at_nhmccd.edu
3
NHMCCD Environment

• IBM 9117-570
• AIX 4.3.3
• UniData 6.1.11
• Colleague R17
• DMI 3.8
• Webadvisor 3.x

4
Andys Secret WA MTXT Workaround. The
problem

• WebAdvisor Miscellaneous Text is decided on and
  controlled by the NHMCCD Web Team.
• Since going to WA 3.x, they mod in DEV, IT moves
  to TEST for approval then IT moves to LIVE.
• If they want several changes in a week or has
  happened, in a day (ack!) then IT is spending way
  too much time on this.
• Limited space for information, would like to
  provide additional information immediately.

5
Andys Secret WA MTXT Workaround. The solution

• Instead of changing the misc texts on the screen,
  instead create an image with a static hyperlink
  in the misc text.
• The image is stored outside of Colleague and can
  be changed by the Web Team whenever they choose.
• Clicking the Misc Text image sends them to
  another page that contains more information and
  is also controlled by the Web Team

6
Andys Secret WA MTXT Workaround. Background

• So what does the announcements MTXT look like at
  other colleges on 3.x??

https//webadvisor.alvincollege.edu/WebAdvisor/Web
Advisor https//www.utbtsc.edu/ScorpionOnline/WebA
dvisor https//tconnect2.templejc.edu/WebLivProd/W
ebLivProd https//econnect.dcccd.edu/eConnect/eCon
nect https//colleagueweb.actx.edu/AC/WebAdvisor h
ttps//sis.wtamu.edu/WebAdvisor/WebAdvisor
7
Andys Secret WA MTXT Workaround.
Implementation

• What we want the WAMAIN and Announcements MTXT to
  look like http//myrecords.nhmccd.edu

8
Andys Secret WA MTXT Workaround.
Implementation

• SMD3 screen for WBMAIN

9
Andys Secret WA MTXT Workaround.
Implementation

• New MISC TEXT
• This is now a static image location.

10
Andys Secret WA MTXT Workaround.
Implementation

• The alternative text if one hovers over the
  Announcement
• I am not sure why it looks that way

11
Andys Secret WA MTXT Workaround.
Implementation

• And clicking on it sends you to

12
Andys Secret WA MTXT Workaround. Closing
thoughts

• Since the web team is using GIFs rather than
  JPGs, then the WA screens could even include
  animations!
• As the web team decides that the information
  needs to be changed, then we are using this as
  the opportunity to switch them over one at a
  time. So far we have 3 with the GIF hyperlink.

13
Andys (with help from others) GSEARCHESEARCH
is a really terrific tool.But what if you are
not sure where to look?Use GSEARCH!
14
Andys GSEARCH - Intro and Disclaimer
GSEARCH Use gsearch to look for a string
in code related files in UT, XUT, CORE, XCOR,
CF, XCF, HR, XHR, ST and XST.It will look in
source, subroutines, inserts, menus, valcodesand
help for all these accounts. It will also look
for fltt tables,misc text, rules, voc, voclib,
research voclib and moveinfo.You may manually
enter a search string or you may put
severalsearch strings into a savedlist and
process the entire savedlistat one time.You
also have the option of searching UT, CORE, CF,
HR and STappl data files. Or nearly
everything.The last time the list of files was
updated was 2/25/07BEWARE gsearch can take a
while to process depending onyour choices. It
can also generate numerous BIG savedlists!!!Like
hot sauce, use with caution until acclimated.
15
Andys GSEARCH Where to search?Do you want to
search in ... (answer Y or N - or leave blank
for N)gtgtgt Source, Subroutines and Inserts
?Ygtgtgt WebAdvisor (WBS,WIS and WRC)
files ?Ngtgtgt appl.PRCS.CTL,
appl.PRCS.DEF and appl.PRCS.GEN ?Ngtgtgt
Menus, Errors, Miscellaneous Text, Help and Rules
?Ngtgtgt Voc, Voclib, and Research Voclib
?Ngtgtgt Moveinfo and Express Load files
?Ngtgtgt UT, CORE, CF, HR and
ST CDDs and RT Fields ?Ngtgtgt Valcode
Tables and ELF Translate Tables
?Ngtgtgt UT Appl Data Files
?Ngtgtgt CORE Appl Data Files
?Ngtgtgt CF Appl Data Files
?Ngtgtgt HR Appl Data
Files ?Ngtgtgt ST
Appl Data Files
?N
16
Andys GSEARCH What to search for and what to
do then?Search for a single string. You may
use upper case,lower case, mixed case, spaces,
symbols,but do not use wildcards, such as
'...'If you are using a savedlist containing the
search strings thenenter GET.LIST, a space and
the savedlist name.
What do you
want to search for ?AOSWALDDo you want to have
the output sent to the screen -this can require
pressing 'enter' many times (Y/N) ?YDisplay
what file is being searched (Y/N) ?NDisplay
files that could not be opened (Y/N) ?NDo you
want to have savedlists created (Y/N) ?YWhat
are your initials ?AAO ? ONLY IF
Y TO SAVEDLISTS!
17
Andys GSEARCH Are you sure?
You are
about to search through 30 files.
Is this what
you want (Y/N) ? Y
18
Andys GSEARCH Results! (edited for
space)STRING FILE
RECORDAOSWALD found in
UT.SOURCE --gt I_UTF600NH.INIAOSWALD found in
UT.SOURCE --gt UTF600NHAOSWALD found in
XUT.SOURCE --gt I_UTF600NH.INIAOSWALD found
in XUT.SOURCE --gt UTF600NHAOSWALD found in
CORE.SOURCE --gt I_ELF.TRANSLATE.TABLESAOSWALD
found in CORE.SOURCE --gt I_LOCATION.REGIONSAO
SWALD found in CORE.SOURCE --gt
I_LOGIN.REQUESTSAOSWALD found in CORE.SOURCE
--gt I_OPEN.LOCATION.REGIONSAOSWALD found in
CORE.SOURCE --gt I_OPEN.ZIP.CODE.XLATAOSWALD
found in CORE.SOURCE --gt DMB016AOSWALD found
in CORE.SOURCE --gt I_FOREIGN.PERSONAOSWALD
found in CORE.SOURCE --gt I_OPEN.FOREIGN.PERSON
AOSWALD found in CORE.SOURCE --gt
I_DMB016.INIAOSWALD found in CORE.SOURCE --gt
CC.ADD.USERS.NHNote that the pipe is used as a
delimiter for use with Excel, etc.
. . .
19
Andys GSEARCH Results! (edited for space)

. . .AOSWALD found in XST.INSERTS --gt
CDR570NHAOSWALD found in XST.INSERTS --gt
I_WSEP.REQ.CHECKAOSWALD found in XST.INSERTS
--gt CDR580NHAOSWALD found in XST.INSERTS --gt
I_PRCS.END.BCRF11AOSWALD found in
XST.INSERTS --gt I_FLD.EXIT.FORMAT.WORKSHEET.DAT
AAOSWALD found in XST.INSERTS --gt
I_OUTPUT.PROG.CATALOGGsearch is done.Your
string was found in 822 records.You may now look
for your savedlists by copying in the query
belowSSELECT SAVEDLISTS WITH _at_ID LIKE
GSEARCH.AAO...AE SAVEDLISTS or your
preferred method of browsing results.Remember
that the results in your savedlist are unsorted,
soyou may want to SORT your savedlists as you
are browsing.
20
Andys GSEARCH Results! (edited for space)

. . .SORT SAVEDLISTS 110534 Jun 01 2007
1SAVEDLISTS......................
GSEARCH.AAO_AOSWALD_CF.INSERTSGSEARCH.AAO_AOSWAL
D_CF.SOURCEGSEARCH.AAO_AOSWALD_CF.SUBROUTINESGSE
ARCH.AAO_AOSWALD_CORE.INSERTSGSEARCH.AAO_AOSWALD_
CORE.SOURCEGSEARCH.AAO_AOSWALD_CORE.SUBROUTINESG
SEARCH.AAO_AOSWALD_HR.INSERTSGSEARCH.AAO_AOSWALD_
HR.SOURCEGSEARCH.AAO_AOSWALD_HR.SUBROUTINESGSEAR
CH.AAO_AOSWALD_ST.INSERTSGSEARCH.AAO_AOSWALD_ST.S
OURCEGSEARCH.AAO_AOSWALD_ST.SUBROUTINESGSEARCH.A
AO_AOSWALD_UT.INSERTSGSEARCH.AAO_AOSWALD_UT.SOURC
EGSEARCH.AAO_AOSWALD_UT.SUBROUTINES
21

• QUESTIONS?
• andy_at_nhmccd.edu

22
DOUG MENEKEdmeneke_at_alvincollege.edu
23
Alvin College Environment

• HP rp5470
• Unix 11i
• UniData 6.1
• Colleague R17
• DMI 3.8
• Webadvisor 3.x

24
XDM.DEL Doug Meneke

• Description
• An Envision DELETE utility.
• Syntax
• XDM.DEL filename
• Must have an active savedlist
• Obsolete with native indexing

25
FIND.EMPTY Doug Meneke

• Description
• A utility to show what fields in a file are used.
• Syntax
• FIND.EMPTY filename SAMPLE x
• RFSPECS RFSPECS.CREATING.APPL
• AE RFSPECS STUDENTS
• 001 12220.54157ý
• 002
• 003
• 004 ST

26
FIND.EMPTY Doug Meneke

• appl.FILE.SPECS - FILE.FIELDS
• AE ST.FILE.SPECS STUDENTS
• 001
• .
• .
• 010 STU.EXCHANGE.START.DATEýSTU.EXCHANGE.END.DAT
  Eý
• STU.MISC1ýSTU.MISC2ýSTU.MISC3ýSTU.MISC4ýSTU.MISC5
  ý
• STU.COUNSELORýSTU.SPECIAL.SERV.NEED.CODESýSTU.RES
  IDENCY.STATUSý
• STU.HOUSING.ASSIGNMENTSýSTU.HOUSING.START.DATES
• appl.CDD FIELD.PLACEMENT
• AE ST.CDD STU.EXCHANGE.START.DATE
• 001 STUDENTS
• 002 1

27
FIND.EMPTY Doug Meneke

• FIND.EMPTY STUDENTS 10000
• 
  
• Selecting file...
  
• 10000 records selected to list 0.
  
• Analyizing records...
• 
  
• 1. STU.EXCHANGE.START.DATE
• 2. STU.EXCHANGE.END.DATE
• 3. STU.MISC1
• 4. STU.MISC2
• 5. STU.MISC3 232
• 6. STU.MISC4 36
• 7. STU.MISC5 112
• 8. STU.COUNSELOR
• 9. STU.SPECIAL.SERV.NEED.CODES
• 10. STU.RESIDENCY.STATUS 9920
• 11. STU.HOUSING.ASSIGNMENTS
• 12. STU.HOUSING.START.DATES
• 13. STU.HOME.LOCATION 9944

28
FIND.ST Doug Meneke

• Description
• A utility to find all the pieces of an Envision
  program/process.
• Syntax
• FIND.ST application string
• UT.VALCODES ENVISION.FILES

29
FIND.ST Doug Meneke

• FIND.ST ST XCDR054
• ST.DOC...
  
• XCDR054
  
• ST.INSERTS...
  
• XCDR054
  
• ST.OBJ...
  
• _XCDR054
  
• ST.PRCS.CTL...
  
• XCDR054
  
• ST.PRCS.DEF...
  
• XCDR054
  
• ST.SOURCE...
  
• I_XCDR054.INI
  
• XCDR054
  
• ST.VOC...
  
• XCDR054

30
PACKAGE.SOURCE Doug Meneke

• Description
• Process to gather all the pieces of an Envision
  program/process for porting to another machine.
• Syntax
• PACKAGE.SOURCE application string

31
PACKAGE.SOURCE Doug Meneke

• PACKAGE.SOURCE ST XCDR054
• ST.DOC...
  
• XCDR054
  
• ST.INSERTS...
  
• XCDR054
  
• ST.OBJ...
  
• _XCDR054
  
• ST.PRCS.CTL...
  
• XCDR054
  
• ST.PRCS.DEF...
  
• XCDR054
  
• ST.SOURCE...
  
• I_XCDR054.INI
  
• XCDR054
  
• ST.VOC...
  
• XCDR054

32
PACKAGE.SOURCE Doug Meneke

• Creates ONE record in the _HOLD_ file
• AE HOLD ST!XCDR054
• 001 /FILE/ST.DOC
• 002 /ITEM/XCDR054
• 003 /START/
• 005
• 006
• .
• .

33
UNPACKAGE.SOURCE Doug Meneke

• Description
• Process to put all the pieces of an Envision
  program/process into another machine.
• Syntax
• UNPACKAGE.SOURCE name
• Example
• UNPACKAGE.SOURCE ST!XCDR054

34
XCOPY.REGISTRY Doug Meneke

• Description
• Process to copy my LIVE WebAdvisor registry to my
  TEST account registry.
• Syntax
• XCOPY.REGISTRY

35
XCOPY.REGISTRY Doug Meneke

• Copies the entire registry
• Sets all student passwords to x
• Sets all faculty passwords to y
• Sets all employee passwords to z
• Skips DMIADMIN, I.T. folks, and administrators
• Password expiration turned off

36
XDM.CLEAN.FILES Doug Meneke

• Description
• Process to purge unnecessary or run-time data.
• Syntax
• XDM.CLEAN.FILES

37
XDM.CLEAN.FILES Doug Meneke

• Cleans the following files
• _HOLD_ _PH_
• VOC SAVEDLISTS
• Envision/run-time files TREG files
• CALENDAR.SCHEDULES ELF files
• WebAdvisor files Registration files

38
XDM.COPY.ACCT Doug Meneke

• Description
• Process to copy live data to test.
• Syntax
• XDM.COPY.ACCT

39
XDM.COPY.ACCT Doug Meneke

• Copies the DATA tree only
• Allows selected files to be NOT copied
• Handles alias files (ie. PARENT)
• Uses system level (Unix) commands

40
RECONCILE.PATCHES Doug Meneke

• Description
• Process to tell me what Envision
  programs/processes changed.
• Syntax
• RECONCILE.PATCHES

41
RECONCILE.PATCHES Doug Meneke

• Compares all records in Xapplications to regular
  applications
• Skips add/change dates
• Skips add/change opers
• Skips object code
• Obsolete with R18

42

• QUESTIONS?
• dmeneke_at_alvincollege.edu

43
ALAN LYTLEaml_at_templejc.edu
44
Writing Report/Data to the Users PC

• Harder than it looks
• But not that Hard

45
Temple College Environment

• HP9000/3440
• Unix 11.23 (11i)
• Unidata 7.1.8 combined
• R17 Envision 4.7.1
• DMI 3.8
• UI 1.5
• WA 3.02

46
The Input Screen
47
How to get Started

• Not really that hard
• Do once use over and over

48
Setting up the Work areas

• XL.OUT.PCFL ""
• X.PC.INP.DIR ""
• X.PC.INP.DIR A.PC.DIR
• X.PC.INP.FILE "ENROLLMENT"
• X.USE.TOPC "Y"
• IF X.PC.INP.DIR "" THEN
• X.USE.TOPC "N"
• END

49
Detail Lines records to output

• X.TEMP.PCFL X.TERM4
• X.TEMP.PCFL ","
• X.TEMP.PCFL "Credits"
• X.TEMP.PCFL ","
• X.TEMP.PCFL "Contact"
• XL.OUT.PCFLlt1,-1gt X.TEMP.PCFL

50
Checking the PC Directory

• BLD.PC.TXT
• X.TEMP.DATE FMT(OCONV(DATE(),SN.DATE2),"R8")
• X.TEMP.DATE TRIM(X.TEMP.DATE,"/","A")
• XL.TEMP.LIST ""
• X.CNT.TEMP 0
• X.NUM.TEMP 0
• X.PC.FILE "ENROLLMENT"
• First make sure directory exists or create if
  does not
• X.FND.DIR 0
• X.PC.DIR X.PC.INP.DIR
• CALL WIN.PCDIR(X.PC.DIR, X.FND.DIR)
• IF X.FND.DIR 0 THEN
• CALL WIN.PCMKDIR(X.PC.DIR)
• END
• IF XL.OUT.PCFLlt1,1gt NE "" THEN
• XL.TEMP.LIST XL.OUT.PCFL
• X.CNT.TEMP 0

51
Writing each Line record

• SET.PC.FILE
• Check if file exists if does delete if not
  create
• X.PATH.FILE X.PC.DIR"\"X.PC.FILE
• X.FND.FILE 0
• CALL WIN.PCFILE(X.PATH.FILE, X.FND.FILE)
• IF X.FND.FILE NE 0 THEN
• CALL WIN.PCDELETE(X.PATH.FILE)
• END
• CALL WIN.PCCREATE(X.PATH.FILE)
• CALL WIN.PCOPEN("PCFILE",X.PATH.FILE,X.OK.OPEN)
• IF X.OK.OPEN 0 THEN
• CALL WIN.PCCLOSE(X.PATH.FILE)
• END
• IF X.OK.OPEN 1 THEN
• FOR X.CNT.TEMP 1 TO X.NUM.TEMP
• IF XL.TEMP.LISTlt1,X.CNT.TEMPgt NE "" THEN
• X.TEMP.DATA XL.TEMP.LISTlt1,X.CNT.TEMPgt

52
Wintegrate Programs

• WIN.PCDIR
• WIN.PCMKDIR
• WIN.PCFILE
• WIN.PCCREATE
• WIN.PCDELETE
• WIN.PCOPEN
• WIN.PCCLOSE
• WIN.PCWRITE

53

• QUESTIONS?
• aml_at_templejc.edu

54
JIM MATHEWSjimm_at_nhmccd.edu
55
NHMCCD Environment

• IBM 9117-570
• AIX 4.3.3
• UniData 6.1.11
• Colleague R17
• DMI 3.8
• Webadvisor 3.x

56
Jims secret CREATE.MOVEINFO.NH The problem

• You have a patch in the TEST/INSTALL account that
  you want in LIVE but for whatever reason you can
  not do a patch load to LIVE
• A single patch can contain thousands of items.
  You dont want to enter those into the MDEF
  screen manually

57
Jims secret CREATE.MOVEINFO.NH The solution

• RUN JM.BP CREATE.MOVEINFO.NH
• Input Application
• ST
• Input Patch Number
• C11703-19_ST_17014_U
• Input New MDEF Name
• JIMS.NEW.MDEF

58
JIMS.NEW.MDEF
Only the bottom window is populated
59
JIMS.NEW.MDEF
Note the 4173 items You did not have to enter
60
Jims secret XMRG MERGE.LIST Screen The
problem

• LIST.ALGEBRA is not user friendly
• Colon Prompt goes away in R18
• How will users manage their lists?

61
Jims secret The solution XMRG
MERGE.LIST Screen
62
Jims secret The solution XMRG
MERGE.LIST Screen
63
Jims secret ULL Unix file Time/Size Listing
The problem

• When was this file updated or changed
• Check the Nightly File Refresh
• Time File was last updated by someone
• Time Program was last changed
• Are two versions of a file the same size
• You need a quick easy way to see File Size and
  Timestamp info from Unidata

64
Jims secret ULL Unix file Time/Size Listing
The syntax
To see a single item in a DIR type file ULL
FILE.NAME ITEM.NAME To see an items Object
Code ULL ITEM.NAME To see a Unidata File or
DIRectory ULL FILE.NAME
65
Jims secret ULL Unix file Time/Size Listing
The output
To see a single item in a DIR type file ULL
ST.INSERTS ACB700NH File type DIR "HandCoded
BASIC Code Inserts" ST Rel 17.0.14 05/22/07 by
DATATEL DATA path /datatel/release/COLL17/ST/ST.I
NSERTS DICT path /datatel/release/COLL17/UT/D_UT.
INSERTS -rwxrwx--- 1 datatel clive
668 Jul 24 2003 /datatel/release/COLL17/ST/ST.INS
ERTS/ACB700NH
66
Jims secret ULL Unix file Time/Size Listing
The output
To see an items Object Code ULL ACB700NH File
type C DATA path /datatel/release/COLL17/ST/ST.O
BJ/_ACB700NH DICT path -rwxrwx--- 1 datatel
clive 19900 Jul 25 2003
/datatel/release/COLL17/ST/ST.OBJ/_ACB700NH
67
Jims secret ULL Unix file Time/Size Listing
The Output
To see a Unidata DIRectory ULL ST.INSERTS File
type DIR "HandCoded BASIC Code Inserts" ST Rel
17.0.14 05/22/07 by DATATEL DATA path
/datatel/release/COLL17/ST/ST.INSERTS DICT path
/datatel/release/COLL17/UT/D_UT.INSERTS total
89096 -rwxrwx--- 1 datatel clive 1509
Apr 6 2003 ACB002 -rw-rw---- 1 jimm clive
1509 Dec 9 2004 ACB002NH -rwxrwx---
1 datatel clive 2212 Nov 20 2001
ACB011 -rwxrwx--- 1 datatel clive
2106 Nov 20 2001 ACB011A -rwxrwx--- 1 datatel
clive 728 Nov 20 2001
ACB013 -rwxrwx--- 1 datatel clive
989 Oct 30 2005 ACB013A
68
Jims secret ULL Unix file Time/Size Listing
The output
To see a Unidata File ULL STUDENTS ULL
STUDENTS File type F "The file of students in
the system. Anyone that is" ST Rel 17.0.14
10/09/05 by DATATEL DATA path data/data_s/STUDENT
S DICT path data/data_s/D_STUDENTS -rwxrwx---
1 datatel clive 178323456 Jun 3 0321
data/data_s/STUDENTS
69

• QUESTIONS?
• jimm_at_nhmccd.edu

70
CHUCK EVERETTceverett_at_odessa.edu
71

• All programs are written for
• IBM RS6000 55A x 4
• AIX 5.3 sl 5
• Unidata 6.1.15
• Envision 4.7.1.8
• Colleague 17
• DMI 3.6
• WA 2.x / 3.x

72
DMISTAT Chuck Everett

• Description
• Show Status of DMIs, Slaves, Phantoms.
• Syntax
• DMISTAT

73
DMISTAT Chuck Everett

• Looks for specific Phantoms
• Looks for specific Listeners
• Looks for active Slave processes
• Display logging space used/available
• Screenshot

74
DMISTAT Chuck Everett
Background Processes Backup
/etc/MIRROR.LIVE Sun Jun 10 233000
PID
STARTED BY DMI Status LIVE listener
active. 675932 Jun 02 - root (675932)
TEST listener active. 983212
143001 root (983212) WWIZ Status
WWIZSVR Server Available. Phantom Status
MDMI dmi phantom down. EDQM
edx phantom down. RPWP Phantom
active. 663610 0 Jun root
OC Start Phantom active. 606220 0
Jun root
DMI Log File Info
Avail 823 meg LIVE 20 meg TEST 1 meg
root 159754 1040638 0 055447 - 000
udapi_slave 6 5 0 root 1237130 868562 8
075531 - 003 udapi_slave 6 5 0
(P)rint on AUX, Page(), (T)op, (B)ottom,
(U)p, (D)own, (E)xit, Help(?) PAGE 1 OF 1
Report has not been printed.
75
OC.DMI.STARTER Chuck Everett

• Description
• Check for Is DMI running?
• Check for Is there a runaway/hung Slave?
• Syntax
• PHANTOM OC.DMI.STARTER

76
OC.DMI.STARTER Chuck Everett

• Looks for DMI process, if not active, does a
  STARTDMI
• Looks for hung/runaway Slave processes, if
  excessive time, does a kill -15
• Looks for a match between real DMI pid and
  dmilistener.pid and resets if needed.
• Sleeps for a specified timeperiod
• Remember, Phantoms dont take up a Unidata
  License Slot.

77
GEN.DMI.USERS Chuck Everett

• Description
• Generate new DMI Logins in batch or individual
  mode. Not Envision Runs many times faster.
• Syntax
• GEN.DMI.USERS

78
GEN.DMI.USERS Chuck Everett

• Can run from savedlists, or batch selects like
  students for a term or active employees, or can
  be run for individuals by ID.NO, SSN, NAME
• Looks for presence of current Registry entry
  optionally can reset password or not overwrite
  password
• Uses Template records to create different types
  of profiles student, faculty, staff

79
GEN.DMI.USERS Chuck Everett

• Based on Datatels own S.JAVA subroutines to
  read/write/encrypt data
• Changes required for R18 when Registry moves but
  core program still works
• Links into our internal LDAP programming
• Screenshots

80
GEN.DMI.USERS Chuck Everett
Batch Generation of DMI Access ID's Account
Name COLLIVE
/LIVE/COLLIVE Listener Name
livelistener Listerer Port 5600 DMI
Account Name DMIREGLIVE
/release/dmi DMI DMIUSER File
REGISTRY.DMIUSER
/release/REGISTRY/DMIREGLIVE/system/DMIUSERS
DMI DMIUSRACT File REGISTRY.DMIUSRACT
/release/REGISTRY/DMIREGLIVE/system
/DMIUSRACT Login Scheme first middle
initials, middle name, seq for dups B -
Batch build Students, Faculty, Employees T -
Faculty from Course.Sections for Term F -
Faculty from OC.LOGINS E - Staff from
OC.LOGINS S - Student Registrants from
STUDENT.TERMS I - Individual Person S -
Student Profile F - Faculty Profile V - VCT
Faculty Profile E - Employee
Profile ENTER NAME, SSN, ID.NO
81
GEN.DMI.USERS Chuck Everett
046 ADMIN INFO 047 A.USER datatel' 048
A.PASSWORD' 050 A.FILENAME
'USERS' 051 EXECUTE 'WHERE' CAPTURING
WHERE 052 ACCOUNT FIELD(WHERElt1,1,1gt,'/',3,1)
053 A.ERROR.OCCURED '' 054 A.MSG
'' 055 AL.ATTRIB.WRITTEN '' 056
AL.UNK.FIELDS '' 130 AL.ATTRIB.TO.WRITElt1gt
"DISABLEDN" 131 AL.ATTRIB.TO.WRITElt2gt
"SECURITYDMIUSER" 132 AL.ATTRIB.TO.WRITElt3gt
"ACCOUNT"ACCOUNT 133 AL.ATTRIB.TO.WRITElt4gt
"OPERS"X.OPERS 134 AL.ATTRIB.TO.WRITElt5gt
"PERSONID"ID.NO 135 AL.ATTRIB.TO.WRITElt6gt
"PASSWORD"PWD 136 AL.ATTRIB.TO.WRITElt7gt
"ACCTDISABLEDN" 137 138 WRITE A DMI RECORD
AS FI/MI/LNAME/SEQ 139 140 A.RECORD.ID
LDAP.ID 141 CALL S.WRITE.JAVA.REGISTRY(AL.ATTRI
B.WRITTEN,AL.UNK.ATTRIB,A.USER,A.PASSW ORD,A.FILEN
AME,A.RECORD.ID,AL.ATTRIB.TO.WRITE,A.ERROR.OCCURRE
D,A.MSG)
82
GEN.DMI.USERS Chuck Everett
06/05/2007 Generate DMI Entries
New Faculty for Term 07/S1 Web
ID Security Key Opers
Record .ID.NO. Unable to process gbrooks
No valid password field
0277945 Unable to process bcousins
No valid password field 0277941 ezmoore
DMIUSER
0277773 Unable to process
jwessonmartin No valid password field
0269068 (P)rint on HPISLD,
Page(), (T)op, (B)ottom, (U)p, (D)own, (E)xit,
Help(?) R PAGE 1 OF 1 Report
has not been printed.
83
LU Chuck Everett

• Description
• Formatted, Sorted List Users with user status
  displayed
• Syntax
• LU

84
LU Chuck Everett
List Users wwho(42) uunix(41)
mmenu(19) UUnidata(41) ddefunct(0) Telnet
Sessions
..5.ce.sm.....sharonm.odessa...wu.U.
.36.che.......che.o
dessa.edu...wumU. .15.adm.dw....vpiadm202dws01.
..wu.U. ..1.cosm......10.14.23.149.....wumU.
..3.adm.lg....vpiadm202ws01.o..wu.U.
.17.da.rsa....ccsub204fws01.o..wu.U.
..9.adm.tlh...prtsub101aws01...wu.U.
.21.fa.bm.....fasub212aws01.o..wumU.
.18.am.ar.....cssub213dws01.o..wumU.
.10.fa.cm.....fasub203aws02.o..wu.U.
.12.bk.ls.....bssub102fws01.o..wu.U.
.40.fa.dk.....fasub203ews01.o..wu.U.
.32.bus.be....csadm101ws04.od..wu.U.
.22.fa.dn.....dnesmith1.odess..wu.U.
.11.bus.cw....busadm101ews01...wu.U.
.16.fa.gn.....fasub203cws01.o..wumU.
.30.bus.jb....purwar100aws01...wu.U.
..4.fa.ln.....fasub203ews02.o..wu.U.
.19.bus.kg....baadm211ws01.od..wu.U.
.23.hr.lg.....hradm104ws03.od..wumU.
.37.bus.kh....purwar100ws03.o..wumU.
..8.oc.mvw....cepec101ws01.od..wu.U.
.26.bus.lj....baadm209ws01.od..wumU.
.25.per.bg....hradm104ws04.od..wu.U.
.24.bus.lj....baadm209ws01.od..wu.U.
.27.per.jb....hradm104ws06.od..wumU.
.28.bus.lw....purwar100ws05.o..wumU.
..0.phy.cir...scsc208ws01.ode..wumU.
..6.bus.md....busadm101jws01...wumU.
.31.reg.bb....regsub202dws01...wu.U.
..7.bus.ms....busadm101ews02...wu.U.
.39.reg.cm....sub202-2.odessa..wumU. TTY
Sessions
.0.console.............
........wu... d.14.bus.lj....................w
....d (P)rint on AUX, Page(), (T)op, (B)ottom,
(U)p, (D)own, (E)xit, Help(?) PAGE 1 OF 2
Report has not been printed.
85
OC.LOCKS Chuck Everett

• Description
• Formatted list.locks report.
• Syntax
• OC.LOCKS

86
OC.LOCKS Chuck Everett

• Full data display no trunctations
• Browse-able
• Screenshots

87
OC.LOCKS Chuck Everett
OC.LOCKS UID PORT LOGINS.. FILE NAME...........
RECORD KEY.......... .TIME. ...DATE.... 867
11n buscw CASH.RCPTS 707371
0845 Jun 05 2007 867 11n buscw
RCPT.SESSIONS 25962 0845
Jun 05 2007 517 9n admtlh STUDENT.PROGRAMS
00000994902 0854 Jun 05 2007 517
9n admtlh STUDENT.PROGRAMS 00000998029
0854 Jun 05 2007 517 9n admtlh
STUDENT.PROGRAMS 0000099CE 0854
Jun 05 2007 517 9n admtlh STUDENT.PROGRAMS
0000099UG 0854 Jun 05 2007 517
9n admtlh PERSON.ST 0000099
0854 Jun 05 2007 517 9n admtlh
PERSON 0000099 0854
Jun 05 2007 517 9n admtlh STUDENTS
0000099 0854 Jun 05 2007 538
13n regkd PERSON 0278126
0855 Jun 05 2007 538 13n regkd
OC.PEOPLE.USER.FIELD 0278126 0855
Jun 05 2007 316 20n sctb PERSON
0180632 0853 Jun 05 2007 316
20n sctb O07.APPOINTMENTS 18949
0855 Jun 05 2007 316 20n sctb
O07.APPTS.LOG 01806322007 0855
Jun 05 2007 316 20n sctb O07.POSITIONS
19015 0855 Jun 05 2007 348
37n buskh REQUISITIONS 62069
0854 Jun 05 2007 448 28n buslw BPO
10791 0855 Jun 05
2007 448 28n buslw ITEMS
552432 0855 Jun 05 2007 448
28n buslw VOUCHERS V0263444
0854 Jun 05 2007 (P)rint on AUX,
Page(), (T)op, (B)ottom, (U)p, (D)own, (E)xit,
Help(?) PAGE 1 OF 2 Report
has not been printed.
88
KILL Chuck Everett

• Description
• Allows you to selectively kill user sessions.
• Syntax
• KILL

89
KILL Chuck Everett

• Presents Operator a sorted list of users
• Shows status of users
• When user session is chosen, kills processes in
  reverse order
• Uses kill -15 to gracefully kill UDT process
• Failsafe prompt before killing
• Uses sudo to kill as root to guarantee
  permission

90
KILL Chuck Everett
Kill a User's Session wwho uunix mmenu
UUnidata ddefunct Telnet Sessions
..1.cosm......10.14.23.149.....wumU.
.15.adm.dw....vpiadm202dws01...wu.U.
.42.cp.af.....cpcen107aws01.o..wu.U.
..3.adm.lg....vpiadm202ws01.o..wu.U.
.17.da.rsa....ccsub204fws01.o..wu.U.
..9.adm.tlh...prtsub101aws01...wu.U.
.21.fa.bm.....fasub212aws01.o..wumU.
..4.adm.tlh...prtsub101aws01...wu.U.
.10.fa.cm.....fasub203aws02.o..wu.U.
.18.am.ar.....cssub213dws01.o..wumU.
.40.fa.dk.....fasub203ews01.o..wu.U.
.12.bk.ls.....bssub102fws01.o..wu.U.
.22.fa.dn.....dnesmith1.odess..wu.U.
.23.bus.be....csadm101ws04.od..wu.U.
.16.fa.gn.....fasub203cws01.o..wumU.
.11.bus.cw....busadm101ews01...wu.U.
..8.oc.mvw....cepec101ws01.od..wu.U .19.bus.kg....
baadm211ws01.od..wu.U. ..0.phy.cir...scsc208ws01
.ode..wumU. .26.bus.lj....baadm209ws01.od..wu.U.
.27.per.jb....hradm104ws06.od..wumU.
..6.bus.md....busadm101jws01...wumU.
..2.reg.sc....regsub202ws10.o..wu.U .35.bus.ns....
busadm101jws02...wumU. .20.sc.tb.....scsc100ws01
.ode..wu.U. .34.bus.vc....baadm203ws02.od..wumU
.
.33.ce.cs.....dh101-2.odessa...wu.U. TTY
Sessions
..5.ce.sm.....sharonm.odessa...wu.U.
d..0.oc.js1........................d
.36.che.......che.odessa.edu...wumU.
D..0.console...0.0.............w....
Enter D or T to
kill T26 pts/26 950388 549068
1003768 udt /usr/bin/ -ksh
OK TO KILL buslj ON TERMINAL pts/26
baadm209ws01.odessa.edu (Y/N)
91

• QUESTIONS?
• ceverett_at_odessa.edu
• All programs available as is.

92
Rosendo GarciaRosendo.Garcia_at_utb.edu
93
R18 Putting DVF back to work and getting MGCC to
cooperate

• DVF - Define Virtual Fields
• MGCC - Migrating Computed Columns

94

• All programs are written for
• RP8420 10 processors 32 gig memory
• HPUX 11.i v1 (upgrading to v2 Nov 07)
• Unidata 6.1.16 (upgrading 7.x Nov 07)
• Envision 4.7.1.8.3
• Colleague 17 - Colleague R18 July 23
• DMI 3.8 DMI 4.x R18
• WA 3.0.x

95
This old dog has a hard time learning new tricks.
This information comes from one of the R18
manuals. A workaround mentioned at the very
bottom of a page very easily missed. This old dog
cannot remember or found which manual but trust
me
It works.
96
Ignore Warning
97
(No Transcript)
98
(No Transcript)
99
(No Transcript)
100

• At this point it just added it to CORE.CDD

LIST CORE.CDD WITH _at_ID LIKE T04.STAFF... 094103
Jun 04 2007 1 TOOLCDD............
.............


T04.STAFF.OFFICE.CODES
1 record listed
SELECT CORE.CDD WITH _at_ID LIKE
T04.STAFF.OFFICE.CODES
gtSAVE.LIST STAFF.VIRTUAL.FIELD
1 key(s) saved to
1 record(s).
101
(No Transcript)
102
(No Transcript)
103

• At this point a computed column had been created
  in DCC. It just needs to be run through the
  generator in DCC.

104
Computed Column Code
Blank Run Time
Blank Database Flag
105

• After generation, you will have a compiled
  Computed Column and a Virtual Field in the STAFF
  dictionary

LIST DICT STAFF WITH _at_ID LIKE T04.STAFF.OFFICE.COD
ES BY TYP BY _at_ID TYP LOC CONV NAME FORMAT SM
ASSOC 095643 Jun 04 2007 1
_at_ID............ TYP
LOC.......... CONV NAME........... FORMAT SM
ASSOC.....

T04.STAFF.OFFIC I CONVERT(_at_VM," Office
Codes 15L S E.CODES
-",STAFF.OFFI

CE.CODE)
1 record listed


106

• LIST STAFF T04.STAFF.OFFICE.CODES
• STAFF..... Office Codes..................
  
• 
  
• 0002357 ADM
  
• 0177428 NA-LIB
  
• 0121483 NA
  
• 0174614 ADM-FA-TO-NSR-ZADV-DOS-LIB
  
• 0000682 NA
  
• 0207712 NA
  
• 0205367 NA
  
• 0055086 NA
  
• 0231363 NA-ADM
  
• 0156792 NA
  
• 0064667 NA
  
• 0000950 NA-ADM-REG-FA-SEC-BUS-NSR-ZADV

107

• What if we want to change an existing computed
  column?
• First we need to clear the code in the computed
  column using DCC

108
Delete code Or Clear the code
109
Delete code Or Clear the code
110

• What if we want to change an existing computed
  column?
• Bring up T04.STAFF.OFFICE.CODES
• in DVF

111
Detail
112
Added a TRANS To PERSON and retrieve WHERE.USED
field
Modified line to strip out Multivalue mark
and Convert them to hyphens
113
Save out of DVF and Run it through MGCC again
114
(No Transcript)
115
New Demand fields
116
New Generated Code
117
New output from computed column
118
DATATEL recommends to run the new Computed
Column in RTVF for testing purposes
119

• R18 SHEL goes away? Really?
• Well someone posted a solution back in January
• ID Got SHEL ? (for R18)
• "Clayton Burton" ltClayton.Burton_at_furman.edugt on
  01/19 at 1136 AM
• Happy Friday everyone!
• Assuming this hasn't already been posted at some
  point, here's a lovely post-Christmas gift for
  everyone. When we first installed R18 we noticed
  that SHEL still worked. And at some point it
  stopped working.

120

• I think that some patches basically disable it.
  But in one of our other R18 accounts I pulled up
  SHEL in the Toolkit's BPO to see what it looked
  like with the idea of copying it via the PRMN
  screen. Turns out there was no need for a copy!
  SHEL is a one-line program. In your SHEL-less R18
  account create a new Batch process (BGP). I named
  ours "XSHL". Then pull that new, blank process up
  in BPO and put this single line in the
  "Statements" area CALL S.PERFORM.MODE
• That's it! Add to an "ADMIN" security class and
  enjoy!
• --Clayton

121

• One line program works fine
• Users will have access only in TEST for
• a limited time while we finish up with the
• converting of the paragraphs

122

• Presentation available upon request
• Rosendo.Garcia_at_utb.edu
• Questions ?

123
Thank You for Attending! This session will
self-destruct at the end of the song!

• ANDY OSWALD, NHMCCD
• ROSENDO GARCIA, UTB-TSC
• ALAN LYTLE, TEMPLE COLLEGE
• CHUCK EVERETT, ODESSA COLLEGE
• JIM MATHEWS, NHMCCD
• DOUG MENEKE, ALVIN COLLEGE
• This session is so secret that this document
  available on
• http//faculty.nhmccd.edu/aoswald/datatel