XPDUTL ;SFISC/RSD - KIDS utilities ;10/15/2008
Source file <XPDUTL.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
VERSION(X) | ;Get current version from Package file, X=package name or
|
|
VER(X) | ;returns version number from Build file, X=build name
|
|
STATUS(IEN) | ;returns status from Install File, IEN=Install File IEN
|
|
PKG(X) | ;returns package name from Build file, X=build name
|
|
LAST(PKG,VER,REL) | ;returns last patch applied for a Package, PATCH^DATE
|
|
PATCH(X) | ;return 1 if patch X was installed, X=aaaa*nn.nn*nnnn ; p672 change 1.3N to 1.4N
|
|
INSTALDT(INSTALL,RESULT) | ;returns number of installs, 0 if not installed or doesn't exist
|
|
NEWCP(XPD,XPDC,XPDP) | ;create new check point, returns 0=error or ien
|
|
UPCP(XPD,XPDP) | ;update check point, returns 0=error or ien
|
|
COMCP(XPD) | ;complete check point, returns 0=error or date/time
|
|
VERCP(XPD) | ;verify check point, returns 1=completed, 0=not
|
|
PARCP(XPD,XPDF) | ;returns parameters of check point
|
|
CURCP(XPDF) | ;returns current check point
|
|
WP(X) | ;X=global ref
|
|
MES(X) | ;record message, X=message or an array passed by reference
|
|
BMES(X) | ;add blank line before message
|
|
RTNUP(X,Y) | ;update routine action, X=routine, Y=action
|
|
RTNLOG(X) | ;Enter/Update routine in the Routine File
|
|
DICCP(X) | ;lookup check point, returns ien or 0
|
|
PRODE(XPDN,XPD) | ;enable/disable protocols, return 1 for success
|
|
OPTDE(XPDN,XPD) | ;enable/disable options, return 1 for success
|
|
BUILD(XPDN,XPD) | ;check if a build exists, return 1 for success
|
|
MAILGRP(X) | ;Return mail group for package, X=package name or namespace
|
|
LKPKG(X) | ;Return Package ien, X=package name or namespace
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(9.4 - [#9.4] | VERSION+4, LAST+5, LAST+6, LAST+8, PATCH+4, PATCH+6, PATCH+7, LKPKG+4, LKPKG+5, LKPKG+6 |
^DIC(9.8 - [#9.8] | RTNLOG+2 |
^XPD(9.7 - [#9.7] | STATUS+1, STATUS+2, INSTALDT+7, INSTALDT+8, INSTALDT+9, DICCP+3 |
^XTMP("XPDI" | RTNUP+4, RTNUP+7, RTNUP+10* |
Name | Line Occurrences |
---|---|
$$DICCP | UPCP+4, COMCP+3, VERCP+4, PARCP+4 |
$$LKPKG | VERSION+3, LAST+4, PATCH+3, MAILGRP+2 |
MES | BMES+3 |
Name | Field # of Occurrence |
---|---|
^( | LAST+8, RTNUP+4* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | PATCH+2~, PATCH+7*, PATCH+8, NEWCP+3~, NEWCP+6*, WP+1~, WP+3*, MES+1~, MES+2*, MES+4* , BMES+1~, BMES+2*, RTNUP+2~, RTNUP+10 |
CNT | INSTALDT+3~, INSTALDT+5*, INSTALDT+9*, INSTALDT+10, INSTALDT+11 |
DA | MAILGRP+1~, MAILGRP+2*, MAILGRP+4, LKPKG+2~, LKPKG+3, LKPKG+4*, LKPKG+5*, LKPKG+6*, LKPKG+7 |
DATE | INSTALDT+3~, INSTALDT+8*, INSTALDT+9 |
DIC | MAILGRP+1~, MAILGRP+3* |
DIQ | MAILGRP+1~, MAILGRP+3* |
DR | MAILGRP+1~, MAILGRP+3* |
FDA | RTNLOG+1~ |
FDA( | RTNLOG+3*, RTNLOG+5* |
I | VERSION+2~, VERSION+3*, VERSION+4, PATCH+2~, PATCH+3*, PATCH+4, PATCH+6, PATCH+7 |
IEN | STATUS~, STATUS+1, STATUS+2, INSTALDT+3~, INSTALDT+5*, INSTALDT+7*, INSTALDT+8, INSTALDT+9, RTNLOG+1~, RTNLOG+3* , RTNLOG+4*, RTNLOG+5 |
INSTALL | INSTALDT~, INSTALDT+6, INSTALDT+7 |
J | PATCH+2~, PATCH+4*, PATCH+6, PATCH+7 |
LATEST | LAST+3~, LAST+7*, LAST+8, LAST+10*, LAST+11 |
PATCH | LAST+3~, LAST+7*, LAST+10*, LAST+11 |
PKG | LAST~, LAST+4 |
PKGIEN | LAST+3~, LAST+4*, LAST+5, LAST+6, LAST+8 |
REL | LAST~, LAST+9 |
RESULT | INSTALDT~, INSTALDT+4!, INSTALDT+5*, INSTALDT+10* |
RESULT( | INSTALDT+9* |
SUBIEN | LAST+3~, LAST+7*, LAST+8* |
U | STATUS+2, LAST+8, LAST+9, LAST+10, LAST+11, INSTALDT+8, RTNUP+4, RTNUP+10, PRODE+4, OPTDE+4 |
VER | LAST~, LAST+5*, LAST+6 |
VERIEN | LAST+3~, LAST+6*, LAST+8 |
X | VERSION~, VERSION+3, VER~, VER+1, VER+2, PKG~, PKG+1, PATCH~, PATCH+1, PATCH+3 , PATCH+4*, PATCH+6, PATCH+7, PATCH+8, WP~, WP+2, WP+3, WP+4, MES~, MES+2! , BMES~, BMES+2!, BMES+3, RTNUP~, RTNUP+4, RTNLOG~, RTNLOG+2, RTNLOG+5, DICCP~, DICCP+1 , DICCP+3, DICCP+4, MAILGRP~, MAILGRP+2, LKPKG~, LKPKG+1, LKPKG+3, LKPKG+4, LKPKG+5, LKPKG+6 |
X( | MES+4 |
X(1 | MES+2*, BMES+2* |
X(2 | BMES+2* |
XD | MAILGRP+1~ |
XD( | MAILGRP+4 |
XPD | NEWCP~, NEWCP+2, NEWCP+6, NEWCP+7, UPCP~, UPCP+4, COMCP~, COMCP+3, VERCP~, VERCP+4 , PARCP~, PARCP+4, PRODE~, PRODE+3*, PRODE+4, PRODE+5, OPTDE~, OPTDE+3*, OPTDE+4, OPTDE+5 , BUILD~, BUILD+2*, BUILD+3 |
>> XPDA | NEWCP+6, NEWCP+7, UPCP+6, COMCP+5, VERCP+6, PARCP+6, WP+4, MES+5, RTNUP+4, RTNUP+7 , RTNUP+10, DICCP+3, DICCP+4 |
XPDC | NEWCP~, NEWCP+8 |
>> XPDCHECK | CURCP+2 |
>> XPDCHECK(0 | CURCP+2 |
XPDCP | NEWCP+5, UPCP+4, COMCP+3, VERCP+4, PARCP+3~*, PARCP+4, DICCP+3 |
XPDD | COMCP+2~, COMCP+5*, COMCP+7 |
XPDF | NEWCP+3~, NEWCP+7*, NEWCP+8, NEWCP+9, UPCP+2~, UPCP+6*, UPCP+7, PARCP~, PARCP+3, CURCP~ , CURCP+2 |
XPDI | NEWCP+3~, NEWCP+5*, NEWCP+6, NEWCP+7, NEWCP+8, NEWCP+9, UPCP+2~, UPCP+4*, UPCP+7, COMCP+2~ , COMCP+3*, COMCP+5, VERCP+3~, VERCP+4*, VERCP+6, PARCP+2~, PARCP+4*, PARCP+6, DICCP+4 |
XPDJ | NEWCP+3~, UPCP+2~, COMCP+2~ |
XPDJ( | NEWCP+7*, NEWCP+8*, NEWCP+9*, UPCP+7*, COMCP+5* |
XPDN | PRODE~, PRODE+2, PRODE+4, OPTDE~, OPTDE+2, OPTDE+4, BUILD~, BUILD+2 |
XPDP | NEWCP~, NEWCP+9, UPCP~, UPCP+7 |
>> XPDSET | PRODE+4, OPTDE+4 |
>> XPDT("NM" | BUILD+2 |
XPDY | NEWCP+3~, UPCP+2~, UPCP+4*, UPCP+5, UPCP+6, UPCP+9, COMCP+2~, COMCP+3*, COMCP+4, COMCP+5 , VERCP+3~, VERCP+4*, VERCP+5, VERCP+6, PARCP+2~, PARCP+4*, PARCP+5, PARCP+6 |
XPDY(1 | NEWCP+11 |
Y | LAST+3~, LAST+8*, LAST+9, LAST+10, RTNUP~, RTNUP+4, RTNUP+7*, RTNUP+10, RTNLOG+1~, RTNLOG+2* , RTNLOG+3, RTNLOG+4, DICCP+3*, DICCP+4*, DICCP+5 |