;EP -- IS THIS A REQUEST FOR CREDIT CARD PURCHASE/PAY WITH CC
; INPUT X = DOCUMENT IEN
; OUTPUT Y = IS THERE A FORM?
; 1 = YES
; 0 = NO
NAME(X)
;EP -- RETURNS EXTERNAL PERSON FILE 200 NAME ;ACR*2.1*5.15
OBJDA(X)
;EP -- RETURNS IEN OF OBJECT CLASS CODE ;ACR*2.1*16.06 IM15505
STRIPLB(X)
;EP - STRIP LEADING BLANKS FROM STRING - ACR*2.1*20.14
NAME3(X)
;EP; EXTRINSIC FUNCTION ;ACR*2.1*19.02 IM16848
; X = IEN TO NEW PERSON FILE
; RETURNS NAME IN FIRST MIDDLE LAST SUFFIX DEGREE FORMAT
; FROM NAME COMPONENTS FILE
STRIPTB(X)
;EP - STRIP TRAILING BLANKS FROM STRING - ACR*2.1*20.14
PA(X)
;EP -- PURCHASING AGENT
FORM(X)
;EP -- IS THERE A FORM FOR THIS INPUT TEMPLATE?
; INPUT X = DR (Input Template and Form name should be the same)
; OUTPUT Y = IS THERE A FORM?
; 1 = YES
; 0 = NO
NAMEFT(X)
;EP; EXTRINSIC FUNCTION
; X = FREE TEXT NAME
; ATTEMPTS TO RETURN LAST,FIRST
NAME2(X)
;EP; EXTRINSIC FUNCTION ;ACR*2.1*19.02 IM16848
; X = IEN TO NEW PERSON FILE
; RETURNS NAME IN LAST,FIRST MIDDLE SUFFIX DEGREE FORMAT
; FROM NAME COMPONENTS FILE
FYFUN(X)
;EP -- RETURNS FISCAL YEAR OF FUNDS ; ACR*2.1*13.05 IM10810
NOTA(X)
;----- ALLOW/DISALLOW TRAVEL ADVANCE
; USED BY INPUT TRANSFORM ON FMS DOCUMENT FIELD TRAVEL ADVANCE
; ALLOWED
SCREEN()
;EP -- RETURNS IF USER CAN USE SCREENMAN
; INPUT none
; OUTPUT Y = USER USE SCREENMAN?
; 1 = YES
; 0 = NO