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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: RCDPEUNB

Package: Accounts Receivable

Routine: RCDPEUNB


Information

RCDPEUNB ;AITC/CJE - ePayments - Flag/Unflag Unbalanced EDI Lockbox Deposit

Source Information

Source file <RCDPEUNB.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; Entry Point from menu
LOOP ;
NEXT ;
ULIST ; Write out a list of unbalanced deposits to the screen
LIST(IX,VALUE,PROMPT) ; List unbalance EDI Lockbox deposits
; Inputs : IX - Index to use for look-up
; VALUE - Lookup Value on index to display
; PROMPT - Prompt for display
; Return : Internal entry number for 344.3 (or 0 if nothing selected, or '^', or timeout)
LISTQ ;
DISPLAY(IEN,C) ; Display an EDI Lockbox deposit
; Input - IEN - Internal entry number from 344.3
; C - Order number to display

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: #
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !,"Select EDI LOCKBOX DEPOSIT NUMBER: "
  • Line Location: LOOP+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: LOOP+2
Function Call: WRITE
  • Prompt: !!,"** Invalid Deposit Number **"
  • Line Location: LOOP+7
Function Call: WRITE
  • Prompt: !
  • Line Location: NEXT+6
Function Call: WRITE
  • Prompt: !,"** No EDI Lockbox Deposits currently flagged as unbalanced **"
  • Line Location: ULIST+3
Function Call: WRITE
  • Prompt: !
  • Line Location: ULIST+5
Function Call: WRITE
  • Prompt: !,"Deposit Number",?20,"Depsosit Date",?40,"Amount"
  • Line Location: ULIST+6
Function Call: WRITE
  • Prompt: !
  • Line Location: ULIST+9
Function Call: WRITE
  • Prompt: $$GET1^DIQ(344.3,IEN_",",.06,"E"),?20
  • Line Location: ULIST+10
Function Call: WRITE
  • Prompt: $$GET1^DIQ(344.3,IEN_",",.07,"E"),?34
  • Line Location: ULIST+11
Function Call: WRITE
  • Prompt: $J($$GET1^DIQ(344.3,IEN_",",.08,"E"),12,2)
  • Line Location: ULIST+12
Function Call: WRITE
  • Prompt: !
  • Line Location: ULIST+13
Function Call: WRITE
  • Prompt: !,"Answer with EDI LOCKBOX DEPOSIT NUMBER, or DEPOSIT NUMBER",!
  • Line Location: LIST+9
Function Call: WRITE
  • Prompt: !," Choose from:"
  • Line Location: LIST+16
Function Call: WRITE
  • Prompt: !!,"No entries matching the search value. Hit <RETURN> to continue:"
  • Line Location: LIST+23
Function Call: WRITE
  • Prompt: !
  • Line Location: LIST+25
Function Call: WRITE
  • Prompt: !
  • Line Location: LIST+32
Function Call: WRITE
  • Prompt: !
  • Line Location: LIST+32
Function Call: WRITE
  • Prompt: !,C,?3,$$GET1^DIQ(344.3,IEN_",",.06,"E")
  • Line Location: DISPLAY+5
Function Call: WRITE
  • Prompt: ?13,XX
  • Line Location: DISPLAY+9
Function Call: WRITE
  • Prompt: ?25,$J("$"_$FN($$GET1^DIQ(344.3,IEN_",",.08,"E"),"",2),12)
  • Line Location: DISPLAY+10
Function Call: WRITE
  • Prompt: ?45,$$GET1^DIQ(344.3,IEN_",",.15,"E")
  • Line Location: DISPLAY+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RCY(344.3 - [#344.3] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call