ACRFUTL1 ;IHS/OIRM/DSD/AEF - VARIOUS UTILITY SUBROUTINES [ 07/20/2006 8:00 AM ]
Source file <ACRFUTL1.m>
| Package | Total | Call Graph | 
|---|---|---|
| Commitment Register | 2 | $$UPPER^ACRFUTL $$NAME2^ACRFUTL1 | 
| Kernel | 1 | $$NAMEFMT^XLFNAME1 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| CC(X) | ;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 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^ACRAU - [#9002185.3] | SCREEN+10 | 
| ^ACRDOC - [#9002196] | NOTA+15, NOTA+18, PA+6, CC+7 | 
| ^ACRLOCB - [#9002188] | FYFUN+6 | 
| ^ACRSYS(1 | SCREEN+7, SCREEN+9 | 
| ^AUTTCAN - [#9999999.57] | NOTA+19 | 
| ^AUTTOBJC("C" | OBJDA+6 | 
| ^DIST( | FORM+9 | 
| ^VA(20 - [#20] | NAME2+21, NAME2+23 | 
| ^VA(200 - [#200] | NAME2+17 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ACRCAN | NOTA+11~, NOTA+18*, NOTA+19* | 
| ACRLEN | STRIPTB+1~, STRIPTB+3, STRIPTB+5*, STRIPTB+6, STRIPLB+1~, STRIPLB+3*, STRIPLB+4, STRIPLB+6 | 
| DUZ | SCREEN+10 | 
| I | STRIPTB+1~, STRIPTB+3*, STRIPTB+4, STRIPTB+5, STRIPLB+1~, STRIPLB+4*, STRIPLB+5, STRIPLB+6 | 
| P1 | NAMEFT+4~, NAMEFT+15*, NAMEFT+16 | 
| P2 | NAMEFT+4~, NAMEFT+14*, NAMEFT+16 | 
| PL | NAMEFT+4~, NAMEFT+11*, NAMEFT+13*, NAMEFT+14, NAMEFT+15 | 
| U | NOTA+15, NOTA+18, NOTA+19, NAME2+17, NAME2+23, FYFUN+6, SCREEN+9, SCREEN+10, PA+6, CC+7 | 
| X | NOTA~, NOTA+15, NOTA+18, NAME~, NAME+7, NAME2~, NAME2+5, NAME2+10, NAME3~, NAME3+5 , NAME3+10, NAMEFT~, NAMEFT+6, NAMEFT+7, NAMEFT+8, NAMEFT+9*, NAMEFT+10, NAMEFT+11, NAMEFT+12, NAMEFT+13* , NAMEFT+14, NAMEFT+15, FYFUN~, FYFUN+6, OBJDA~, OBJDA+6, FORM~, FORM+7, FORM+8*, FORM+9 , PA~, PA+6, STRIPTB~, STRIPTB+2, STRIPTB+3, STRIPTB+4, STRIPTB+6*, STRIPTB+7, STRIPLB~, STRIPLB+2 , STRIPLB+3, STRIPLB+4, STRIPLB+5, STRIPLB+6*, STRIPLB+7, CC~, CC+7 | 
| XUNAME | NAME2+7!, NAME2+13, NAME3+7!, NAME3+13 | 
| XUNAME("FIELD" | NAME2+9*, NAME2+21, NAME3+9* | 
| XUNAME("FILE" | NAME2+8*, NAME2+21, NAME3+8* | 
| XUNAME("IENS" | NAME2+10*, NAME2+17, NAME2+21, NAME3+10* | 
| Y | NOTA+11~, NOTA+12*, NOTA+15*, NOTA+22, NAME+4~, NAME+5*, NAME+7*, NAME+8, NAME2+6~, NAME2+13* , NAME2+16, NAME2+17*, NAME2+18*, NAME2+20, NAME2+24, NAME2+25*, NAME2+26, NAME3+6~, NAME3+13*, NAME3+14 , NAMEFT+4~, NAMEFT+5*, NAMEFT+6, NAMEFT+7, NAMEFT+8, NAMEFT+16*, NAMEFT+17, FYFUN+4~, FYFUN+5*, FYFUN+6* , FYFUN+7, OBJDA+4~, OBJDA+5*, OBJDA+6*, OBJDA+7, SCREEN+5~, SCREEN+6*, SCREEN+7*, SCREEN+8, SCREEN+11* , SCREEN+12, FORM+5~, FORM+6*, FORM+9*, FORM+10, PA+4~, PA+5*, PA+6*, PA+7, CC+5~ , CC+8*, CC+9 | 
| YY | NAME2+6~, NAME2+24*, NAME2+25 | 
| Z | NAME+4~, NAME2+6~, NAME2+21*, NAME2+22, NAME2+23*, NAME2+24, NAME2+25, CC+5~, CC+6*, CC+7* , CC+8 |