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

Package: Wounded Injured and Ill Warriors

Routine: WIILM01


Information

WIILM01 ;VISN20/WDE/WHN - WII List Manager Actions ; 21-JUN-2008

Source Information

Source file <WIILM01.m>

Entry Points

Name Comments DBIA/ICR reference
TR ; mark entry as approved for submission to DFAS
PL ; print delimited list of all records in current list for export spread sheet
; using WIIY to $Order through LM "IDX" list x-ref set WIIEN to the file IEN and WIINODE to
; the zer0th node of the entry. Build delimited "^" file with DFAS info to export.
RM ; set status field to not approved and remove from displayed list
PD ; reset status to pending from approved
PD3 ; reset status to pending from deleted
FILE(DA,STATUS) ; file status change
ZAP ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Record"_$S(WIIX>1:"s ",1:" "),WIIY," will be put in the transmit queue"
  • Line Location: TR+12
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PL+4
Function Call: WRITE
  • Prompt: !!,"NAME",U,"SSN",U,"ADMISSION DATE",U,"DISCHARGE DATE",U,"FACILITY #"
  • Line Location: PL+5
Function Call: WRITE
  • Prompt: !,$P(WIINODE,U,2),U,$P(WIINODE,U,3),U,$P(WIINODE,U,6),U,$P(WIINODE,U,7),U,$P(WIINODE,U,5)
  • Line Location: PL+8
Function Call: WRITE
  • Prompt: !,"Record"_$S(WIIX>1:"s ",1:" "),WIIY," will be removed from the list"
  • Line Location: RM+12
Function Call: WRITE
  • Prompt: !,"Record"_$S(WIIX>1:"s ",1:" "),WIIY," will be marked pending"
  • Line Location: PD+12
Function Call: WRITE
  • Prompt: !,"Records ",WIIY," will be marked pending"
  • Line Location: PD3+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^WII(987.5 - [#987.5] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call