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

Package: IFCAP

Routine: PRCFAC31


Information

PRCFAC31 ;WISC/SJG-CONTINUATION OF FISCAL VENDOR EDIT ;12/12/94 15:52

Source Information

Source file <PRCFAC31.m>

Entry Points

Name Comments DBIA/ICR reference
GET(VEN) ; Retrieve Vendor Payment Information from File 440
DISPLAY(VEN) ; Display Vendor Payment Information
EDIT ; Prompt to edit

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DISPLAY+1
Function Call: WRITE
  • Prompt: !,IOINHI,"Payment Information",IOINORM,!
  • Line Location: DISPLAY+2
Function Call: WRITE
  • Prompt: !?2,IOINHI,"Vendor Name: ",IOINORM,$G(PRCTMP(440,VEN,.01,"E"))
  • Line Location: DISPLAY+3
Function Call: WRITE
  • Prompt: !,IOINHI,"Vendor Number: ",IOINORM,VEN
  • Line Location: DISPLAY+4
Function Call: WRITE
  • Prompt: ?40,IOINHI,"Non-Recurring/Recurring: ",IOINORM,$S($G(PRCTMP(440,VEN,36,"I"))="N":"NON-RECURRING",1:"RECURRING")
  • Line Location: DISPLAY+5
Function Call: WRITE
  • Prompt: !!,IOINHI,?17,"FMS Vendor Code: ",IOINORM,$G(PRCTMP(440,VEN,34,"E"))
  • Line Location: DISPLAY+6
Function Call: WRITE
  • Prompt: !,?5,IOINHI,"Alternate Address Indicator: ",IOINORM,$G(PRCTMP(440,VEN,35,"E"))
  • Line Location: DISPLAY+7
Function Call: WRITE
  • Prompt: !!,?5,IOINHI,"Address: ",IOINORM
  • Line Location: DISPLAY+8
Function Call: WRITE
  • Prompt: ?14,$G(PRCTMP(440,VEN,17.3,"E")),!
  • Line Location: DISPLAY+9
Function Call: WRITE
  • Prompt: ?14,$G(PRCTMP(440,VEN,17.4,"E")),!
  • Line Location: DISPLAY+10
Function Call: WRITE
  • Prompt: ?14,$G(PRCTMP(440,VEN,17.5,"E")),!
  • Line Location: DISPLAY+11
Function Call: WRITE
  • Prompt: ?14,$G(PRCTMP(440,VEN,17.6,"E")),!
  • Line Location: DISPLAY+12
Function Call: WRITE
  • Prompt: ?14,$G(PRCTMP(440,VEN,17.7,"E"))
  • Line Location: DISPLAY+13
Function Call: WRITE
  • Prompt: " ",$G(PRCTMP(440,VEN,17.9,"E")),!!
  • Line Location: DISPLAY+18
Function Call: WRITE
  • Prompt: !?5,IOINHI,"Payment Contact Person: ",IOINORM,$G(PRCTMP(440,VEN,17,"E"))
  • Line Location: DISPLAY+19
Function Call: WRITE
  • Prompt: !?22,IOINHI,"Phone: ",IOINORM,?14,$G(PRCTMP(440,VEN,17.2,"E")),!
  • Line Location: DISPLAY+20
Function Call: WRITE
  • Prompt: !
  • Line Location: EDIT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EDIT+6
Info |  Source |  Entry Points |  Interaction Calls