Routine: ACRFESS

Information

ACRFESS ;IHS/OIRM/DSD/THL,AEF - EDIT SUPPLY/SERVICE ITEM; [ 11/01/2001 9:44 AM ]

Package	Total	Call Graph
Commitment Register	1	(DDS,DIE,DIR)^ACRFDIC

Package	Total	Caller Graph
Commitment Register	1	ACRFSS1

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: EN1+7
Function Call: WRITE	Prompt: @IOF Line Location: DISP+2
Function Call: WRITE	Prompt: !?18,@ACRON,"SUPPLY/SERVICE ITEM INFORMATION",@ACROF Line Location: DISP+3
Function Call: WRITE	Prompt: !!,"1. QUANTITY REQ'D: ",$G(ACR(1)) Line Location: DISP+4
Function Call: WRITE	Prompt: ?40,"4. NATL STOCK NO.: ",$G(ACR(4)) Line Location: DISP+5
Function Call: WRITE	Prompt: !,"2. UNIT OF ISSUE.: ",$G(ACR(2)) Line Location: DISP+6
Function Call: WRITE	Prompt: ?40,"5. NATL DRUG CODE: ",$G(ACR(5)) Line Location: DISP+7
Function Call: WRITE	Prompt: !,"3. UNIT COST.....: ",$G(ACR(3)) Line Location: DISP+8
Function Call: WRITE	Prompt: ?40,"6. VENDOR PART NO: ",$G(ACR(6)) Line Location: DISP+9
Function Call: WRITE	Prompt: !!,"7. DESCRIPTION:" Line Location: DISP+10
Function Call: WRITE	Prompt: !,"--------------------------------------------------------------------------------" Line Location: DISP+12
Function Call: WRITE	Prompt: !?3 Line Location: D1+1
Function Call: WRITE	Prompt: !?3 Condition for execution: $X+$L(X)>78 Line Location: D1+2
Function Call: WRITE	Prompt: X," " Line Location: D1+2

FileNo	Call Tags
^ACRSS - [#9002193]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^ACRSS - [#9002193]	EN+11, GATHER+1, GATHER+2, GATHER+3, GATHER+4, GATHER+5
^ACRUI - [#9002190.6]	GATHER+8
^AUTTOBJC - [#9999999.59]	EN+5

Name	Field # of Occurrence
ACR	EN+22~
ACR(	DISP+11
ACR("DR"	DIE+2, FIELDS+1, FIELDS+2, FIELDS+3, FIELDS+4, FIELDS+5, FIELDS+6, FIELDS+7*
ACR(1	DISP+4, GATHER+6*
ACR(2	DISP+6, GATHER+8*
ACR(3	DISP+8, GATHER+9*
ACR(4	DISP+5, GATHER+10*
ACR(5	DISP+7, GATHER+11*
ACR(6	DISP+9, GATHER+12*
ACR(7	GATHER+13*
ACR(8	GATHER+14*
ACRFLDS	EN+22~, EN1+6*, EN1+8
ACRJ	EN+22~, D1+2*
ACRJJ	EN+22~, EN1+8*
ACRNEWSS	EN+21!
ACROBJC	EN+2!, EN+3, EN+4, EN+5, EN+6, EXIT!
>> ACROF	DISP+3
>> ACRON	DISP+3
>> ACRQUIT	EN+2, EN+16, EN+24, EN1+5*
ACRSCREN	EN+2, EN+16, EN+20!
ACRSS0	EN+3, EN+22~, GATHER+1*
ACRSS1	EN+22~
>> ACRSSDA	EN+7, EN+11, EN+12, DIE, GATHER+1, GATHER+2, GATHER+3, GATHER+4, GATHER+5
ACRSSDSC	EN+22~, GATHER+3*, GATHER+13
ACRSSDT	EN+22~, GATHER+2*, GATHER+6, GATHER+7, GATHER+9
>> ACRSSNMS	GATHER+4*, GATHER+10, GATHER+11, GATHER+12
ACRSSSPC	EXIT!, GATHER+5*, GATHER+14
>> ACRTXDA	EN+16
ACRX	EN+22~, EN1+8, DIE+2, DISP+11, D1*, D1+2
ACRY	EN+22~, EN1+6
>> DA	EN+7, EN+12, DIE*
>> DIE	EN+8, EN+13, EN+17, DIE+1
>> DIR("A"	EN1+3*
>> DIR(0	EN1+2*
>> DR	EN+9, EN+14, EN+18, DIE+2, DIE+3*
IOF	DISP+2
U	EN+3, EN+5, EN+11, GATHER+6, GATHER+7, GATHER+8, GATHER+9, GATHER+10, GATHER+11, GATHER+12
>> X	DISP+11, D1+2, GATHER+7*, GATHER+8
>> Y	EN1+5