Sub-Field: 48.08

Parent File	Name	Number	Package
MAS RELEASE NOTES(#48)	OBSOLETE ROUTINE	48.08	Registration

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	OBSOLETE ROUTINE	0;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<2)!(X["*") X` LAST EDITED: `AUG 21, 1989` HELP-PROMPT: `ANSWER MUST BE 3-15 CHARACTERS IN LENGTH. NO ASTERISKS ALLOWED.` DESCRIPTION: `Any obsolete routine that will be deleted (not released) as a result of changes in the associated Version number.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `48.08^B` `1)= S ^DG(48,DA(1),"DR","B",$E(X,1,30),DA)=""` `2)= K ^DG(48,DA(1),"DR","B",$E(X,1,30),DA)`
.02	OBSOLETE WITH VERSION#	0;2	POINTER TO MAS RELEASE NOTES FILE (#48)	**********************REQUIRED FIELD********************** MAS RELEASE NOTES(#48) LAST EDITED: `JUL 25, 1988` DESCRIPTION: `The Version # that the obsolete routines will be deleted and not longer released with the MAS software.`

OBSOLETE ROUTINE

0;1

FREE TEXT

INPUT TRANSFORM: K:$L(X)>15!($L(X)<2)!(X["*") X
LAST EDITED: AUG 21, 1989
HELP-PROMPT: ANSWER MUST BE 3-15 CHARACTERS IN LENGTH. NO ASTERISKS ALLOWED.
DESCRIPTION:
Any obsolete routine that will be deleted (not released) as a result of changes in the associated Version number.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 48.08^B
1)= S ^DG(48,DA(1),"DR","B",$E(X,1,30),DA)=""
2)= K ^DG(48,DA(1),"DR","B",$E(X,1,30),DA)

OBSOLETE WITH VERSION#

0;2

POINTER TO MAS RELEASE NOTES FILE (#48)

************************REQUIRED FIELD************************

LAST EDITED: JUL 25, 1988
DESCRIPTION:
The Version # that the obsolete routines will be deleted and not longer released with the MAS software.