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

Package: IFCAP

Routine: PRCPUMAN


Information

PRCPUMAN ;WISC/RFJ/DGL-lookup for mand source field .4 file 445 ; 7/22/99 1:49pm

Source Information

Source file <PRCPUMAN.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
IFCAP 1 $$MANDSRCE^PRCPU441  

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 PRCPEIPS  

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;;Oct 20, 2000
HELP(INVPT,ITEMDA,SCREEN) ; called from help (node 4 for dd(445.01,.4, )
; to display mandatory source.
; screen=1 to lookup in screen for procurement source in 445.07
; optional prc("cp"),prc("site")
SCREEN(INVPT,ITEMDA,SCREEN1) ; called from input transform for dd(445.01,.4,
; x=vendor name, y=vendor number,
; dic=file 440 or 445 it should lookup on
; screen1=1 to lookup in screen for procurement source in 445.07
; if vendor y fails -->> flag=0 and $t=0
  • ICR #6580
    • Status: Active
    • Usage: Private
    END

    External References

    Name Field # of Occurrence
    $$MANDSRCE^PRCPU441 HELP+6, SCREEN+8

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !
    • Line Location: HELP+9
    Function Call: WRITE
    • Prompt: !!
    • Line Location: HELP+9
    Function Call: WRITE
    • Prompt: !,"ITEM IS NOT SET UP AS POSTED STOCK. THE MANDATORY SOURCE IN THE ITEM MASTER",!,"FILE DOES NOT EQUAL THE WAREHOUSE VENDOR."
    • Line Location: HELP+10
    Function Call: WRITE
    • Prompt: !,"LAST VENDOR ORDERED: ",%
    • Line Location: HELP+11
    Function Call: WRITE
    • Prompt: !,"PREFERRED VENDOR (FOR CP: ",CP,"): ",%
    • Line Location: HELP+12
    Function Call: WRITE
    • Prompt: !,"YOU MAY SELECT ANY VENDOR WHICH IS SET UP AS A VENDOR FOR THIS ITEM IN THE ITEM",!,"MASTER FILE"
    • Line Location: HELP+13
    Function Call: WRITE
    • Prompt: $S(SCREEN:", AND IS A PROCUREMENT SOURCE FOR THIS ITEM IN THE INVENTORY POINT.",1:". ")
    • Line Location: HELP+14
    Function Call: WRITE
    • Prompt: !
    • Condition for execution: SCREEN
    • Line Location: HELP+14
    Function Call: WRITE
    • Prompt: "THE VENDOR ALSO MUST NOT BE INACTIVATED."
    • Line Location: HELP+14
    Function Call: WRITE
    • Prompt: !!
    • Line Location: HELP+15
    Function Call: WRITE
    • Prompt: !,"ITEM HAS A MANDATORY SOURCE: ",$P($G(^PRC(440,+MANSRCE,0)),"^"),".",!,"YOU CAN ONLY SELECT THIS VENDOR."
    • Line Location: HELP+16
    Function Call: WRITE
    • Prompt: !,"LAST VENDOR ORDERED: ",%
    • Line Location: HELP+17
    Function Call: WRITE
    • Prompt: !,"PREFERRED VENDOR (FOR CP: ",CP,"): ",%
    • Line Location: HELP+18
    Function Call: WRITE
    • Prompt: !,"YOU MAY SELECT ANY VENDOR WHICH IS SET UP AS A VENDOR FOR THIS ITEM IN THE ITEM",!,"MASTER FILE, AND IS A PROCUREMENT SOURCE FOR THIS ITEM IN THE INVENTORY POINT.",!,"THE VENDOR ALSO MUST NOT BE INACTIVATED."
    • Line Location: HELP+19
    Function Call: WRITE
    • Prompt: !!
    • Line Location: HELP+20
    Function Call: WRITE
    • Prompt: !,"YOU CAN ONLY SELECT A PRIMARY DISTRIBUTION POINT WHICH DISTRIBUTES THIS ITEM."
    • Line Location: HELP+21

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^PRC(420 - [#420] HELP+8
    ^PRC(440 - [#440] HELP+10, HELP+11, HELP+12, HELP+16, HELP+17, HELP+18, SCREEN+11
    ^PRC(441 - [#441] HELP+11, HELP+12, HELP+17, HELP+18
    ^PRCP(445 - [#445] HELP+6, HELP+7, SCREEN+8, SCREEN+19

    Label References

    Name Line Occurrences
    END SCREEN+7, SCREEN+10, SCREEN+14

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % HELP+5~, HELP+11*, HELP+12*, HELP+17*, HELP+18*, SCREEN+5~
    CP HELP+5~, HELP+8*, HELP+12, HELP+18
    >> DIC SCREEN+8
    FLAG SCREEN+5~, SCREEN+6*, SCREEN+7*, SCREEN+11*, SCREEN+12*, SCREEN+13*, SCREEN+16*, SCREEN+17*, SCREEN+20*, END
    INVPT HELP~, HELP+4, HELP+6, HELP+7, HELP+8, SCREEN~, SCREEN+7, SCREEN+8, SCREEN+19
    ITEMDA HELP~, HELP+4, HELP+6, HELP+11, HELP+12, HELP+17, HELP+18, SCREEN~, SCREEN+7, SCREEN+8
    , SCREEN+19
    LOOKUP SCREEN+5~, SCREEN+8*, SCREEN+19
    MANSRCE HELP+5~, HELP+6*, HELP+10, HELP+16, SCREEN+5~, SCREEN+8*, SCREEN+11, SCREEN+12, SCREEN+15, SCREEN+16
    >> PRC("CP" HELP+8
    >> PRC("SITE" HELP+7
    SCREEN HELP~, HELP+14, SCREEN+5~, SCREEN+9*, SCREEN+13, SCREEN+17
    SCREEN1 SCREEN~, SCREEN+9
    SITE HELP+5~, HELP+7*, HELP+8, HELP+12, HELP+18
    TYPE HELP+5~, HELP+6*, HELP+9, HELP+15, HELP+20, SCREEN+5~, SCREEN+8*, SCREEN+10, SCREEN+14, SCREEN+18
    >> Y SCREEN+12, SCREEN+15, SCREEN+19
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All