| NAME |
DSIYUTL1 EQUPDT UPDATE EQUIP |
| TAG |
EQUPDT |
| ROUTINE |
DSIYUTL1 |
| RETURN VALUE TYPE |
ARRAY |
| DESCRIPTION |
DSIYUTL1
- Some information sent as internal/some as external
- DSIYDAT(field#)=Internal Value ^ External Value
- Considered "all or nothing" if there are errors, update does not
happen
- If this is a NEW entry and problems, node will be deleted if created
RPC to validate entries and update the Equipment Management file
^ENG(6914)
ASSUMPTIONS:
- GUI will grab all current data on an edit and return all fields for
EDIT
- GUI will only send fields with new data for an ADD
|
| INPUT PARAMETER |
-
- FORCE
- PARAMETER TYPE: LITERAL
- MAXIMUM DATA LENGTH: 1
- REQUIRED: NO
- SEQUENCE NUMBER: 1
- DESCRIPTION:
FORCE
If sent as "S" forces the system to allow the user to enter a duplicate
serial number.
Not Required - defaults to "" if nothing sent and does nothing.
-
- DSIYDAT
- PARAMETER TYPE: LIST
- MAXIMUM DATA LENGTH: 60
- REQUIRED: YES
- SEQUENCE NUMBER: 2
- DESCRIPTION:
DSIYDAT
Array which contains all of the fields to be updated
DSIYDAT(FIELD#) = INTERNAL^EXTERNAL values for that field.
DSIYDAT(.01) must be the IEN if editing, if blank, it is assumed
to be a new piece of equipment
|
| RETURN PARAMETER DESCRIPTION |
RETURN PARAMETER
WARNING MESSAGES (Note $P(DSIYRET(1),U,1)=1) if all errors are warnings
DSIYRET(2..X)= ^WARNING MESSAGE^WARNING
There can be a mix of CRITICAL and WARNING messages within a return
DSIYRET(1)="1^IEN for successful return"
DSIYRET(1)="-1^Error description" for unsuccessful return
DSIYRET(1)="0^Warning Message" for warnings
CRITICAL ERRORS
DSIYRET(2..X)=FIELD^ERROR MESSAGE^CRITICAL
|
