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

Package: IFCAP

Routine: PRCHP18


Information

PRCHP18 ;SF/FKV-PRINT REQUEST FOR QUOTATIONS--STANDARD FORM 18 ;7/21/99 13:35

Source Information

Source file <PRCHP18.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 3 DD^%DT  NOW^%DTC  EN^DIQ1  
IFCAP 2 FTYP1^PRCHFPNT  EN^PRCHP181  
Kernel 1 KILL^%ZTLOAD  

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

Package Total Caller Graph
IFCAP 2 PRCHP182  PRCHRPT7  

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;;Oct 20, 2000
EN
RDV
ENDRPT
EXIT

External References

Name Field # of Occurrence
DD^%DT EN+9
NOW^%DTC EN+9
KILL^%ZTLOAD EN
EN^DIQ1 RDV+16
FTYP1^PRCHFPNT EN+3
EN^PRCHP181 RDV+39

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"**** MISSING SITE ADDRESS--SITE "_SITE_" PROGRAM PRCHP18 **** !!!"
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: $C(13)
  • Line Location: EN+11
Function Call: WRITE
  • Prompt: !!,"*** MISSING REQUEST NUMBER "_PRCHD0_" -- PROGRAM PRCHP18 ***"
  • Line Location: RDV+2
Function Call: WRITE
  • Prompt: !!,"*** MISSING VENDOR NUMBER "_PRCHVCNT_" -- PROGRAM PRCHP18 ***"
  • Line Location: RDV+4
Function Call: WRITE
  • Prompt: !!,"*** MISSING P.A. INFORMATION FOR REQUEST "_$P(^PRCS(410,PRCHD0,0),U,1)_" ***"
  • Line Location: RDV+10
Function Call: WRITE
  • Prompt: @IOF,?65,"FORM APPROVED OMB NO. 2900-0445",!,PRCHUNDL,!,"REQUEST FOR QUOTATIONS |",?28,"The Notice of Small Business-Small Purchase Set-Aside",?82,"|",?85,"PAGE OF PAGES",!
  • Line Location: RDV+21
Function Call: WRITE
  • Prompt: ?1,"(this is not an order)",?25,"|",?29,"on the last page of this form",?82,"|",?90,"|",!,?25,"|",?28,"_____is _____is not applicable.",?82,"| 1",?90,"|",!
  • Line Location: RDV+22
Function Call: WRITE
  • Prompt: $E(PRCHUNDL,1,25),"|",$E(PRCHUNDL,1,56),"|",$E(PRCHUNDL,1,7),"|",$E(PRCHUNDL,1,7),!
  • Line Location: RDV+23
Function Call: WRITE
  • Prompt: "1.REQUEST NO.",?14,"|2.DATE ISSUED",?30,"|3.REQUISITION/PURCHASE REQUEST",?63,"|4.CERT.FOR NAT.DEF.",?84,"|RATING",!
  • Line Location: RDV+24
Function Call: WRITE
  • Prompt: ?14,"|",?30,"|",?33,"NO.",?63,"|",?66,"UNDER BDSA REG.2",?84,"|",!
  • Line Location: RDV+25
Function Call: WRITE
  • Prompt: ?14,"|",?16,PRCHDT,?30,"|",?36,$P(^PRCS(410,PRCHD0,0),U,1),?63,"|",?66,"AND/OR DMS REG.1->",?84,"|",!
  • Line Location: RDV+26
Function Call: WRITE
  • Prompt: $E(PRCHUNDL,1,14)_"|"_$E(PRCHUNDL,1,15)_"|"_$E(PRCHUNDL,1,32)_"|"_$E(PRCHUNDL,1,20),"|",$E(PRCHUNDL,1,13),!
  • Line Location: RDV+27
Function Call: WRITE
  • Prompt: "5A.ISSUED BY",?14,PRCHS(1),?63,"|6.DELIVER BY (Date)",!
  • Line Location: RDV+28
Function Call: WRITE
  • Prompt: ?14,PRCHS(2),?63,"|",!,?14,PRCHS(3),?63,"| ",PRCHDT2,!,?14,PRCHS(4),?63,"|",$E(PRCHUNDL,1,34),!,$E(PRCHUNDL,1,63)_"|7.DELIVERY",!
  • Line Location: RDV+29
Function Call: WRITE
  • Prompt: "5B.FOR INFORMATION CALL:(Name & phone no.) (No collect calls)",?63,"|(Unless otherwise specified)"
  • Line Location: RDV+30
Function Call: WRITE
  • Prompt: !,?4,$G(PRCHPA)," PHONE: ",$G(PRCHPAP),?63,"|",?68,"FOB",?84,"OTHER",!
  • Line Location: RDV+31
Function Call: WRITE
  • Prompt: ?9,"FAX: ",$G(PRCPAFAX),?63,"|",?64,"_X__DESTINATION",?80,"____(See Schedule)",!
  • Line Location: RDV+32
Function Call: WRITE
  • Prompt: "E-MAIL: ",PRCEMAIL
  • Condition for execution: $G(PRCEMAIL)]""
  • Line Location: RDV+33
