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: PRCHCS2

Package: IFCAP

Routine: PRCHCS2


Information

PRCHCS2 ;WISC/RHD-BUILD LOG CODE SHEET DATA ;12/1/93 09:51

Source Information

Source file <PRCHCS2.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;;Oct 20, 2000
COM ;S PRCHCOM=$S($D(^PRC(441.2,+$P(PRCH2,U,3),0)):$P(^(0),U,4),1:"") Q
NOM
MAX
MAND
M2
DOCID ;SET DOCUMENT IDENTIFIER TO COMMON NO.(PAT) OR REQUISITION NO. IF SOURCE 1 (DEPOT)
AMT ;SET X=AMOUNT ORDERED INCLUDING TERM & TRADE DISCOUNTS, AND SHIPPING/HANDLING CHARGES.
B500 ;POSTED ACQUISITIONS TRX# 630,500,504
B100 ;DLA ACQUISITIONS TRX# 100
B501 ;UNPOSTED ACQUISITION--SOURCE 1 (DEPOT) TRX# 501,505,510,514,515
B700 ;UNPOSTED ACQUISITION--SOURCE 3 (GSA) TRX# 700

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!!,"WARNING--DIETETICS COST PERIOD MISSING--WILL BE SET TO 'N'!!"
  • Line Location: NOM+1
Function Call: WRITE
  • Prompt: $C(7),!!,"NOTE: Possible Source deviation on line/item "_$P(PRCH0,U,1),!
  • Line Location: M2+0
Info |  Source |  Entry Points |  Interaction Calls