Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: PRCHNPO2

Package: IFCAP

Routine: PRCHNPO2


Information

PRCHNPO2 ;WISC/RSD/RHD-CONT. OF NEW PO ;12/1/93 09:41

Source Information

Source file <PRCHNPO2.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;**16**;Oct 20, 2000
EN1 ;ASK REQUEST NUMBER FOR IMPREST FUND INPUT TEMPLATE
EN2 ;SCREEN FOR BREAKOUT CODE IN FILE 442
EN2Q
EN2Z
EN3 ;DISPLAYS BREAKOUT CODES,CALLED FROM TEMPLATE PRCHAMT
EN4 ;CALLED FROM PRCHNPO3, ADDS COMMENTS
LST1
Q
EN6 ;DISPLAYS BUSINESS SIZE,CALLED FROM PRCHNPO1
EN7 ;SCREEN OF TYPE CODE
  • ICR #6639
    • Status: Active
    • Usage: Private
    EN7Q
    QQ

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !?3,"Possible Breakout Codes: "
    • Line Location: EN3+2
    Function Call: WRITE
    • Prompt: ","
    • Condition for execution: I
    • Line Location: EN3+3
    Function Call: WRITE
    • Prompt: $P(^PRCD(420.6,Y,0),U,1)
    • Line Location: EN3+3
    Function Call: WRITE
    • Prompt: !
    • Line Location: EN3+4
    Function Call: WRITE
    • Prompt: !
    • Line Location: LST1+3
    Function Call: WRITE
    • Prompt: !?3,"Business Type is undefined for this vendor!",$C(7)
    • Line Location: EN6+6
    Function Call: WRITE
    • Prompt: !?3,"BUSINESS TYPE: ",PRCHN("MB")
    • Line Location: EN6+7
    Function Call: WRITE
    • Prompt: !!,$$ERR^PRCHQQ(ROUTINE,PRCSIG)
    • Line Location: QQ+0
    Function Call: WRITE
    • Prompt: !,"Notify Application Coordinator!",$C(7)
    • Condition for execution: PRCSIG=0!(PRCSIG=-3)
    • Line Location: QQ+0
    Info |  Source |  Entry Points |  Interaction Calls