Routine: BARFM

Information

BARFM ; IHS/SD/LSL - USER FM ACCESS TO RESTRICTED FILES MAY 30,1996 ;

Source file <BARFM.m>

Package	Total	Caller Graph
IHS Accounts Receivable	4	BAR FILEMAN DATA DICTIONARIES BAR SEARCH & PRINT BAR SORT & PRINT BARFM

Name	Comments	DBIA/ICR reference
EN	; EP ; FM search or sort files
BAR	;; list of BAR FILES
SELPKG	; ; select package / select file withing package return file number in BARFN
SELFILE	; ; select file
XBFLD	; EP ; do a quick dd file print
SPKG	;
PKG	;;list of name spaces
DIP	; EP ; do a sort/print of a file
DIS	; EP ; do a SEARCH/PRINT of a file

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"DUZ(2) NOT DEFINED",! Line Location: SELPKG+4
Function Call: WRITE	Prompt: !,"You have selected the A/R Transaction file",! Line Location: DIP+6
Function Call: WRITE	Prompt: !,"Would you like an auto screen for:" Line Location: DIP+8
Function Call: WRITE	Prompt: !," 'payments,refunds, & adjustments' set ? ",! Line Location: DIP+9
Function Call: WRITE	Prompt: !,"Screen not set",! Line Location: DIP+14
Function Call: WRITE	Prompt: !,"Screen is set",! Line Location: DIP+16
Routine Call	DIC Line Location: SELPKG+11 SELFILE+9
Routine Call	DIR Line Location: DIP+12

Name	Line Occurrences
SPKG	SELPKG+6

Name	Field # of Occurrence
>> BARFN	SELPKG+2, SELFILE+12, DIP+3, DIP+4, DIP+5, DIS+3, DIS+4
>> BARNS	SELPKG+14*
>> BARPKDA	SELPKG+13*, SELFILE+4
BARS	SELFILE+6!, SPKG+1!
BARS(	SELFILE+7, SPKG+2
DA	SELPKG+7!, SELFILE+2!, SELFILE+11*, SELFILE+12
DA(1	SELFILE+4*
DIC	SELPKG+7!, SELPKG+8, SELFILE+2!, SELFILE+3, SELFILE+12, DIP+4, DIS+4
DIC("S"	SELPKG+10, SELFILE+8
DIC(0	SELPKG+9, SELFILE+3
DIE	SELPKG+7!, SELFILE+2!
DIR	DIP+7!, DIP+13!
DIR("B"	DIP+11*
DIR(0	DIP+10*
>> DIS(0	DIP+15*
DR	SELPKG+7!, SELFILE+2!
DUZ(2	SELPKG+3
>> I	SELFILE+7, SPKG+2
>> X	SELFILE+7, SPKG+2
>> Y	SELPKG+12, SELPKG+13, SELPKG+14, SELFILE+10, SELFILE+11, DIP+14