DSSO ADD INITIAL ACTION NOTE

TITLEVALUE
NAMEDSSO ADD INITIAL ACTION NOTE
DESCRIPTIONThis subroutine adds the initial action note to the Prosthetic Suspense
file and calls UPDCNSLT to update the consult if a consult is specified
in the Consult field of file 668.
Input:
DSSO668 - IEN of Prosthetic Suspense file (#668)
DSSOTXT - Text of Initial Action Note to be stored
Output:
DSSORTN="-1^error message"
Successful Completion:
DSSORTN="1^message"
TAGUPDIANT
ROUTINEDSSOPP6
INPUT PARAMETERSSEQUENCE NUMBER1
INPUT PARAMETERDSSO668
DESCRIPTIONIEN of Prosthetic Suspense (#668)
PARAMETER TYPELITERAL
REQUIREDYES
MAXIMUM DATA LENGTH15

INPUT PARAMETERSSEQUENCE NUMBER2
INPUT PARAMETERDSSOTXT
DESCRIPTIONText of Initial Action Note to be stored
PARAMETER TYPELIST
REQUIREDYES
MAXIMUM DATA LENGTH235

RETURN VALUE TYPESINGLE VALUE
RETURN PARAMETER DESCRIPTIONOutput:
DSSORTN="-1^error message"
Successful Completion: DSSORTN="1^message"
AVAILABILITYAGREEMENT
INACTIVEACTIVE
CLIENT MANAGER
WORD WRAP ON
VERSION
SUPPRESS RDV USER SETUP
APP PROXY ALLOWED