Routine: XUREMAP1

Information

XUREMAP1 ;VISS/CEP - Remote Application Registration ; JAN 15, 2025

Name	Comments	DBIA/ICR reference
GETCNTXT(OUTCTXT,XUCONTXT,OUTINDEX)
GETFLNUM(XUARR)	; Function returns filenumber from input ^ file name ^ location in array ;
INSPLIT(INARR,ARRM,SUB)
FORMAT(RETURN,TOPLEVEL,MULTIPLE,CNTXTM)
TOPLEVEL(RETURN,TOPLEVEL,MULTIPLE,RACNT,INDEX,TOPIEN)
CONTEXT(RETURN,CNTXTM,INDEX,TOPIEN)	; ; ADD context option (file #19) top level...
ADDELEM(ARRAY,FILE,FLDNUM,EVALUE,INDEX)	; ; Set a line in the return array ; ADD a line (ELEMent) to the return array
FAUXFL(XUTEST,NAME,XUARR,XUARRM)
FAUXNM(NAME)	; Return a name to test filing that is unique.
REMOVE(XURET,XUNAME,FILENUM)
ADDRA(XURET,XUARR,XUARRM,XURAIEN)	; implementation of ADDRA^XUREMAP
FDARA(XUARR,FDA,REPLACE)	; convert XUARR to FDA for REMOTE APP ; pass by reference
FDACBM(XUARRM,FDA)	; Add CALLBACKTYPE to known Remote app entry
FINDOPT(OPT)	; find option OPT
ADDEP(XURET,XUARR,FDAIEN)	; implementation of ADDEP^XUREMAP
FDAEP(XURET,XUARR,FDAIEN)	; convert XUARR to FDA for ENDPOINT ; pass by reference
LOGNORPC(RET,RPCNM,FILENO)	;
FINDRPC(RPNM)	;
SETOPT(XURET,FDA,FDAIEN)	; find or add option entry ; pass by reference
ADDRA2(XURET,XUARR)	; implementation of ADDRA^XUREMAP
FDACBM2(XUARRM,FDA)	; Add CALLBACKTYPE to known Remote app entry
ISFLDWP(FILENO,FIELDNO)	; ; function return true if input field is a word processing multiple?
CHKAEPIN(XURET,XUARR)	;