Function Call: WRITE
  • Prompt: ?63,"|",!
  • Line Location: RDV+33
Function Call: WRITE
  • Prompt: $E(PRCHUNDL,1,63),"|",$E(PRCHUNDL,1,34),!
  • Line Location: RDV+34
Function Call: WRITE
  • Prompt: "8.TO: NAME AND ADDRESS, INCLUDING ZIP CODE",?63,"|9.DESTINATION (Consignee and ad-",!
  • Line Location: RDV+35
Function Call: WRITE
  • Prompt: ?10,PRCHV(1),?63,"|",?69,"dress, including ZIP code)",!
  • Line Location: RDV+36
Function Call: WRITE
  • Prompt: ?10,PRCHV(I),?63,"| ",PRCHD(I-1),!
  • Line Location: RDV+36
Function Call: WRITE
  • Prompt: "PHONE: "_$G(PRCHVPH),?32,"FAX: "_$G(PRCHVFX),?63,"|",!
  • Line Location: RDV+37
Function Call: WRITE
  • Prompt: $E(PRCHUNDL,1,63),"|",$E(PRCHUNDL,1,34),!
  • Line Location: RDV+38

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(5 - [#5] EN+5, EN+8, RDV+7
^PRC(411 - [#411] EN+1, EN+4
^PRC(440 - [#440] RDV+4, RDV+8
^PRC(443 - [#443] RDV+10, RDV+12
^PRCS(410 - [#410] RDV+2, RDV+10, RDV+26
^TMP($J EN+7, RDV+1, EXIT+1!
^UTILITY("DIQ1" RDV+15!, RDV+19!

Label References

Name Line Occurrences
EXIT EN+1, EN+11
RDV EN+11, RDV+2, RDV+4, RDV+10, ENDRPT

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D EN+7*, EN+8!
D0 EXIT!
DA RDV+14~, RDV+16*, RDV+17, RDV+18
DIC RDV+14~, RDV+16*
DIQ RDV+14~, RDV+16*
DIQ(0 RDV+16*
DR RDV+14~, RDV+16*
I EN*, EN+4*, EN+5*, EN+7*, EN+8*, RDV+6*, RDV+7*, RDV+36*, EXIT+1!
IOF RDV+21
J EN+4*, EN+5*, EN+7*, EN+8*, RDV+6*, RDV+7*, EXIT+1!
K EXIT+1!
P EXIT!
>> PRC("SITE" EN
PRCEMAIL RDV+11~, RDV+18*, RDV+33
PRCHCNT EXIT!
PRCHD EN+7!, EXIT!
PRCHD( EN+7*, EN+8*, RDV+36
PRCHD(5 RDV+38
PRCHD0 RDV+2, RDV+10, RDV+12, RDV+26, EXIT!
PRCHDT EN+9*, RDV+26, EXIT!
PRCHDT1 EN+9*, EXIT!
PRCHDT2 EN+9*, RDV+29, EXIT!
PRCHDY EXIT+1!
PRCHFL EXIT+1!
PRCHFTYP EN+4, EXIT!
PRCHI EXIT!
PRCHIMAS EXIT!
PRCHIOP EXIT!
PRCHITEM EXIT!
PRCHLI EXIT+1!
PRCHNSN EXIT+1!
PRCHPA RDV+11~, RDV+17*, RDV+31, EXIT!
PRCHPAGE RDV+20*, EXIT!
PRCHPAP RDV+11~, RDV+17*, RDV+31, EXIT+1!
PRCHPM EXIT!
PRCHQTY EXIT!
PRCHS EN+4!, EXIT+1!
PRCHS( EN+4*, EN+5*
PRCHS(1 EN+4*, RDV+28
PRCHS(2 RDV+29
PRCHS(3 RDV+29
PRCHS(4 RDV+29
PRCHUNDL EN*, RDV+21, RDV+23, RDV+27, RDV+29, RDV+34, RDV+38, EXIT!
PRCHUNIT EXIT!
PRCHUP EXIT+1!
PRCHV RDV+6!, EXIT+1!
PRCHV( RDV+6*, RDV+7*, RDV+36
PRCHV(1 RDV+36
PRCHVCNT EN+11*, RDV+1*, RDV+4, RDV+8, EXIT+1!
PRCHVFX RDV~, RDV+9*, RDV+37
PRCHVPH RDV~, RDV+5*, RDV+37
PRCHVS EXIT+1!
PRCHX EXIT!
PRCPAFAX RDV+11~, RDV+18*, RDV+32
PRCX RDV+14~
PRCX(200 RDV+17, RDV+18
S EN+4*, EN+5!, EXIT+1!
>> SITE EN+1, EN+4
U EN*, EN+4, EN+5, EN+7, EN+8, RDV+5, RDV+6, RDV+7, RDV+9, RDV+10
, RDV+12, RDV+26
V RDV+4*, RDV+5, RDV+6, RDV+7!
VENTENOD RDV~, RDV+8*, RDV+9
X EN+9, RDV+12*, RDV+13, RDV+16, EXIT+1!
Y EN+9*, EXIT+1!
ZTSK EN!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All