Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PRCHFPDT

Package: IFCAP

Routine: PRCHFPDT


Information

PRCHFPDT ;WISC/RWS-FPDS SCREENS FOR FY89 ;12/20/96 2:02 PM

Source Information

Source file <PRCHFPDT.m>

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IFCAP 1 PRCHAMT89 NEW  

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;**79**;Oct 20, 2000
PREF ;Screen for Pref Prog. Codes
PREF2 ;Z2=COMPETITIVE STATUS/BUSINESS, Z1=PREFERENCE PROGRAM CODE, PRCHN("MB")=METHOD OF BUSINESS
PREFQ
BREAK ;Setting BREAKOUT CODE (# 442.16)
COMP ;template [PRCHAMT89 NEW] calls COMP
COMP2 ;
COMPQ
CHK ; CHECK FOR VARIOUS COMBINATIONS OF 'SOCIOECONOMIC GROUP (FY89)' CODES IN VENDOR FILE.
EX
ERR
D1 ; DISPLAY BREAKOUT CODES BROUGHT FROM VENDOR FILE IN ROUTINE PREF (CALLED FROM INPUT TEMPLATE [PRCHAMT89 NEW])

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Possible Preference Program Codes: "
  • Line Location: PREF+3
Function Call: WRITE
  • Prompt: ","
  • Condition for execution: I
  • Line Location: PREF+4
Function Call: WRITE
  • Prompt: $P(^PRCD(420.6,Y,0),U,1)
  • Line Location: PREF+4
Function Call: WRITE
  • Prompt: !
  • Line Location: PREF+11
Function Call: WRITE
  • Prompt: !!,"Possible Competitive Status/Business codes: "
  • Line Location: COMP+3
Function Call: WRITE
  • Prompt: ","
  • Condition for execution: I
  • Line Location: COMP+4
Function Call: WRITE
  • Prompt: $P(^PRCD(420.6,Y,0),U,1)
  • Line Location: COMP+4
Function Call: WRITE
  • Prompt: !
  • Line Location: COMP+6
Function Call: WRITE
  • Prompt: $C(7),!!,"You CANNOT have a Socioeconomic Group of OO--NONE OF THE OTHER CATEGORIES",!,"in combination with any other Socioeconomic Group",!,"RE-ENTER ALL!!!",!
  • Line Location: CHK+4
Function Call: WRITE
  • Prompt: $C(7),!!,"You CANNOT have the Socioeconomic Group of P--JAVITS-WAGNER-O'DAY",!,"in combination with any LARGE group",!,"RE-ENTER ALL!!!",!
  • Line Location: CHK+5
Function Call: WRITE
  • Prompt: $C(7),!!,"Category RV--SERVICE-DISABLED VETERAN must also include S--VETERAN-OWNED SM BUSINESS",!,"RE-ENTER ALL!!!"
  • Line Location: CHK+6
Function Call: WRITE
  • Prompt: !!,"Following Socioeconomic Group Codes brought over from Vendor File:",!
  • Condition for execution: J=1
  • Line Location: D1+1
Function Call: WRITE
  • Prompt: ?5,$P(X,"^",1)_" "_$P(X,"^",2),!
  • Line Location: D1+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRC(440 - [#440] CHK+2, CHK+3, ERR!
^PRC(442 - [#442] PREF2+6, BREAK+3*, BREAK+4*, BREAK+5*, BREAK+7*, BREAK+8, D1+1
^PRCD(420.6 - [#420.6] PREF+4, PREF+5, PREF2+1, PREF2+2, PREF2+6, BREAK+8, COMP+4, COMP2+1, D1+1

Label References

Name Line Occurrences
COMP2 COMP+4
COMPQ COMP2+1
ERR CHK+2, CHK+4, CHK+5, CHK+6
EX ERR+1
PREF2 PREF+4
PREFQ PREF2+2, PREF2+5, PREF2+8, PREF2+9, PREF2+11, PREF2+12

Naked Globals

Name Field # of Occurrence
^(0 COMP2+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA PREF2+6, BREAK+3, BREAK+4, BREAK+5, BREAK+7, BREAK+8, CHK+2, CHK+3, ERR, D1+1
>> DA(1 PREF2+6
I PREF+4*, BREAK+7*, BREAK+8*, COMP+4*, CHK+3*, EX!, D1+1*
>> J D1+1*
>> PRCHB( BREAK+7
>> PRCHB(0 BREAK+7
>> PRCHDISP PREF+4, PREF+5*
>> PRCHDT PREF2+2, COMP2+1
>> PRCHN("MB" PREF2+11, PREF2+12, COMP2+3
>> PRCHN("TC" BREAK+8*
>> PRCHPO BREAK+3, BREAK+4, BREAK+5, BREAK+7, BREAK+8, D1+1
>> PRCHSC BREAK+2
PRCHTO CHK+1!, EX!
PRCHTO( CHK+3*
PRCHTO(0 CHK+4
PRCHTO(153 CHK+5
PRCHTO(157 CHK+5
PRCHTO(161 CHK+4!
PRCHTO(162 CHK+6
PRCHTO(163 CHK+5
PRCHTO(164 CHK+5
PRCHTO(167 CHK+6
U PREF+4, PREF+5, PREF2+1, PREF2+2, PREF2+6, COMP+4, COMP2+1
>> X D1+1*
>> Y PREF+4*, PREF+5, PREF+10*, PREF2+1, PREF2+2, PREF2+5, COMP+4*, COMP2+1, ERR*
Z PREF+11!, COMP+6!
Z0 PREF2+1*, PREF2+11*, PREF2+12*, PREFQ, PREFQ+1!, COMP2+1*, COMP2+3*, COMPQ, COMPQ+1!
Z1 PREF+11!, PREF2+1*, PREF2+8, PREF2+9, PREF2+12, PREFQ+1!, COMP+6!, COMP2+1*, COMP2+3, COMPQ+1!
>> Z2 PREF2+6*, PREF2+8, PREF2+9
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All